How to retrieve the instream data in SYSIN?
Submitted by: AdministratorUse Accept in procedure division.
Example :
WORKING-STORAGE SECTION.
01 empno. Pic x(05).
01 empname pic x(15).
01 empsal pic 9(10).
PROCEDURE DIVISION.
................
PERFORM ACCEPT-PARA.
..............
ACCEPT-PARA.
ACCEPT EMPNO.
ACCEPT EMPNAME.
ACCEPT EMPSAL.
In JCL :
...........
............
//sysin dd *
001
aaaa
330000
/*
Submitted by: Administrator
Example :
WORKING-STORAGE SECTION.
01 empno. Pic x(05).
01 empname pic x(15).
01 empsal pic 9(10).
PROCEDURE DIVISION.
................
PERFORM ACCEPT-PARA.
..............
ACCEPT-PARA.
ACCEPT EMPNO.
ACCEPT EMPNAME.
ACCEPT EMPSAL.
In JCL :
...........
............
//sysin dd *
001
aaaa
330000
/*
Submitted by: Administrator
Read Online IBM Assembler Job Interview Questions And Answers
Top IBM Assembler Questions
☺ | How to Pass the parameters from JCL to assembler Pgm? |
☺ | How are data passed from JCL parm to assembler program. And how is data passed from a calling program to an assembler called program? |
☺ | How to pass instream data in sysin with Assembler? |
☺ | Explain ICM instruction? |
Top Mainframe Technical Categories
☺ | IBM MainFrame Interview Questions. |
☺ | IBM AS400 Interview Questions. |
☺ | JCL Interview Questions. |
☺ | IMS DB Interview Questions. |
☺ | CICS Interview Questions. |