例題
[C3193.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3193. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 77 ID1 PIC X(20). 000007 77 CV-CHAR1 PIC XX. 000008 77 CV-CHAR2 PIC X. 000009 PROCEDURE DIVISION. 000010 INSPECT ID1 CONVERTING CV-CHAR1 TO CV-CHAR2. 000011 END PROGRAM C3193.
C3193.cob 10: JMN3193I-S INSPECT文にCONVERTING指定を記述する場合,変換文字と被変換文字の項目長は等しくなければなりません.