3.1.2 DPCCLOSE

【パラメータ領域の宣言】

(1)パラメータ領域の形式

第1パラメータ
第1パラメータは以下の構造体の先頭アドレスです。
```
struct  dpc_clslst
```

(2)COBOLによる宣言

001000 WORKING-STORAGE SECTION.
001100*第1パラメータのアドレスがポイントする構造体を宣言
001200 01  DPC-CLSLST-AREA.
001300   02  APL-ID   PIC  9(4) COMP-5.
001400   02  RET-CODE PIC S9(9) COMP-5.
001500   02  D-CODE   PIC S9(9) COMP-5.
001600   02  FILLER   PIC  X(16).

【呼び出し形式】

003000 PROCEDURE DIVISION.
003100*DPCCLOSEの呼び出し
003200       CALL "XDpc_Close" WITH STDCALL LINKAGE
003300                         USING BY REFERENCE DPC-CLSLST-AREA.