is this below syntax correct?
CALL 'subprg' using A,B
Please help
Answers were Sorted based on User's Feedback
Answer / 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 |
Answer / billyboyo
Yes, your syntax is correct.
This is using the "call literal" option of IBM Cobol. If
you do need the call to be dynamic, specify the DYNAM
option on the compile.
If you were to have used "call data-name" then the call is
perforce dynamic and unaffected by DYNAM/NODYNAM compile
option.
| Is This Answer Correct ? | 0 Yes | 0 No |
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?
I have one ps file in which there are 3 fileds emp_no,emp_name and leave_app.this ps file information give the detail of employee which is going to apply for leave.suppose emp_no=113430,emp_name=ajay,leave_app=1 that means he is going to apply for 1 day leave.and accordingling the table in db2 will be updated means if he has that no of leave in his account then he will get dat leave and updated acc. in table(leave_balance=previous leave present in table-leave_app).Now i want to check whther the updated result is correct or not by comparing the two ps file using IEBCOMPARE or icetool so what is going to be the two ps file and how its is going to be compare.
can anyone explain me the concept of COMP-4 PLEASE??
What is EIBCALEN? Why it is used?
Without using move verb how to move one variable to another.
can we use COPY statement in w-s section? how?
Are you comfortable in cobol or jcl?
1) can we display the index?
Read filea And file b write the same records in both files? Records in a but not in b record in b but not in a
have in 100 records in a file i want to read first 3 records and skip next 3 records and agan i want to read 3 records and again i want to skip 3 records...
2 Answers ITC Indian Tobacco Company, PNP, TCS,
perform I from 0 by 1 until I=5?How maney times it will executes
What type of Call you would use if you don;t want the control back to the calling program?