How we can retrieve the instream data in SYSIN ?
Answers were Sorted based on User's Feedback
Answer / amarnadh reddy
Use 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
/*
| Is This Answer Correct ? | 11 Yes | 1 No |
What is the difference between various read and find statement,and which one should be used when for better adabas performance ?
Explain the difference between various read and find statement?
what is need of START 0?. In steed of '0' can we use any other numerics?. if we use what will happen?.
How do you initialize a register to 0000?
about ICM instruction.
Explain about base register?
What is need of start 0?
What does "using" do?
how to access VSAm file
What is base register?
how to pass the parameters from jcl to assembler pgm?
what is need of start 0? In steed of