Re: Prompting in a Program

Here's how I do it:

in the DDS add the RTNCSRLOC keyword.  You specify the variables that will 
contain the field name that was prompted.  See the DDS reference for exact 
syntax and how to specify the variables in your DDS.  If you use CODE 
Designer it will add the variables automagically.

In the RPG there is a function key handling procedure that says something 
like:

select;
when promptKey;
    if  (fieldName = 'FIELD1');
        call field1LookupProgram();

    elseif (fieldName = 'FIELD2');
         call field2LookupProgram();

    ...
    endif;
endsl;

HTH,
Adam

rpg400-l-bounces@xxxxxxxxxxxx wrote on 28/06/2006 10:19:15 AM:

I want to add a couple F4 prompts in a program I am writting. It has 

been so

long, I don't remember at all and I can't find a great example here at 

work.

Does anyone have a good sample or place I can go to see what needs to be
done. There will be two or more prompts on the screen.

-- 
Mike Wills
koldark@xxxxxxxxx
http://theriverbendpodcast.com
-- 
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.

#####################################################################################
Attention:
The above message and/or attachment(s) is private and confidential and is 
intended 
only for the people for which it is addressed. If you are not named in the 
address 
fields, ignore the contents and delete all the material. Thank you. Have a nice 
day.

For more information on email virus scanning, security and content
management, please contact administrator@xxxxxxxxxxxx
#####################################################################################