× 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.


  • Subject: Re: cl problem
  • From: "Neil Wood" <neil@xxxxxxxx>
  • Date: Mon, 20 Jul 1998 11:16:21 -0500

From: mohammad khan <mohammadakhan@yahoo.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.

Covers up the prospect of cheating doesn't it.  Or does it?

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

Here's some hints, DCLF, RTVDTAARA or RTVJOBA.....

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

what more do you need here?

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

Looks like a school assingment to me.  Don't you think figuring it out
yourself would serve you better in the long run?

Good Luck :)

Neil Wood
Programmer Analyst
IBM Certified Specialist

smime.p7s


As an Amazon Associate we earn from qualifying purchases.

This thread ...


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.