JCL to call COBOL program in SYSIN
Page 1 of 1
JCL to call COBOL program in SYSIN
All,
Is there a way we can call COBOL program full from JCL SYSIN.
I was trying to do something like this.
Code:
//STEP1 EXEC IGYWCG
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
IDENTIFICATION DIVISION.
PROGRAM-ID. ADDPGM.
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
77 NUM1 PIC 9(3) VALUE ZEROS.
77 NUM2 PIC 9(3) VALUE ZEROS.
77 RESU PIC 9(4) VALUE ZEROS.
PROCEDURE DIVISION.
MAIN-PARA.
DISPLAY 'ENTER THE NUMBER ONE VALUE'.
STOP RUN.
code' d
Please let me know whether it is possible.
Is there a way we can call COBOL program full from JCL SYSIN.
I was trying to do something like this.
Code:
//STEP1 EXEC IGYWCG
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
IDENTIFICATION DIVISION.
PROGRAM-ID. ADDPGM.
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
77 NUM1 PIC 9(3) VALUE ZEROS.
77 NUM2 PIC 9(3) VALUE ZEROS.
77 RESU PIC 9(4) VALUE ZEROS.
PROCEDURE DIVISION.
MAIN-PARA.
DISPLAY 'ENTER THE NUMBER ONE VALUE'.
STOP RUN.
code' d
Please let me know whether it is possible.
kasthuri- Posts : 212
Join date : 2013-01-27
Similar topics
» use of copy verb in cobol and cics program
» Calling program(Assembler/Cobol)
» S04e abend in cobol DB2 program
» CICS program issuing a CALL statement to subprogram.
» CICS program issuing a CALL statement to subprogram.
» Calling program(Assembler/Cobol)
» S04e abend in cobol DB2 program
» CICS program issuing a CALL statement to subprogram.
» CICS program issuing a CALL statement to subprogram.
Page 1 of 1
Permissions in this forum:
You cannot reply to topics in this forum
|
|