Soc7 when comparing two diff files with having the same data

msrinivasa · New User Joined: 31 Jan 2007 Posts: 10 Location: chennai

Hi this is srinivasa rao

I am comparing two diff files with having the same data.while run time I am getting the S0c7.in the COBOL program just I am verifying the field values.ex: ntr-name = mtr-name.

jayant_tibhe · New User Joined: 25 Feb 2006 Posts: 27 Location: Pune

Vasu,

Have you check with the file format? Or the String size you defined for them?

Please provide the details for that..

William Thompson · Posted: Mon Feb 26, 2007 3:40 pm

S0C7 is packed numeric data exception, why would you have ntr-name or mtr-name definde as packed data?

msrinivasa · New User Joined: 31 Jan 2007 Posts: 10 Location: chennai

both the files are same formate and record lentha is also same.

William Thompson · Posted: Mon Feb 26, 2007 4:10 pm

That doesn't matter, why don't you look at the dump and see what decimal value has garbage in it?

msrinivasa · New User Joined: 31 Jan 2007 Posts: 10 Location: chennai

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

code

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.

William Thompson · Posted: Mon Feb 26, 2007 4:31 pm

Did you initialize WS-NOCOM-CT?