where is getmain for storage? where are csect & dsect boundaries?
where do you relocate the address in MF=L? you might send this to IBM Mainframe Assembler List <[email protected]> for quicker results pup IBM Mainframe Discussion List <[email protected]> wrote on 01/22/2014 11:57:48 AM: > From: MichealButz <[email protected]> > 3 STEP_LIB DS 0H > > 4 MVC STEPLIB(DCBLNGPO),STEPLIBX > > 5 LA R8,STEPLIB > > 6 OPEN ((R8)),MODE=31,MF=(E,OPEN_LIST) > > 9+* > > 0+* > > 2+ LA 1,OPEN_LIST > > 3+ ST R8,0+4(,1) Store DCB > > 4+ LR 0,1 Set param > > 5+ SR 1,1 Set indic > > 6+ SVC 19 Issue OPE > > > > > > 8 STEPLIBX DCB DDNAME=STEPLIB,RECFM=U,DSORG=PO,MACRF=R > > 1+* DATA CONTROL BLOCK > > 2+* > > OPEN_LIST OPEN STEPLIB,MODE=31,MF=L > > > > +OPEN_LIST DC 0F'0' > > + DC AL1(128) > > + DC AL3(0) > > + DC A(STEPLIB) > > > > > STEPLIB DS CL(DCBLNGPO) > > > > > > > > IEC130I " 0 " 0 DD STATEMENT MISSING > > IEC999I IGC0001I,IBMUSER,ISPFPROC > > IEA995I SYMPTOM DUMP OUTPUT > > SYSTEM COMPLETION CODE=0C4 REASON CODE=00000004 > > TIME=06.49.52 SEQ=00027 CPU=0000 ASID=0040 > > PSW AT TIME OF ERROR 078C2000 80E19EAA ILC 2 INTC 04 > > NO ACTIVE MODULE FOUND > > NAME=UNKNOWN > > DATA AT PSW 00E19EA4 - 42421831 0E02B20A 0050A7F4 ----------------------------------------- The information contained in this communication (including any attachments hereto) is confidential and is intended solely for the personal and confidential use of the individual or entity to whom it is addressed. If the reader of this message is not the intended recipient or an agent responsible for delivering it to the intended recipient, you are hereby notified that you have received this communication in error and that any review, dissemination, copying, or unauthorized use of this information, or the taking of any action in reliance on the contents of this information is strictly prohibited. If you have received this communication in error, please notify us immediately by e-mail, and delete the original message. Thank you ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
