MVS ATTACH を使用して COBOL メインプログラムを呼び出す 場合、言語環境プログラムは VS COBOL II とは異なる方法でパラメーター・リストを処理します。
言語環境プログラムのもとでは、COBOL プログラムが ATTACH SVC によって直接呼び出され た (オペレーティング・システムによるバッチ・プログラムの呼び出し および TSO CALL/ATTACH からの呼び出しを含む) ときには、パラメーター・リストは 常に "PARM=" スタイルとして処理されます。
上記以外の場合は、レジスター 1 およびパラメーター・リストは変更されずに渡されま す。
互換性のある動作を得るための方法が 2 つあります。
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