Portal | IBM Manuals | Downloads | Products | Refer | Info | Programs | JCLs | Forum Rules*| Site Map | Mainframe CD 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index
 
Register
 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index FAQ Search Memberlist Usergroups Profile Log in to check your private messages Log in
 
Clarification needed regarding ZAP instruction in Assembler

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & ASSEMBLER
Author Message
ssamineni
Warnings : 1

New User


Joined: 10 Mar 2007
Posts: 16
Location: India

PostPosted: Mon Jun 18, 2007 4:26 pm    Post subject: Clarification needed regarding ZAP instruction in Assembler
Reply with quote

HI,

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?
Back to top
View user's profile Send private message
References
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 2977
Location: Tucson AZ

PostPosted: Mon Jun 18, 2007 5:07 pm    Post subject:
Reply with quote

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.
Back to top
View user's profile Send private message
dick scherrer

Global Moderator


Joined: 23 Nov 2006
Posts: 8732
Location: 221 B Baker St

PostPosted: Mon Jun 18, 2007 7:48 pm    Post subject:
Reply with quote

Hello,

If this was true
Quote:
The source filed has proper data
there would be no 0c7 icon_confused.gif

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.
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 2977
Location: Tucson AZ

PostPosted: Mon Jun 18, 2007 8:04 pm    Post subject:
Reply with quote

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).........
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & ASSEMBLER All times are GMT + 6 Hours
Page 1 of 1