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

what is need of start 0? In steed of

744


What is house keeping in assembler?

676


What is icm instruction?

711


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

705


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

679






What is maximum displacement?

722


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

687


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

707


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?

1627


Explain about base register?

697


how to pass the parameters from jcl to assembler pgm?

729


What is need of start 0?

755


Explain the difference between various read and find statement and which one should be used when for better adabas performance?

656


Ap wkur,=p5 where wkur is a label?

772


How many maximum base registers we can have in a program?

706