I am facing a Odd problem in a CICS transaction.
I have a Comp-3 Variable from a file. Lets say it as
File1-Comp-3 pic s9(5) comp-3.
This is a part of a record variable File1-record with 1000 length.
Now I read a file File1 into this File1-record. The File1-Comp-3 variable is populated with value 0.
After this , I read File2. This File2 doesnâ€™t have any relation with File1 fields. The only relation is I am reading File1 and File2 with same Value as Key (not same variable but their value). Now once this read is done, some invalid values are moved into the File1-Comp-3 variable. Not only that but all the Comp-3 variable in File1 becomes invalid.
Hence, if I try to move this File1-Comp-3 to any other variable, it throws an ASRA abend. This ASRA happens only after the second File (File2) is read. Until that the File1-Comp-3 didnâ€™t have invalid data.