数组是逻辑上连续的一系列元素.pptVIP

第一页，共十四页，2022年，8月28日 TABLE（数组） 数组是逻辑上连续的一系列元素，在 DATA DIVISION 里由OCCURS 子句定义。 每个元素具有同样的格式。 第二页，共十四页，2022年，8月28日 声明TABLE（数组） 语法: level-number data-item-1 OCCURS interger-1 TIMES | interger-1 TO interger-2 TIMES DEPENDING ON data-item-2 [ASCEDING | DESCENDING KEY IS data-item-3] [INDEXED BY data-item-4] other data-description entries 第三页，共十四页，2022年，8月28日 例子: 01 TAXTOTALS. 03 CONTYTAX PIC 9(4)V9(2) OCCURS 20 TIMES. 01 TAXTOTALS. 03 COUNTAX OCCURS 20 TIMES. 05 DETAILTAX PIC 9(4)V9(2). 05 PAYER PIC 9(6). 01 JEANSTABLE. 03 PROVINCE OCCURS 4 TIMES. 10 GENDER OCCURS 2 TIMES.