In message <m0xC5yQ-000I7rC@Uucp1.mcs.net>, From "Bill Phelps" 
<phelpswr@alpha.obu.edu>, the following was written:
> upper/lower case to position the list correctly.  What are some ways 
> to design a logical file or the application to ignore the case and 
> position the list correctly.

OK, start with the DDS:

                      ALTSEQ(QSYSTRNTBL)     
    R MYRCD           PFILE(MYPFILE)
    K NAMEFLD
    K OTHERKEY        NOALTSEQ

NAMEFLD is your problem key. OTHERKEY would be a subordinate key that is
included only to illustrate how to avoid applying the alternate sequence
table to all key fields.

In RPG, you would use an input field which only allows upper case input
(no LC). From there, it's straight-forward. Use SETLL to position to the
required key. If you need to check values programatically though, you
need to convert the input value to upper case yourself, since the
program will still receive mixed case. You can do this with the XLATE op
code:

   D Lo      C      'abcdefghijkl...
   D Hi      C      'ABCDEFGHIJKL...

   C   Lo:Hi     XLATE    NAMEFLD      UCASEFLD

hth
Pete

              


--
 - Pete Hall peteh@earth.inwave.com
http://www.inwave.com/~peteh/

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to "MIDRANGE-L@midrange.com".
| To unsubscribe from this list send email to MAJORDOMO@midrange.com
|    and specify 'unsubscribe MIDRANGE-L' in the body of your message.
| Questions should be directed to the list owner/operator: david@midrange.com
+---


This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2019 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].