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


Please Help Members By Posting Answers For Below Questions

What is house keeping in assembler?

676


Why do we use "drop"?

643


What does "using" do?

658


how to retrieve the instream data in sysin?

767


Explain how to produce soc7 abend?

719






What will happen if we drop the base register in the program which contains only one basereg?

660


explain about maximum displacement and how to cross this limit?

775


Explain the difference in data type "x" and "p"?

679


Explain how to access vsam file?

703


Explain about house keeping in assembler?

714


What is maximum displacement and how to cross this limit?

777


How is data passed from a calling program to an assembler called program?

706


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?

764


How are data passed from jcl parm to assembler program?

658


Explain how to initialize a register to 0000?

684