× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



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
+---


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

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.