埋め込みの説明
@1@ : USINGパラメタとして指定された利用者語.
例題
[C5514.cob] 000001 IDENTIFICATION DIVISION. 000002 CLASS-ID. C5514. 000003 ENVIRONMENT DIVISION. 000004 IDENTIFICATION DIVISION. 000005 OBJECT. 000006 DATA DIVISION. 000007 WORKING-STORAGE SECTION. 000008 PROCEDURE DIVISION. 000009 IDENTIFICATION DIVISION. 000010 METHOD-ID. MO1. 000011 DATA DIVISION. 000012 LINKAGE SECTION. 000013 01 LK1 PIC X(10). 000014 01 LK2 PIC X(10). 000015 PROCEDURE DIVISION USING LK1 LK1. 000016 DISPLAY "PARAMETER ERROR". 000017 END METHOD MO1. 000018 END OBJECT. 000019 END CLASS C5514.
C5514.cob 15: JMN5514I-S 'LK1'はUSING句の作用対象としてすでに記述されています.
詳細な説明
手続き部見出しのUSING指定に,同じデータ記述項のデータ名を複数回指定することはできません.