I don't even know how to spell COBOL, but LE programs typically must have a "/" either before or after the application's parms. LE execution parms go on the other side of the "/", but can be null. So possibly PARM='/PARM,DATA' is what you need. If that's the problem, I'd expect the program to act the same way it does with no parm at all. So that's a mystery.
sas On Tue, Dec 17, 2019 at 5:43 PM Farley, Peter x23353 < peter.far...@broadridge.com> wrote: > I thought I know this stuff, but my employer's z/OS V2.2 system is saying > I don't. > > I have a simple one-step PROC which executes a COBOL program but has no > keyword parameters on the EXEC statement, like this: > > //MYPROC PROC OUT=* > //MYPGM EXEC PGM=MYPGM > //SYSOUT DD SYSOUT=&OUT > // PEND > > MYPGM is compiled with COBOL V5.2 and has a LINKAGE SECTION like this: > > LINKAGE SECTION. > 01 PARM-FIELDS. > 05 PARM-LENGTH PIC S9(04) COMP. > 05 PARM-AREA PIC X(25). > > When I code the following execution of MYPROC, there is apparently NO PARM > passed to MYPGM: > > //STEP01 EXEC MYPROC,PARM.MYPGM='PARM,DATA,' > > When displayed by the program, PARM-LENGTH has a value of (decimal) +10 > but when PARM-AREA is displayed it shows unprintable hex characters. > > .......÷.........Ùf&....".0 > 0000003E000000000F8500007FF > 0A000101000000000D600000FF0 > > Am I crazy? Shouldn't PARM-AREA in this case print as "PARM,DATA,"? The > hex data that prints instead looks to me suspiciously like the contents of > address 0 in the LPAR, but I could be wrong about that. > > Peter > > > This message and any attachments are intended only for the use of the > addressee and may contain information that is privileged and confidential. > If the reader of the message is not the intended recipient or an authorized > representative of the intended recipient, you are hereby notified that any > dissemination of this communication is strictly prohibited. If you have > received this communication in error, please notify us immediately by > e-mail and delete the message and any attachments from your system. > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > -- sas ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
