【パラメータ領域の宣言】
(1)パラメータ領域の形式
第1パラメータ
第1パラメータは共通パラメータ構造体の先頭アドレスです。
第2パラメータ
第2パラメータは以下の構造体の先頭アドレスです。
struct dpc_abtlst
第3パラメータ
第3パラメータは以下の領域の値です。
(2)COBOLによる宣言
001000 WORKING-STORAGE SECTION. 001100*第2パラメータのアドレスがポイントする構造体を宣言 001200 01 DPC-ABTLST-AREA. 001300 02 CONABT PIC X(4). 001400 02 FILLER PIC X(16). 001500*第3パラメータの領域を宣言 001600 01 APL-ID PIC 9(4) COMP-5.
【呼び出し形式】
003000 PROCEDURE DIVISION. 003100*DPCABORTの呼び出し 003200 CALL "XDpc_Abort" WITH STDCALL LINKAGE 003300 USING BY REFERENCE DPC-COMM-AREA 003400 DPC-ABTLST-AREA 003500 BY VALUE APL-ID.
