How do you set a return code to the JCL from a COBOL
program?
Answer Posted / suresh
Move a value to RETURN-CODE register. RETURN-CODE should
not be declared in your program.
MOVE 4 TO RETURN-CODE
| Is This Answer Correct ? | 34 Yes | 4 No |
Post New Answer View All Answers
How are the next sentence and continue different from each other?
What is link edit in cobol?
What the difference is between continue and next sentence?
Write a cobol program making use of the redefine clause.
i need a small 3d program using inline and outline.
How to get the last record in vsam file in cluster? And how can you get the kids file records into your cobol program?
what is amode(24), amode(31), rmode(24) and rmode(any)?
What is length is cobol?
Why do we code s9 (4) comp. Inspite of knowing comp-3 will occupy less space?
)If there are 10 steps in GDG, if I want to refer the step2 after step5 . what should I do?
How to know whether the module is dynamical or statistical?
i want to learn mainframe..any websites and material to learn from basic..? my mail id : rajeswaribe2010@gmail.com
Explain what you understand by passing by value.
Our issue is there seems to be a disconnect, or no link, between our SELECT statement and our SD. We had SELECT SORT-FILE and SELECT SORT-FILE ASSIGN TO SORTWRK. ASSIGN TO SORTWRK1 SORTWRK2 SORTWRK3 SORTWRK4. with SD SORT_FILE RECORD CONTAINS 7833 CHARACTERS. In either case, at run time, the system ignored our SORTWRK# DD statements and allocated 16 sort works with the SORTWK## naming convention. Any ideas why the system does not recognize the connection? We do not even need the SORTWRK DD statements. Thanks
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 ?