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 icm instruction?
What is the use of trt instruction?
Explain how to initialize a register to 0000?
How do you round the addition or subtraction of two numbers in assembler?
How are data passed from jcl parm to assembler program?
What is need of start 0?
Ap wkur,=p5 where wkur is a label?
What is maximum displacement and how to cross this limit?
explain about maximum displacement and how to cross this limit?
Explain how to produce soc7 abend?
explain icm instruction?
What does "using" do?
What is need of start 0? In steed of can we use anyother numerics? If we use what will happen?
how to retrieve the instream data in sysin?
how to initialize a register to 0000?