埋め込みの説明
@1@ : USINGまたはRETURNINGパラメタとして指定された利用者語.
@2@ : USING,RETURNING.
例題
[C5513.cob] 000001 IDENTIFICATION DIVISION. 000002 CLASS-ID. C5513. 000003 ENVIRONMENT DIVISION. 000004 IDENTIFICATION DIVISION. 000005 OBJECT. 000006 DATA DIVISION. 000007 WORKING-STORAGE SECTION. 000008 PROCEDURE DIVISION. 000009 IDENTIFICATION DIVISION. 000010 METHOD-ID. M5513. 000011 DATA DIVISION. 000012 WORKING-STORAGE SECTION. 000013 01 WK1 PIC X(8). 000014 LINKAGE SECTION. 000015 01 LK1 PIC X(8). 000016 01 LK2 PIC S9(4) DISPLAY. 000017 01 RET REDEFINES LK2 PIC X(4). 000018 PROCEDURE DIVISION 000019 USING WK1 LK1 000020 RETURNING RET. 000021 DISPLAY "PARAMETER ERROR". 000022 END METHOD M5513. 000023 END OBJECT. 000024 END CLASS C5513.
C5513.cob 19: JMN5513I-S USING指定の作用対象'WK1'は,このソース単位内の連絡節で定義されたREDEFINES句を含まないレベル番号01または77のデータ項目でなければなりません.
C5513.cob 20: JMN5513I-S RETURNING指定の作用対象'RET'は,このソース単位内の連絡節で定義されたREDEFINES句を含まないレベル番号01または77のデータ項目でなければなりません.