Joe, Make sure the ECB is on a fullword boundary. Brian
IBM Mainframe Discussion List <[email protected]> wrote on 12/16/2009 01:27:13 PM: > [image removed] > > Re: SYSTEM COMPLETION CODE=102 REASON CODE=0000000C > > Joe Reichman > > to: > > IBM-MAIN > > 12/16/2009 01:28 PM > > Sent by: > > IBM Mainframe Discussion List <[email protected]> > > Please respond to IBM Mainframe Discussion List > > Thankx for the reply to my desprate call for help > Anyway just browsed sys1.maclib POST and didn't notice special code > genaration for AR e.g a LAM instruction > but it's worth a shot (setting SYSSTATE ASCENV=P ) > As my test program seems to work > Thankx again > > Sent from my iPhone > > On Dec 16, 2009, at 9:12 AM, Miklos Szigetvari > <[email protected] > > wrote: > > > Hi > > > > In my old PC routine, I have a SAC 0 (SYSSTATE ASCENV=P) before > > the XMPost > > > > Joe Reichman wrote: > > > >> Hi, > >> > >> > >> I have been spending days try to resolve this message originally I > >> thought > >> it was something I had done in a PC rtn following this message > >> > >> > >> As the message in the DUMP following is > >> > >> PRIMARY NOT EQUAL TO HOME > >> > >> > >> But now I am convinced that its IEAVPST that is going cross memory > >> that > >> causing this message the ECB looks okay so does the ASCB > >> > >> Below is the code that I use to post the Address Space the address > >> for the > >> ASCB and ECB seem to be valid > >> > >> > >> I wrote a 2 small programs to test this out and it worked > >> > >> If anybody has any hints I would be very grateful > >> > >> L R6,MYASCB > >> LA R7,MYECB > >> > >> > >> POST (R7), ECB > >> ASCB=(R6), ASCB > >> LINKAGE=SYSTEM, > >> ECBKEY=8, > >> ERRET=CONT ERROR RTN > >> > >> CONT DS 0H > >> > >> --- > >> ------------------------------------------------------------------- > >> For IBM-MAIN subscribe / signoff / archive access instructions, > >> send email to [email protected] with the message: GET IBM-MAIN > >> INFO > >> Search the archives at http://bama.ua.edu/archives/ibm-main.html > >> > >> > >> > > > > -- > > Miklos Szigetvari > > > > Development Team > > ISIS Information Systems Gmbh tel: (+43) 2236 27551 570 > > Fax: (+43) 2236 21081 > > E-mail: [email protected] > > Info: [email protected] Hotline: +43-2236-27551-111 > > Visit our Website: http://www.isis-papyrus.com > > --------------------------------------------------------------- > > This e-mail is only intended for the recipient and not legally > > binding. Unauthorised use, publication, reproduction or > > disclosure of the content of this e-mail is not permitted. > > This email has been checked for known viruses, but ISIS accepts > > no responsibility for malicious or inappropriate content. > > --------------------------------------------------------------- > > ---------------------------------------------------------------------- > > For IBM-MAIN subscribe / signoff / archive access instructions, > > send email to [email protected] with the message: GET IBM-MAIN INFO > > Search the archives at http://bama.ua.edu/archives/ibm-main.html > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to [email protected] with the message: GET IBM-MAIN INFO > Search the archives at http://bama.ua.edu/archives/ibm-main.html ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
