|
%len(%trim(PMMCHN)) will do it - %TRIM omits white space, and delivers only what's entered... Andrew Borts / Webmaster Seta Corporation 6400 East Rogers Circle Boca Raton, FL 33499 E-mail: Andrewb@setacorporation.com Corporate web site http://www.setacorporation.com E-Commerce web site http://www.palmbeachjewelry.com http://www.myfreeitems.com Voice: 561-994-2660 Ext. 2211 / Fax: 561-997-0774 -----Original Message----- From: Troy.C.Dills@blum.com [mailto:Troy.C.Dills@blum.com] Sent: Friday, December 14, 2001 8:11 AM To: rpg400-l@midrange.com Subject: LENGTH OF FIELD In the following code I am trying to check an input field with a length of 8 char. Pmmchn is a Machine Number. When someone keys in a machine number with less than 8 char, it takes it anyway. I suspect that the field is being padded with blanks. Can anyone give me a suggestion to check my Machine Number and make sure it is 8 characters every time? C If %len(PMMCHN) <> 8 C EXSR CLRSR C Eval ERRMSG = ERR(16) C LeaveSr C EndIf PS: I'm still waking up. <g> TIA Troy Dills Programmer RPGIV V5R1 Julius Blum Inc. _______________________________________________ This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list To post a message email: RPG400-L@midrange.com To subscribe, unsubscribe, or change list options, visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l or email: RPG400-L-request@midrange.com 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.