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 |
Why can only 256 bytes be moved from one address to another in a MVC?
Why do we use "drop"? What does "using" do?
In the house keeping section of an MVS assembly language program, like the one below STM R14,R12,12(R13) BASR R12,R0 USING *,R12,R11 LA R11,2048 LA R11,2048(R11,R12) .... .... 1. What if BASR R12,R0 IS NOT PRECEDE USING *,R12,R11? 2. USING (base address), REGISTER does USING directive says assembler to treat particular Register as a base register with the mentioned base address..in the above case * i.e current location counter..well if that is the case why we need BASR R12,R0 ? 3. What if I write like STM R14,R12,12(R13) BASR R12,R0 LA R11,2048 LA R11,2048(R11,R12) USING *,R12,R11 there is no address resolution being calculated in both LA statements so is it a right way to set Base register?..will there be any issues with Domain regarding R11 and R12?
What does LA R3,R3 ?
How many maximum base registers we can have in a single program?
WHAT WILL HAPPEN IF WE DROP THE BASE REGISTER IN THE PGM WHICH CONTAINS ONLY ONE BASEREG?
What is maximum displacement?
about maximum displacement and how to cross this limit.
how to retrieve the instream data in sysin?
Explain about house keeping in assembler?
what is need of START 0?. In steed of '0' can we use any other numerics?. if we use what will happen?.
What does the following code do? Ap wkur,=p5 where wkur is a label?