What the called program can do depends on the caller. The PARM might be in R/O
storage.
The Initiator does not pass a 64-bit PARM.
________________________________________
From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> on behalf of
Paul Gilmartin <0000042bfe9c879d-dmarc-requ...@listserv.ua.edu>
Sent: Wednesday, August 16, 2023 9:18 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Pass PARM by reference to COBOL
PARM is uniformly passed to a program by reference:
R1 -> x'80000000' + -> halfword length || parameter string
If a COBOL program is called by a program other than Initiator, can
it modify that parameter string as an Assembler program might to
return a value to the caller?
(If a program is marked AMODE 64, does Initiator pass a 64-bit PLIST?)
--
gil
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
