How do you set a return code to the JCL from a COBOL
program?
Answers were Sorted based on User's Feedback
Answer / 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 |
Answer / sudheer kumar
in you cobol program you have to code
move 8 to return-code
from jcl we have to check
if re=8
step12 exec pgm=progname
else
step13 exec pgm=progname3
end-if.
| Is This Answer Correct ? | 14 Yes | 2 No |
Answer / bodasureshreddy
you have to passes the returncode from cobol to jcl
| Is This Answer Correct ? | 11 Yes | 4 No |
Answer / suresh . e
01 RETURN-CODE-OUT PIC S9(09) USAGE COMP.
01 RETURN-CODE-IND PIC S9(04) USAGE COMP. first
declaration is to define the variable for return
code.Second declaration is for defining a Null indicator.
| Is This Answer Correct ? | 0 Yes | 14 No |
Study the DATA DIVISION entries and the three PROCEDURE DIVISION entries given below: 01 END-OF-FILE-SWITCH PIC XXX. 88 NO-MORE-RECS VALUE "YES". 88 MORE-RECS VALUE "NO". (i) READ SAMPLE-FILE AT END MOVE "YES" TO NO-MORE-RECS. (ii) IF NO-MORE-RECS = "YES" GO TO LAST-PARA. (iii) IF NO-MORE-RECS GO TO LAST-PARA. Which are wrong? (a) (i) and (ii) (b) (ii) and (iii) (c) (i) and (iii) (d) all
how to refer the data field?
what will happen if i give program name and member name as different? program runs successful or w'll abend?
what is scope terminator
given the following: 77 A PIC 9V9 VALUE 9.5 77 B PIC 9 VALUE 9. 77 C PIC V9 VALUE 0.8 77 D PIC 9 77 E PIC 9 77 F PIC 9V999 what are the contenta of D E nad F after the following statements are executed: COMPUTE F ROUNDED=A+C/B MULTIPLY A BY C GIVING E ADD B C A GIVING D ROUNDED a.F=9.589 E=8 D=1 b.F=9.589 E=8 D=9 c.F=9.589 E=7 D=9 d.F=9.589 E=7 D=1
In an EVALUTE statement is the order of the WHEN clauses significant?
What is the difference between CALL BY VALUE and CALL BY CONTENT?
What is link edit in cobol?
)If there are 10 steps in GDG, if I want to refer the step2 after step5 . what should I do?
I have program P1 which calls file F1 which has 100 records and following structure 001 .................. 002 .................. 003 .................. 098 .................... 099 ................... 100 .................... Now I want to read these files and write these records in file F2 in following manner. 001 ...... 051 ..... 002 ...... 052 ..... 003 ...... 053 ..... .......... ....... .......... ....... .......... ....... 048 ........ 098 ...... 049 .......... 099 ....... 050 .... 100 ......
SUPPOSE I HAVE 60 CHARACTERS STING. IN THAT I WANT FIND OUT HOW MANY TIMES 'A'(ASSUME)WILL REPEATED AND I HAVE TO PASS 'E' IN PLACE OF 'A'ALONG THAT STRING.
01 MOVE 10 TO N 05 PERFOM PARA1 TIMES STOP RUN WAT WILL HAPPEN?? WILL IT RUN INFINITELY OR AN ERROR WIL BE THER BECAUSE NO OF TIMES IS NOT GIVEN??