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