In the code below, the LARL instruction is commented out.  What is in R14
since that is where the MVC deposited your eyecatcher.

> -----Original Message-----
> From: IBM Mainframe Assembler List [mailto:ASSEMBLER-
> l...@listserv.uga.edu] On Behalf Of essteam
> Sent: Sunday, August 17, 2014 2:18 PM
> To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
> Subject: Re: Can Someone Point Out My error Here
> 
> No Access Registers
> And Register 14 was set by the LARL instruction
> 
> ---------- Original Message ----------
> From: Alan Atkinson
> To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
> Subject: Re: Can Someone Point Out My error Here
> Date: Sun, 17 Aug 2014 20:44:07 +0000
> 
> any access registers?
> 
> ________________________________________
> From: IBM Mainframe Assembler List [ASSEMBLER-
> l...@listserv.uga.edu] on behalf of
> Sent: Sunday, August 17, 2014 4:24 PM
> To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
> Subject: Can Someone Point Out My error Here
> 
> Im executing 5 Instructions and then I force an Abend.
> I load the address of a storage area into Register 1 nd verify it by the
> presence of an eye-catcher.
> After executing the 5 instructions below; I expect the area Labeled
> "LOCLCOMM" to contain a copy of the eye-catcher that Register 1 is
pointing
> to. However after execiting the 5 instructions the area LOCLCOMM contains
> 256 Binary zeroes ???
> .
> .
> There is No Multi Tasking as this is a single TCB program.
> .
> .
>      L     R1,ANCHOR1@         Storage Anchor Address
>      CLC   STATIC_EYE,00(R1)      Valid Eye Catcher
>      JNE   NO_STATIC_EYE          NO Eye-Catcher
> *
LARL  R14,LOCLCOMM         DEBUG
>      MVC   00(16,R14),00(R1)    DEBUG
>      ABEND 444,DUMP,STEP        DEBUG
> *
> *
> *
>          DS  0D                   Alignment
>          DC  CL8'LOCLCOMM'         Eye Catcher
> LOCLCOMM DS  CL256
>          DC  CL12'LOCLCOMMEND '    Eye Catcher
>         ORG ,
> .
> .
> So what Am I missing here ?
> Can someone point out my mistake ?
> .
> .
> Paul

Reply via email to