How we can retrieve the instream data in SYSIN ?
Answer Posted / 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 |
Post New Answer View All Answers
What is need of start 0?
what is need of start 0? In steed of
how to retrieve the instream data in sysin?
How to pass the parameters from jcl to assembler program?
how do you round the addition or subtraction of two numbers in assembler? what does the following code do? change process tool(code changes from dev to prd) the changes made to your code should be effected in live. How the process takes place. That is how can you move the code changes from development to production?
explain icm instruction?
How are data passed from jcl parm to assembler program?
Why do we use "drop"?
how to pass the parameters from jcl to assembler pgm?
What is icm instruction?
What does the following code do? Ap wkur,=p5 where wkur is a label?
How many maximum base registers we can have in a single program?
Explain how to produce soc7 abend?
How do you round the addition or subtraction of two numbers in assembler?
Explain the difference in data type "x" and "p"?