When you invoke a COBOL main program by using an MVS ATTACH, Language Environment processes parameter lists differently than VS COBOL II.
Under Language Environment, when a COBOL program is invoked directly by using ATTACH SVC (including the invocation of a batch program by the operating system and invocation from TSO CALL/ATTACH), the parameter list is always processed as a "PARM=" style.
Otherwise, register 1 and the parameter list are passed without change.
There are two ways to get compatible behavior:
ASMLE3 CEEENTRY PPA=MAINPPA,AUTO=WORKSIZE,MAIN=YES,PLIST=OS
USING WORKAREA,13
L 15,A1C401P Get the addr of the COBOL pgm
BALR 14,15 Call it with parm list unchanged
*====================================================================
* Terminate Language Environment.
*====================================================================
CEETERM RC=0
MAINPPA CEEPPA Constants describing the code block
*====================================================================
* The Workarea and DSA
*====================================================================
A1C401P DC V(A1C401P) VCON FOR COBOL pgm
WORKAREA DSECT
ORG *+CEEDSASZ Leave space for the DSA fixed part
DS 0D
WORKSIZE EQU *-WORKAREA
CEEDSA Mapping of the Dynamic Save Area
CEECAA Mapping of the Common Anchor Area
CEEEDB Mapping of the Enclave Data Block
END ASMLE3