0110 READ MASTER-FILE
0120 AT END MOVE 'Y' TO MASTER-EOF-SW.
0130 READ TRANSACTION-FILE
0140 AT END MOVE 'Y' TO TRANSACTION-EOF-SW.
0150 PERFORM PROCESS-FILE
0160 UNTIL END-OF-MASTER OR
0200 PERFORM UNTIL MASTER-KEY >= TRANSACTION-KEY
0210 WRITE MASTER-RECORD
0220 READ MASTER-RECORD AT END MOVE 'Y' TO MASTER-EOF-SW
0240 IF NOT MASTER-EOF
0250 EVALUATE TRUE
0260 WHEN TRANSACTION-IS-DELETE
0270 PERFORM DELETE-MASTER
0280 WHEN TRANSACTION-IS-ADD
0290 PERFORM ADD-MASTER
0300 WHEN TRANSACTION-IS-UPDATE
0310 PERFORM UPDATE-MASTER
0340 IF MASTER-KEY <> TRANSACTION-KEY
0350 DISPLAY '??????'
0360 WRITE MASTER-RECORD.
0370 READ MASTER-FILE AT END MOVE 'Y' TO MASTER-EOF-SW.
0380 PERFORM GET-NEXT-TRANSACTION.
This is a tape-based master-transaction program segment. Assume the files are sorted into ascending sequence by key fields. Transactions may add, delete, or update master file records. Referring to statement #0350, what error, if any, has been detected?
There is no corresponding transaction record for the master record being processed following the initial read.
The master file is out of sequence.
A logic error has occurred.
The master record to be deleted does not exist.
The transaction file is out of sequence.