I have defined the occurs clause as below in my working storage section.
01 W-LETTER-TABLE.
04 W-LETTER-FORMAT OCCURS 3 TIMES
INDEXED BY W-LETTER-NDX.
10 LETTER-TYPE PIC X(1).
88 COST-3230 VALUE 'B'.
88 COST-3277 VALUE 'A'.
88 COST-5048 VALUE 'C'.
10 TOTAL-BATCHES PIC 9(3).
10 FILLER PIC X(76).
04 W-LETTER-FORMAT OCCURS 3 TIMES
INDEXED BY W-LETTER-NDX.
10 LETTER-TYPE PIC X(1).
88 COST-3230 VALUE 'B'.
88 COST-3277 VALUE 'A'.
88 COST-5048 VALUE 'C'.
10 TOTAL-BATCHES PIC 9(3).
10 FILLER PIC X(76).
Is it possible to make use of the 88 level condition variables in occurs clause ?
If possible how to make use of the particular field (COST-5048 ,COST-3277 and COST-3230) in my PERFORM logic.
I am going read my input file in this above array.
My input file is as below.
****** ***************************** Top of Data ******************************
000001 A002
000002 B003
000003 C010
****** **************************** Bottom of Data ****************************
Please help me out.
ThanQ in advance.