is this below syntax correct?
CALL 'subprg' using A,B
Please help
Answer Posted / lu
yes, ...look at this ex:
For calling sub-modules DYNAMICALLY - Code:
In Working Storage Section -
01 WS-PROGRAM PIC X(08).
MOVE 'SUBPROGA' TO WS-PROGRAM
CALL WS-PROGRAM USING ....(Your Parameters)
MOVE 'SUBPROGB' TO WS-PROGRAM
CALL WS-PROGRAM USING ....(Your Parameters)
MOVE 'SUBPROGC' TO WS-PROGRAM
CALL WS-PROGRAM USING ....(Your Parameters)
For Calling STATICALLY, check your compiler option. If it
is NODYNAM then use -
Code:
CALL 'SUBPROGA' USING ...(Your parameters)
CALL 'SUBPROGB' USING ...(Your parameters)
CALL 'SUBPROGC' USING ...(Your parameters)
| Is This Answer Correct ? | 9 Yes | 1 No |
Post New Answer View All Answers
What is link edit in cobol?
Name the sections present in data division.
What is the Purpose of Pointer in the string?
What are the different types of condition in cobol and write their forms.
Name the divisions, which are available in a cobol program?
What is the compute verb? How is it used?
What is a report item?
Why is it necessary that file needs to be opened in I-O mode for REWRITE?
What is the difference between PIC 9.99 and PIC9v99?
How you can read the file from bottom?
how do you define single dimensional array and multidimensional array in your cobol?
here is my requirement A1 is alphanumeric with value 'A1B2C3D4' as defined below 05 A1 PIC X(8) VALUE IS 'A1B2C3D4' but i need to have A2,A3 as ABCD & 1234 repectively...... A2 = ABCD A3 = 1234 Can you please explain me what are the different ways to do it?
input 1 input2 ouput1 output2 output 3 1 re 300 1 re 200 1 re 300 3 rc 500 1 re 200 2 rr 400 1 re 300 2 rr 400 1 rc 400 3 rc 500 1 rc 400 2 rr 700 2 rr 700 5 tt 900 5 tt 900 2 inputs r in flat file and output 1 is matched records,ouptput2 is unmatched of input1,output3 is unmatched of input2! how vl u get the output files using sequential order and to check with each and every records! let me know the procedure division ?
How to read the 2nd last record of a VSAM file? (The file size is huge and we don't know the key)
Name some of the examples of COBOl 11?