埋め込みの説明
@1@ : ALPHANUMERIC, NATIONAL
例題
000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C1850. 000003 ENVIRONMENT DIVISION. 000004 CONFIGURATION SECTION. 000005 OBJECT-COMPUTER. 000006 REPLACING CHARACTER FOR ALPHANUMERIC IS '#' 000007 REPLACING CHARACTER FOR ALPHANUMERIC IS '@'. 000008 END PROGRAM C1850.
c1850.cob 7: JMN1850I-S REPLACING CHARACTER句にALPHANUMERIC指定の代替文字がすでに指定されています.最初に指定された代替文字を有効とみなします.