引数の説明
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の項目だけに指定できます.次の認識できる句,段落,節または部まで無効になります.