I also posted this same problem in another topic but was advised to create a new one since that topic was old. My apology, I have not been into this forum for a long time.
*******B062 FIELD REFERENCED IN UNAVAILABLE FILE - OUTFILE
*******B063 FIELD REFERENCED WAS - O-KEY
*******B063 FIELD REFERENCED WAS - O-CRF-KEY
*******B063 FIELD REFERENCED WAS - O-AGENCY
*******B063 FIELD REFERENCED WAS - O-SIT
*******B063 FIELD REFERENCED WAS - O-AGENT
*******B063 FIELD REFERENCED WAS - O-CLASSPLAN
*******B063 FIELD REFERENCED WAS - O-STATUS
*******B063 FIELD REFERENCED WAS - O-POLICY
564 JOB INPUT (TRLR01 KEY TRLR01-FILE-KEY +
TRLR02 KEY TRLR02-FILE-KEY +
TRLR49 KEY TRLR49-FILE-KEY)
565 IF MATCHED TRLR01, TRLR02, TRLR49
566 O-POLICY = TRLR01-FILE-KEY
567 O-STATUS = TRLR01-STAT
568 O-CLASSPLAN = TRLR02-CLASSPLAN
569 O-AGENT = TRLR49-AGENT
570 O-SIT = TRLR49-AGENT-SIT
571 O-AGENCY = TRLR49-AGENCY
572 O-CRF-KEY = TRLR49-CRF-KEY
573 O-KEY = TRLR49-KEY
574 PUT OUTFILE
575 END-IF
*******B063 FIELD REFERENCED WAS - O-KEY
*******B063 FIELD REFERENCED WAS - O-CRF-KEY
*******B063 FIELD REFERENCED WAS - O-AGENCY
*******B063 FIELD REFERENCED WAS - O-SIT
*******B063 FIELD REFERENCED WAS - O-AGENT
*******B063 FIELD REFERENCED WAS - O-CLASSPLAN
*******B063 FIELD REFERENCED WAS - O-STATUS
*******B063 FIELD REFERENCED WAS - O-POLICY
564 JOB INPUT (TRLR01 KEY TRLR01-FILE-KEY +
TRLR02 KEY TRLR02-FILE-KEY +
TRLR49 KEY TRLR49-FILE-KEY)
565 IF MATCHED TRLR01, TRLR02, TRLR49
566 O-POLICY = TRLR01-FILE-KEY
567 O-STATUS = TRLR01-STAT
568 O-CLASSPLAN = TRLR02-CLASSPLAN
569 O-AGENT = TRLR49-AGENT
570 O-SIT = TRLR49-AGENT-SIT
571 O-AGENCY = TRLR49-AGENCY
572 O-CRF-KEY = TRLR49-CRF-KEY
573 O-KEY = TRLR49-KEY
574 PUT OUTFILE
575 END-IF