例題
[P5155.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P5155. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 STY1 TYPEDEF STRONG. 000007 02 ITEM11 PIC X(4) . 000008 02 ITEM12 PIC X(4). 000009 01 DATA1. 000010 02 DATA2 TYPE STY1. 000011 PROCEDURE DIVISION. 000012 END PROGRAM P5155.
P5155.cob 10: JMN5155I-S STRONG指定を持つ型宣言は,レベル番号01のデータ項目またはSTRONG指定を持つ型宣言に従属する項目だけで参照できます.この項目を弱く型付けされた項目とみなします.