RE: Reading a subfile with no changed records on it

Try using (in DDS)
RTNCSRLOC(&RCD &FLD)
SFLCSRRRN(&CSRRN)
This will tell you the subfile record they are prompting on.

If CFKey = F4 and Fld = 'FIELDNAME';
SEARCH PROGRAM CALL;
FIELDNAME = SrchReturnParm;
EndIf;

HTH,

Craig

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of jeffw@xxxxxxxxxxxxxxxx
Sent: Thursday, September 11, 2008 10:28 AM
To: RPG programming on the AS400 / iSeries
Subject: Reading a subfile with no changed records on it

Hi everyone
I need to a read a subfile that has no user inputted changed records on it.
So the READC command will not work. There are 3 fields on the screen item
number, quantity and lot number. The user has the ability to prompt the lot
number field and select other lots for that item. However I cannot figure
out how to get the item # from the subfile for the prompt to work correctly.

Other information, I am using F4 to prompt the field. Any ideas? Thank you

Jeff Williams