Re: testing a value in specific position of the field

Or use a data structure?


D          DS
D Flag            1    10A
D  Switch         5     5A


IF  switch = 'Y';
 // Do something;
ENDIF;

*IBM System i Programmer/Analyst
B&W Wholesale Distributors, Inc.* *
voice
        615.995.7024
fax
        615.995.1201
email
        jerry@xxxxxxxxxxxxxxx <mailto:jerry@xxxxxxxxxxxxxxx>



Bob Cozzi wrote:

Actually you can substring, like this:

 If (%subst(usr1:5:1) = 'Y');
  // Do your thing.
 endif;


-Bob Cozzi
www.iSeriesTV.com
iPod your industry news instead of reading it.
Coming July 18, 2006
Ask your friends to tune into iSeriesTV.com

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On
Behalf Of Yuriy Veletnik
Sent: Thursday, July 20, 2006 3:02 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: testing a value in specific position of the field

I have a file:



User      User

ID         Flag

usr1      YNNNYNNYYY

usr2      NYNYNNYYNNN

usr3      NYNNYYNYYY



I need to create a report that will print all the records with 'Y' in
position 5 of User Flag field. I'm new to RPG, understand that I need to
use runtime array, having problems with details. Any help greatly
appreciated.













Yuriy Veletnik

AS/400 Administrator

Trade Associates Group, ltd

1730 W. Wrightwood

Chicago, IL 60614

773.871.1300 x130