Yes.
MODESET MODE=SUP
MODESET EXTKEY=ZERO,SAVEKEY=FOLDKEY,WORKREG=2
* TEST - post an invalid ECB
LA R1,1000 invalid ECB
* LA R2,2000 invalid ASCB
POST (R1),ERRET=error_routine, X
MF=(E,EXITPLST),LINKAGE=SYSTEM,ECBKEY=0
On Fri, Oct 17, 2014 at 12:11 PM, Rob Scott <[email protected]>
wrote:
> Are you PSW Key 0-7 and supervisor state ?
>
> Rob Scott
> Lead Developer
> Rocket Software
> 77 Fourth Avenue . Suite 100 . Waltham . MA 02451-1468 . USA
> Tel: +1.781.684.2305
> Email: [email protected]
> Web: www.rocketsoftware.com
>
>
> -----Original Message-----
> From: IBM Mainframe Discussion List [mailto:[email protected]] On
> Behalf Of Gabor Hoffer
> Sent: 17 October 2014 10:56
> To: [email protected]
> Subject: Re: XM POST ERRET=
>
> Same result without ASCB parameter, so not XM post. :-(
>
> On Fri, Oct 17, 2014 at 11:30 AM, Rob Scott <[email protected]>
> wrote:
>
> > I believe your ERRET routine is not being driven because of the
> > invalid ASCB specification.
> >
> > When you use the ASCB parameter with ERRET, it will only be used when
> > the cross-memory POST fails in the address space identified by the ASCB.
> >
> > I would imagine that if the ASCB is invalid, the POST service is
> > unable to establish the correct recovery environment and it cannot drive
> your ERRET.
> >
> > I would suggest making the ASCB a valid one and retesting your code
> > with its bad ECB.
> >
> > Rob Scott
> > Lead Developer
> > Rocket Software
> > 77 Fourth Avenue . Suite 100 . Waltham . MA 02451-1468 . USA
> > Tel: +1.781.684.2305
> > Email: [email protected]
> > Web: www.rocketsoftware.com
> >
> >
> > -----Original Message-----
> > From: IBM Mainframe Discussion List [mailto:[email protected]]
> > On Behalf Of Gabor Hoffer
> > Sent: 17 October 2014 09:56
> > To: [email protected]
> > Subject: XM POST ERRET=
> >
> > Hello,
> >
> > I have problem with ERRET= in POST macro.
> >
> > example:
> > * TEST - post an invalid ECB
> > LA R1,1000 invalid ECB
> > LA R2,2000 invalid ASCB
> > POST (R1),ASCB=(R2),ERRET=error_routine, X
> > MF=(E,EXITPLST),LINKAGE=SYSTEM,ECBKEY=0
> >
> > Routine (error_routine) won't get called as I post to an invalid
> > ECB/ASCB address. Module abends with S602.
> >
> > As workaround, I use ESTAE, but i don't really like it.
> >
> > Can anyone send me a working example?
> >
> > Regards,
> > Gabor
> >
> > ----------------------------------------------------------------------
> > For IBM-MAIN subscribe / signoff / archive access instructions, send
> > email to [email protected] with the message: INFO IBM-MAIN
> > ================================ Rocket Software, Inc. and
> > subsidiaries ■ 77 Fourth Avenue, Waltham MA
> > 02451 ■ +1 800.966.3270 ■ +1 781.577.4321 Unsubscribe From Commercial
> > Email – [email protected] Manage Your Subscription
> > Preferences -
> > http://info.rocketsoftware.com/GlobalSubscriptionManagementEmailFooter
> > _SubscriptionCenter.html
> > Privacy Policy -
> > http://www.rocketsoftware.com/company/legal/privacy-policy
> > ================================
> >
> > ----------------------------------------------------------------------
> > For IBM-MAIN subscribe / signoff / archive access instructions, send
> > email to [email protected] with the message: INFO IBM-MAIN
> >
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions, send email
> to [email protected] with the message: INFO IBM-MAIN
> ================================
> Rocket Software, Inc. and subsidiaries ■ 77 Fourth Avenue, Waltham MA
> 02451 ■ +1 800.966.3270 ■ +1 781.577.4321
> Unsubscribe From Commercial Email – [email protected]
> Manage Your Subscription Preferences -
> http://info.rocketsoftware.com/GlobalSubscriptionManagementEmailFooter_SubscriptionCenter.html
> Privacy Policy -
> http://www.rocketsoftware.com/company/legal/privacy-policy
> ================================
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [email protected] with the message: INFO IBM-MAIN
>
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
