埋め込みの説明
@1@ : STRING/UNSTRING
@2@ : 送出し側/INTO指定
@3@ : データ名(送出し側またはINTO指定)
例題
[C3552.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3552. 000003 DATA DIVISION. 000004 WORKING-STORAGE SECTION. 000005 01 DATA1 PIC X(10). 000006 01 DATA2. 000007 02 DATA21 PIC X(5). 000008 02 DATA21R REDEFINES DATA21 PIC 9(5). 000009 02 DATA22 PIC N(5). 000010 01 DATA3 PIC N(15). 000011 01 RCV PIC X(50). 000012 PROCEDURE DIVISION. 000013 STRING DATA1 DATA2 DATA3 INTO RCV 000014 BY TSV-FORMAT 000015 END-STRING. 000016 . 000017 END PROGRAM C3552.
C3552.COB 13: JMN3552I-S CSV-FORMATまたはTSV-FORMAT指定のSTRING文における送出し側に,REDEFINES句が指定されたデータ項目,またはそのデータ項目を含む集団項目である'DATA2'は指定できません.