I am getting abend while executing ZAP instruction.Both destination & source fields are defined as Packed. For the first record of the file,its going fine,its abneding for second one onwards.The source filed has proper data even for second read...is their any equivalent command for ZAP?
Joined: 18 Nov 2006 Posts: 2977 Location: Tucson AZ
A S0C7? Then look at the contents of the source field that caused it.
If the field sizes are the same, you could always MVC, but then you would have the garbage in the destination field and the CC would not get set.
Joined: 23 Nov 2006 Posts: 8732 Location: 221 B Baker St
Hello,
If this was true
Quote:
The source filed has proper data
there would be no 0c7
Either there is bad data in the suspect field or the field being looked at is not the field causing the abend. It may be that data that was correct when read has been erroneously modified somehow before the ZAP is executed.
Joined: 18 Nov 2006 Posts: 2977 Location: Tucson AZ
I could also be a protection (store or fetch) or a decimal overflow exception. I doubt the addressing exception applys any longer and I doubt very much that the OP is running on a machine that doesn't have the decimal feature installed (operation exception).........