On Sun, 17 Aug 2014 20:24:40 GMT "[email protected]" <[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 ??? Why do you expect that? Where do you set R14? Also, ABEND alters R1 :>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 ? -- Binyamin Dissen <[email protected]> http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies.
