例題
[P5154.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P5154. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 BASED-STORAGE SECTION. 000006 01 DATA1 TYPE STY1. 000007 WORKING-STORAGE SECTION. 000008 01 STY1 TYPEDEF STRONG. 000009 02 ITEM11 PIC X(4) . 000010 02 ITEM12 PIC X(4). 000011 PROCEDURE DIVISION. 000012 END PROGRAM P5154.
P5154.cob 6: JMN5154I-S 強く型付けされた項目は,基底場所節に定義してはなりません.この項目を弱く型付けされた項目とみなします.
詳細な説明
基底場所節で宣言するデータ記述項では,STRONG指定を持つ型宣言(TYPEDEF)を参照するTYPE句は指定できません.