Actually iam getting the input files from diff sources. my program is used to ensure that both file will have same data.both the files have diff copy books
IF MTF-REFERRAL-ID NOT = MPC-REFERRAL-ID
MOVE 'MTF-REFERRAL-ID' TO EO-FIELD-NAME
MOVE MTF-REFERRAL-ID TO EO-SOURCE-VALUEN
MOVE MPC-REFERRAL-ID TO EO-TARGET-VALUEN
WRITE ERROR-OUT FROM ERROR-LINE-OUT
AFTER ADVANCING 1 LINE
MOVE SPACES TO ERROR-OUT ADD 1 TO WS-NOCOM-CT.