cl problem

[mohammad khan <mohammadakhan@xxxxxxxxx>]

Hi folks,

I have another problem but it is not my own. A friend is having
difficulty so if anyone is willing to take a look at it i'd appreciate
it very much.

The person has no idea how to approach the problem in the manner of
the data area section to be specific.


A                               DSPSIZ(24, 80 *D3)
A                               CF03(03 'EXIT'
A
A  R MENU
A                           5 33'ASSIGNMENT MENU'
A                           8 32'1. RUN PGM 1 - ONLINE'
1                          10 32'2. RUNG PGM 1 - BATCH'
A                          12 32'3. RUN PGM 2 - ONLINE'
1                          14 32'4. RUN PGM 1 - BATCH'
A      OPTION      1   B   15 46   
A                          15 33'ENTER OPTION'
A      LIBRARY    10   B   16 46
A                          16 33'ENTER LIBRARY'
A                          20 37'F3=EXIT'

-Write a CL program that will use the display file above as a menu but
instead of receiving the name of the library from a program parameter,
you will retrieve it from the job's local data area.

-Before running the program change your local data area so that the
first 10 positions contain the name of the library accepted from the
display file. Hint: CHGDTAARA *LDA

-Using the RTVDTAARA command, retrieve the name of the library from
the first 10 positions of the job's local data area. Hint: RTVDTAARA
*LDA


Thanks alot everyone!

M.K.
_________________________________________________________
DO YOU YAHOO!?
Get your free @yahoo.com address at http://mail.yahoo.com

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---