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 |
Explain how to produce soc7 abend?
What is the use of trt instruction?
Can we use an equated value as operand for an MVC instruction? Reason for the same
Why can only 256 bytes be moved from one address to another in a MVC?
Is it possible to access some memory location (Ex: VAR1 DS P) without using Base Displacement?
Explain how to initialize a register to 0000?
What is need of start 0? In steed of can we use anyother numerics? If we use what will happen?
How many maximum base registers we can have in a program?
Explain about maximum displacement?
How do you initialize a register to 0000?
Why do we have multiple base registers in certain programs?
how to retrieve the instream data in sysin?