DDS - for characters to uppercase

[George221]

Hi,
Is it possible for define a field in DDS so it forces/converts characters to uppercase?
Thanks.

 

[Mercury2]

If your post relates to a data file, you can do this using a translate table in a logical file.
Check out

http://publib.boulder.ibm.com/infocenter/iseries/v5r4/index.jsp?topic=/cl/crttbl.htm

http://publib.boulder.ibm.com/infocenter/iseries/v5r4/index.jsp?topic=/rzakb/rzakbmsttdtrntb.htm

 

[flapeyre]

If your goal is case-insensitive search (equal weight given to upper/lower case characters), then Mercury2's answer is what you want to do.

Other than that, if you want to make sure all of the data is entered in uppercase only, simply don't use the CHECK(LC) keyword on the data fields in the screen file. You can't force a constraint at the file level to force uppercase, as far as I know.

Solum potestis prohibere ignes silvarum.

 

[flapeyre]

Here is the easy way:

     A*ARCUS - CUSTOMER MASTER FILE                             
     A*                                                         
     A                                      [COLOR=red]ALTSEQ(*LIBL/ALTTBL)[/color]
     A          R CUS                       PFILE(ARCUS)        
     A*                                                         
     A          K CUSLNM                                        
     A          K CUSFNM                                        
     A          K CUSNO

The ALTSEQ keyword on the logical file is what does it. The access path on this logical is by case-insensitive last name, case-insensitive first name, and then by customer number (DDS ignores the ALTSEQ keyword for non-character fields).

Solum potestis prohibere ignes silvarum.

 

[flapeyre]

Oops. I just realized that ALTTBL is something we created for our own use.

If your files are, say, code page 37 (USA English), use the table QUSRSYS/Q037 instead. Do a WRKTBL QUSRSYS/*ALL and you willsee all of the tables that are there. Or you can create your own by cloning one and changing it.

Solum potestis prohibere ignes silvarum.

 

[George221]

Thanks a bunch.