|
Use %xLate. In the DSPEC define two constants. D Hi C 'ABCDEFGHIJKLMNOPQRSTUVWXYZ' D Lo C 'abcdefghijklmnopqrstuvwxyz' field = %xlate(lo:hi:field); // convert lower to upper field = %xlate(hi:lo:field); // conver upper to lower Michael Schutte Work 614-492-7419 email michael_schutte@xxxxxxxxxxxx steema@diskhaven. com Sent by: To rpg400-l-bounces+ "RPG programming on the AS400 / michael_schutte=b iSeries" <rpg400-l@xxxxxxxxxxxx> obevans.com@midra cc nge.com Subject orders from web - names 03/29/2006 11:09 AM Please respond to RPG programming on the AS400 / iSeries <rpg400-l@midrang e.com> HI We get some orders from web but through a service. Sometimes the customer had entered bad data. For example the name will be replicated in the first address field but will be in lower case, and the name may be spelled out rather than a nickname (Patrica vs. Pat), but it seems the last name is always there, altho in lower vs. upper. How can I convert lower to upper so as to compare this last name, via the SCAN ? Thanks, Steve -- This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options, visit: http://lists.midrange.com/mailman/listinfo/rpg400-l or email: RPG400-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at http://archive.midrange.com/rpg400-l.
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.