|
Bob, On your logical files that include proper case fields, use the ALTSEQ function (col 45) prior to the Format spec, and it will apply to the entire file. The QSYSTRNTBL supplied with OS/400 works fine for every app I've worked with. Specify NOALTSEQ on numeric fields in the Key specs. Here is sample DDS for a Logical by name over a file normally keyed by a numeric code: *************** Beginning of data ************************************* A*================================================================ A ALTSEQ(QSYSTRNTBL) A FIFO A*================================================================ A R OREN00F2 TEXT('Enrollment') A PFILE(OREN00P) A*---------------------------------------------------------------- A ENANNB TEXT('Participant Code') A ENACCD TEXT('Program') A ENBYTX TEXT('Participant Name') A*................................................................ A* Key fields A K ENBYTX A K ENANNB NOALTSEQ A*================================================================ ****************** End of data **************************************** --Chapin "almost an English major" Kaynor Somewhere in Vermont << Date: Thu, 4 Nov 1999 10:53:53 -0600 From: "Bob Randall" <BLR@airxcel.com> Subject: Attention English Majors? OK, some of the people around here are trying to enter the 20th century (we are not worried about the 21st century yet <grin>).Anyway, we are starting to use some lower case data for proper capitalization. They are used to being all caps for everything. Some of you have already surmised the problem. In standard hexadecimal, lower case letters all sort ahead of upper case. Is there a really simple answer to make lower case sort equal to upper case? I know I can use a lot of ALTSEQ statements, but it seems there should be an easier way to handle this for all system sorts and such. Could an AS/400 English Major (or not an English Major) help with this? TIA, Bob Randall Airxcel, Inc. >> +--- | This is the Midrange System Mailing List! | To submit a new message, send your mail to MIDRANGE-L@midrange.com. | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com. | To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com. | Questions should be directed to the list owner/operator: david@midrange.com +---
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.