How are data passed from JCL parm to assembler program. And
how is data passed from a calling program to an assembler
called program.

Answer Posted / mike m

- JCL PARM

//SAMPPROG EXEC PGM=XXXXXXXX,PARM='XXXXXXXX......'

CONTAINS A PARM FIELD WITH UP TO 100 BYTES OF DATA IN IT.
THE PROGRAM BY DESIGN PICKUPS UP A POINTER TO THE DATA AND
THE DATA LEN. REG 1 HAS WHAT YOU NEED TO EXTRAPOLATE ALL OF
THIS.

- PASS DATA TO CALLED PROGRAM

IN THIS CASE, CALLER IS AN ALC PROGRAM PASSING 2 FIELDS TO
SUBROUTINE NAMED SUBROUT1. THE PASSED FIELDS WILL HAVE BEEN
PRIMED PRIOR TO THE "CALL"

CALL SUBROUT1(FIELDA,FIELDB)
.
.
.
FIELDA DS CL8
FIELDB DS CL8

Is This Answer Correct ?    8 Yes 5 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

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

630


What does "using" do?

587


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?

1525


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

592


What is icm instruction?

638






What is house keeping in assembler?

591


Ap wkur,=p5 where wkur is a label?

664


What is the use of trt instruction?

580


What does the following code do? Ap wkur,=p5 where wkur is a label?

611


How do you round the addition or subtraction of two numbers in assembler?

602


Explain about maximum displacement?

604


What is need of start 0?

653


Why do we use "drop"?

561


Explain how to pass instream data in sysin with assembler?

640


What is need of start 0? In steed of can we use anyother numerics? If we use what will happen?

636