r1 is loaded from a Field called ANCHOR1@ It contains the address of a storage Block or structure Before using it I CHECK THE EYE CATCHER which I previously posted. There is a Compare for the value f the eye catcher to veridy that I am using the right Storage Structure, and I AM as evident by the JNE - not be taken.
There is No Pruning of instructions These 5 instructions are executed as written . . ---------- Original Message ---------- From: Bob Rutledge <[email protected]> To: [email protected] Subject: Re: Can Someone Point Out My error Here Date: Sun, 17 Aug 2014 17:40:55 -0400 [email protected] wrote: > 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 > What exactly is in R1? Bob
