引数の説明
TYPEDEF |
例
000001 IDENTIFICATION DIVISION. 000002 CLASS-ID. C1693. 000003 OBJECT. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 DATA01. 000007 02 DATA02 TYPEDEF PIC X(100). 000008 END OBJECT. 000009 END CLASS C1693.
C1693.cob (7) : JMN1693I-S TYPEDEF句はレベル番号01の項目だけに指定できます.次の認識できる句,段落,節または部まで無効になります.