how can i use the parameters decalred in main pgm in sub pgm
Answers were Sorted based on User's Feedback
Answer / venkat
specify the field as GLOBAL.
EX.
Main program
WSS.
01 WS-ENO PIC X(9) GLOBAL.
Sub program.
PD.
DISPLAY WS-ENO.
| Is This Answer Correct ? | 3 Yes | 0 No |
Answer / lakshmisudha
if we defined the variables in main program like below
data division
working-storage section.
01 a1 pic 99.
01 a2 pic 9(3).
if you want use same variables in sub program you define
like below in sub program
DATA DIVISION.
LINKAGE SECTION.
01 B1 PIC 99.
01 B2 PIC 9(2).
PROCEDURE DIVISION USING A1, A2.
| Is This Answer Correct ? | 3 Yes | 0 No |
wht happens if blksize = 0 and lrec = 0 ?
I have 3 duplicate records in a file . I want to eliminate 1st, 2nd and copy 3rd one only . HOW ?
What is the purpose of dd?
How to execute step2,step1,step3 when step1,2&3 are in order
Can I share my data with other jobs? How?
Statement1 "We can not use UNCATLG in SMS managed VSAM datasets" Statement2 "We can not delete a SMS managed data set without UNCATLG it" (P-353, Saba Zameer book) Then how do we delete SMS managed VSAM datasets ?
How to skip first step of a job? Can we use COND on the first step?
What is Automatic Restart ? EXEC PGM = PROG1, RD = R (Is it the Restart of a JOBSTEP or Restarting the execution of the program?) Do we Restart it or it automatically Restarts executing again and again ? Then when it will finish executing ? or After Abending, when we submit it again, then it is Restarted from the Last successful Checkpoint ? If some JOBSTEP is abending, what is the benifit to Restart it, WILL IT NOT ABEND AGAIN if you don't change the LOGIC ?
What parameter directs the output of the job log dataset?
when GDG version number get changed ? bcz always Generations only increasing.
Is there any command to check wether the ps file is in sorted order?
Name the statement which can be used to send data to another mvs jes3 node?