SELLIM supports the following parameter:
Any integer value between 0 and 999,999,999. The default value is 0, which means there is no limit to the number of times a subordinate action can be executed.
The SELLIM is set to 50. Each time a SELRECIF selection condition is met, the record is written to the appropriate file. No more records are written to either CTFILE or TNFILE once a total of 50 records have been written to both of them combined.
READ, LAYOUTFILE(LAYOUT), SELLIM(50), SELRECIF(STATE-CODE,EQ,C'CT'), MOVE(1,0,1), WRITE(CTFILE), SELRECIF(STATE-CODE,EQ,C'TN'), MOVE(1,0,1), WRITE(TNFILE)
Each time a SELRECIF's subordinate actions are processed, the SELLIM for that particular SELRECIF is incremented. In this particular case, each SELRECIF's actions are processed 50 times, thus limiting the number of records written to both the CTFILE and TNFILE to 50, for a total of 100.
READ, LAYOUTFILE(LAYOUT), MOVE(CLEAR), SELRECIF(STATE-CODE,EQ,C'CT'), SELLIM(50), MOVE(1,0,1), WRITE(CTFILE), SELRECIF(STATE-CODE,EQ,C'TN'), SELLIM(50), MOVE(1,0,1), WRITE(TNFILE)
|
Copyright © 2015 CA Technologies.
All rights reserved.
|
|