例
000001 IDENTIFICATION DIVISION. 000002 ENUM-ID. C5263. 000003 DATA DIVISION. 000004 WORKING-STORAGE SECTION. 000005 01 F1 PIC S9(4) COMP-5 VALUE 10. 000006 END ENUM C5263.
C5263.cob (5) : JMN5263I-S ENUM定義のデータ記述項にはVALUE句だけを記述しなければなりません.この項目は無効になります.
詳細な説明
ENUMは,名前の付いた整数を列挙したデータ型です.
データ記述項で宣言した名前が整数の名前であり,VALUE句でその整数値を指定します.