【パラメータ領域の宣言】
(1)パラメータ領域の形式
第1パラメータ
第1パラメータは以下の構造体の先頭アドレスです。
struct dpc_dconlst
第2パラメータ
第2パラメータは以下の領域の値です。
(2)COBOLによる宣言
001000 WORKING-STORAGE SECTION. 001100*第1パラメータのアドレスがポイントする構造体を宣言 001200 01 DPC-DCONLST-AREA. 001300 02 APL-ID PIC 9(4) COMP-5. 001400 02 SYSNAME PIC X(8). 001500 02 RET-CODE PIC S9(9) COMP-5. 001600 02 D-CODE PIC S9(9) COMP-5. 001700 02 FILLER PIC X(16). 001800*第2パラメータの領域の宣言 001900 01 C-NO PIC X.
【呼び出し形式】
003000 PROCEDURE DIVISION. 003100*DPCDISCONNECTの呼び出し 003200 CALL "XDpc_Disconnect" WITH STDCALL LINKAGE 003300 USING BY REFERENCE DPC-DCONLST-AREA 003400 BY VALUE C-NO.
―共通パラメータ
以降に挙げる会話機能（DPCBEGIN、DPCTRANSFER、DPCACCEPT、DPCEND、DPCABORT、DPCPCONTROL、DPCGCONTROL、DPCSYNC、DPCACK、DPCERROR）の関数では共通のパラメータを使用します。
まず共通パラメータについて説明します。
【共通パラメータ領域の宣言】
(1)共通パラメータ領域の形式
共通パラメータ構造体は以下のとおりです。
struct dpc_comm
(2)COBOLによる宣言
001000 WORKING-STORAGE SECTION. 001100*会話機能の関数の第1パラメータには共通パラメータ領域の構造体の先頭アドレスを指定します。 001200*共通パラメータ領域の構造体を宣言 001300 01 DPC-COMM-AREA. 001400 02 CONV-ID PIC S9(9) COMP-5. 001500 02 RET-CODE PIC S9(9) COMP-5. 001600 02 D-CODE PIC S9(9) COMP-5. 001700 02 FILLER PIC X(16).
