Re: EQA10OSM
I don’t know what debug tool is on the 2.3 ADCD But it had become apparent that it doesn’t work > On Jul 24, 2019, at 7:06 PM, Jesse 1 Robinson wrote: > > This thread has begotten and promulgated some misnomers, 'TLIB' being > prominent. That word is *not* shorthand for 'TARGET LIB'. Unfortunately > TARGET has no nickname. DLIB is short for 'DISTRIBUTION LIBRARY', but 'TLIB' > is not short for TARGET. To quote from the doc: > > "SMPTLIB data sets (TLIBs) are used as temporary storage for relative files > that are loaded from SMPPTFIN during RECEIVE processing." > > . > . > J.O.Skip Robinson > Southern California Edison Company > Electric Dragon Team Paddler > SHARE MVS Program Co-Manager > 323-715-0595 Mobile > 626-543-6132 Office ⇐=== NEW > robin...@sce.com > > -Original Message- > From: IBM Mainframe Discussion List On Behalf Of > Ed Jaffe > Sent: Friday, July 19, 2019 9:07 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: (External):Re: EQA10OSM > >> On 7/18/2019 8:25 PM, Lizette Koehler wrote: >> Just by looking at the dataset names. >> >> Typically the AEQAMOD should be a DLIB dataset The SEQAMOD would be >> your TLIB. >> >> TLIBs would go into your live environment >> >> DLIB would only be used when an SMP/e ACCEPT is done. >> > When did target libraries start being called TLIBs? > > ISTR TLIBs used to be the "temporary" libraries that were built on the > SMPTLIB volume when unloading the RELFILEs during RECEIVE processing. > > APPLY would copy/assemble/link the TLIB content to the target libraries. > > ACCEPT would then a) copy/assemble/link the TLIB content to the distribution > libraries (aka DLIBs) and b) delete the TLIBs and update the global zone. > > > -- > Phoenix Software International > Edward E. Jaffe > 831 Parkview Drive North > El Segundo, CA 90245 > https://www.phoenixsoftware.com/ > > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: EQA10OSM
This thread has begotten and promulgated some misnomers, 'TLIB' being prominent. That word is *not* shorthand for 'TARGET LIB'. Unfortunately TARGET has no nickname. DLIB is short for 'DISTRIBUTION LIBRARY', but 'TLIB' is not short for TARGET. To quote from the doc: "SMPTLIB data sets (TLIBs) are used as temporary storage for relative files that are loaded from SMPPTFIN during RECEIVE processing." . . J.O.Skip Robinson Southern California Edison Company Electric Dragon Team Paddler SHARE MVS Program Co-Manager 323-715-0595 Mobile 626-543-6132 Office ⇐=== NEW robin...@sce.com -Original Message- From: IBM Mainframe Discussion List On Behalf Of Ed Jaffe Sent: Friday, July 19, 2019 9:07 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: (External):Re: EQA10OSM On 7/18/2019 8:25 PM, Lizette Koehler wrote: > Just by looking at the dataset names. > > Typically the AEQAMOD should be a DLIB dataset The SEQAMOD would be > your TLIB. > > TLIBs would go into your live environment > > DLIB would only be used when an SMP/e ACCEPT is done. > When did target libraries start being called TLIBs? ISTR TLIBs used to be the "temporary" libraries that were built on the SMPTLIB volume when unloading the RELFILEs during RECEIVE processing. APPLY would copy/assemble/link the TLIB content to the target libraries. ACCEPT would then a) copy/assemble/link the TLIB content to the distribution libraries (aka DLIBs) and b) delete the TLIBs and update the global zone. -- Phoenix Software International Edward E. Jaffe 831 Parkview Drive North El Segundo, CA 90245 https://www.phoenixsoftware.com/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Abend entry LE Assembler Has to so with :> " WHILE RUNNING PROGRAM EQA10OSM WHICH STARTS AT 0002E138"
In our linklst we have SEQABMOD and SEQAMOD. In our lpa we have SEQALPA. In our APF list we have SEQAAUTH, SEQABMOD, and SEQAMOD. Doug On Fri, 19 Jul 2019 14:22:26 -0400, Joseph Reichman wrote: >I think there are 4 load libraries of type >Hlq.SEQA that need to be in the linklist/APF > >I may have missed one > >Thanks > > > > >> On Jul 19, 2019, at 2:19 PM, Doug Henry >> <012e22efeed4-dmarc-requ...@listserv.ua.edu> wrote: >> >> Language Environment requires some definitions to be preloaded, such as the >> event handlers for Language Environment, which are named CEEEVnnn. CEEEV006 >> for Debug Tool. >> >> Doug >> >>> On Thu, 18 Jul 2019 17:47:06 -0400, Joseph Reichman >>> wrote: >>> >>> This module is a CSECT in seems to be a LE module in debug tool library >>> would anyone know significance of this >>> thanks >>> ---- >>> --- >>> BROWSEEQAE10.SEQAMOD(CEEEV006) Li CHARS 'EQA10OSM' >> >> -- >> For IBM-MAIN subscribe / signoff / archive access instructions, >> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > >-- >For IBM-MAIN subscribe / signoff / archive access instructions, >send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Abend entry LE Assembler Has to so with :> " WHILE RUNNING PROGRAM EQA10OSM WHICH STARTS AT 0002E138"
I think there are 4 load libraries of type Hlq.SEQA that need to be in the linklist/APF I may have missed one Thanks > On Jul 19, 2019, at 2:19 PM, Doug Henry > <012e22efeed4-dmarc-requ...@listserv.ua.edu> wrote: > > Language Environment requires some definitions to be preloaded, such as the > event handlers for Language Environment, which are named CEEEVnnn. CEEEV006 > for Debug Tool. > > Doug > >> On Thu, 18 Jul 2019 17:47:06 -0400, Joseph Reichman >> wrote: >> >> This module is a CSECT in seems to be a LE module in debug tool library >> would anyone know significance of this >> thanks >> ---- >> --- >> BROWSEEQAE10.SEQAMOD(CEEEV006) Li CHARS 'EQA10OSM' > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Abend entry LE Assembler Has to so with :> " WHILE RUNNING PROGRAM EQA10OSM WHICH STARTS AT 0002E138"
Language Environment requires some definitions to be preloaded, such as the event handlers for Language Environment, which are named CEEEVnnn. CEEEV006 for Debug Tool. Doug On Thu, 18 Jul 2019 17:47:06 -0400, Joseph Reichman wrote: >This module is a CSECT in seems to be a LE module in debug tool library >would anyone know significance of this >thanks > >--- > BROWSEEQAE10.SEQAMOD(CEEEV006) Li CHARS 'EQA10OSM' -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: EQA10OSM
On 7/18/2019 8:25 PM, Lizette Koehler wrote: Just by looking at the dataset names. Typically the AEQAMOD should be a DLIB dataset The SEQAMOD would be your TLIB. TLIBs would go into your live environment DLIB would only be used when an SMP/e ACCEPT is done. When did target libraries start being called TLIBs? ISTR TLIBs used to be the "temporary" libraries that were built on the SMPTLIB volume when unloading the RELFILEs during RECEIVE processing. APPLY would copy/assemble/link the TLIB content to the target libraries. ACCEPT would then a) copy/assemble/link the TLIB content to the distribution libraries (aka DLIBs) and b) delete the TLIBs and update the global zone. -- Phoenix Software International Edward E. Jaffe 831 Parkview Drive North El Segundo, CA 90245 https://www.phoenixsoftware.com/ This e-mail message, including any attachments, appended messages and the information contained therein, is for the sole use of the intended recipient(s). If you are not an intended recipient or have otherwise received this email message in error, any use, dissemination, distribution, review, storage or copying of this e-mail message and the information contained therein is strictly prohibited. If you are not an intended recipient, please contact the sender by reply e-mail and destroy all copies of this email message and do not otherwise utilize or retain this email message or any or all of the information contained therein. Although this email message and any attachments or appended messages are believed to be free of any virus or other defect that might affect any computer system into which it is received and opened, it is the responsibility of the recipient to ensure that it is virus free and no responsibility is accepted by the sender for any loss or damage arising in any way from its opening or use. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: EQA10OSM
On Thu, 18 Jul 2019 20:25:42 -0700, Lizette Koehler wrote: >TLIBs would go into your live environment ITYM target libraries. TLIB means something different: SMPTLIB. -- Tom Marchant -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: EQA10OSM
Thanks I know someone who is a sysprog And knows as SMP/e As I am a developer I’ll ask him for help Thanks > On Jul 19, 2019, at 7:59 AM, David Spiegel wrote: > > ACCEPT or RESTORE. > >> On 2019-07-18 23:25, Lizette Koehler wrote: >> Just by looking at the dataset names. >> >> Typically the AEQAMOD should be a DLIB dataset >> The SEQAMOD would be your TLIB. >> >> TLIBs would go into your live environment >> >> DLIB would only be used when an SMP/e ACCEPT is done. >> >> Lizette >> >> >>> -Original Message- >>> From: IBM Mainframe Discussion List On Behalf Of >>> Joseph Reichman >>> Sent: Thursday, July 18, 2019 6:26 PM >>> To: IBM-MAIN@LISTSERV.UA.EDU >>> Subject: EQA10OSM >>> >>> Hi >>> >>> Does any know the significance of this debug tool module with regards to >>> initializing a LE Assembler main program the BALR to CEEINIT is aborting in >>> this module PSW 02 it’s comes from a base just googling seems like I >>> don’t have the right version which doesn’t make sense Have the SVC’s >>> installed SEQAMOD SEQAMMOD >>> >>> In fact there seems to be 2 versions of the program one in SEQAMOD and in >>> AEQAMOD if different sizes >>> -- >>> For IBM-MAIN subscribe / signoff / archive access instructions, send email >>> to >>> lists...@listserv.ua.edu with the message: INFO IBM-MAIN >> -- >> For IBM-MAIN subscribe / signoff / archive access instructions, >> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN >> . >> > > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: EQA10OSM
My understanding is you only need the TLIBs available to your process. This may mean you put the TLIBs in the LINKLST, LPA List, Steplib etc... You would need the installation instructions to know where the TLIBs are to be placed. You would not include an DLIBs in the system. They are only for accept or restore. Lizette > -Original Message- > From: IBM Mainframe Discussion List On Behalf Of > Joseph Reichman > Sent: Friday, July 19, 2019 5:05 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: EQA10OSM > > I have the 2.3 ADCD it thought I could the Debug tool libraries in the APF > list and have the SVC’s installed to have debug tool running > > It’s seems I have to run SMP/E correct ? > > > > > > > On Jul 19, 2019, at 7:59 AM, David Spiegel wrote: > > > > ACCEPT or RESTORE. > > > >> On 2019-07-18 23:25, Lizette Koehler wrote: > >> Just by looking at the dataset names. > >> > >> Typically the AEQAMOD should be a DLIB dataset The SEQAMOD would be > >> your TLIB. > >> > >> TLIBs would go into your live environment > >> > >> DLIB would only be used when an SMP/e ACCEPT is done. > >> > >> Lizette > >> > >> > >>> -Original Message- > >>> From: IBM Mainframe Discussion List On > >>> Behalf Of Joseph Reichman > >>> Sent: Thursday, July 18, 2019 6:26 PM > >>> To: IBM-MAIN@LISTSERV.UA.EDU > >>> Subject: EQA10OSM > >>> > >>> Hi > >>> > >>> Does any know the significance of this debug tool module with > >>> regards to initializing a LE Assembler main program the BALR to > >>> CEEINIT is aborting in this module PSW 02 it’s comes from a base > >>> just googling seems like I don’t have the right version which > >>> doesn’t make sense Have the SVC’s installed SEQAMOD SEQAMMOD > >>> > >>> In fact there seems to be 2 versions of the program one in SEQAMOD > >>> and in AEQAMOD if different sizes > >>> > >>> -- For IBM-MAIN subscribe / signoff / archive access instructions, > >>> send email to lists...@listserv.ua.edu with the message: INFO > >>> IBM-MAIN > >> - > >> - For IBM-MAIN subscribe / signoff / archive access instructions, > >> send email to lists...@listserv.ua.edu with the message: INFO > >> IBM-MAIN . > > > > > > -- > > For IBM-MAIN subscribe / signoff / archive access instructions, send > > email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, send email to > lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: EQA10OSM
I have the 2.3 ADCD it thought I could the Debug tool libraries in the APF list and have the SVC’s installed to have debug tool running It’s seems I have to run SMP/E correct ? > On Jul 19, 2019, at 7:59 AM, David Spiegel wrote: > > ACCEPT or RESTORE. > >> On 2019-07-18 23:25, Lizette Koehler wrote: >> Just by looking at the dataset names. >> >> Typically the AEQAMOD should be a DLIB dataset >> The SEQAMOD would be your TLIB. >> >> TLIBs would go into your live environment >> >> DLIB would only be used when an SMP/e ACCEPT is done. >> >> Lizette >> >> >>> -Original Message- >>> From: IBM Mainframe Discussion List On Behalf Of >>> Joseph Reichman >>> Sent: Thursday, July 18, 2019 6:26 PM >>> To: IBM-MAIN@LISTSERV.UA.EDU >>> Subject: EQA10OSM >>> >>> Hi >>> >>> Does any know the significance of this debug tool module with regards to >>> initializing a LE Assembler main program the BALR to CEEINIT is aborting in >>> this module PSW 02 it’s comes from a base just googling seems like I >>> don’t have the right version which doesn’t make sense Have the SVC’s >>> installed SEQAMOD SEQAMMOD >>> >>> In fact there seems to be 2 versions of the program one in SEQAMOD and in >>> AEQAMOD if different sizes >>> -- >>> For IBM-MAIN subscribe / signoff / archive access instructions, send email >>> to >>> lists...@listserv.ua.edu with the message: INFO IBM-MAIN >> -- >> For IBM-MAIN subscribe / signoff / archive access instructions, >> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN >> . > > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: EQA10OSM
ACCEPT or RESTORE. On 2019-07-18 23:25, Lizette Koehler wrote: > Just by looking at the dataset names. > > Typically the AEQAMOD should be a DLIB dataset > The SEQAMOD would be your TLIB. > > TLIBs would go into your live environment > > DLIB would only be used when an SMP/e ACCEPT is done. > > Lizette > > >> -Original Message- >> From: IBM Mainframe Discussion List On Behalf Of >> Joseph Reichman >> Sent: Thursday, July 18, 2019 6:26 PM >> To: IBM-MAIN@LISTSERV.UA.EDU >> Subject: EQA10OSM >> >> Hi >> >> Does any know the significance of this debug tool module with regards to >> initializing a LE Assembler main program the BALR to CEEINIT is aborting in >> this module PSW 02 it’s comes from a base just googling seems like I >> don’t have the right version which doesn’t make sense Have the SVC’s >> installed SEQAMOD SEQAMMOD >> >> In fact there seems to be 2 versions of the program one in SEQAMOD and in >> AEQAMOD if different sizes >> -- >> For IBM-MAIN subscribe / signoff / archive access instructions, send email to >> lists...@listserv.ua.edu with the message: INFO IBM-MAIN > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > . > -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: EQA10OSM
I didn’t use SMPT/E as I have The ADCD I just moved 3 datasets to a APF library And linklist does this mean I’m going to have to > On Jul 18, 2019, at 11:25 PM, Lizette Koehler wrote: > > Just by looking at the dataset names. > > Typically the AEQAMOD should be a DLIB dataset > The SEQAMOD would be your TLIB. > > TLIBs would go into your live environment > > DLIB would only be used when an SMP/e ACCEPT is done. > > Lizette > > >> -Original Message- >> From: IBM Mainframe Discussion List On Behalf Of >> Joseph Reichman >> Sent: Thursday, July 18, 2019 6:26 PM >> To: IBM-MAIN@LISTSERV.UA.EDU >> Subject: EQA10OSM >> >> Hi >> >> Does any know the significance of this debug tool module with regards to >> initializing a LE Assembler main program the BALR to CEEINIT is aborting in >> this module PSW 02 it’s comes from a base just googling seems like I >> don’t have the right version which doesn’t make sense Have the SVC’s >> installed SEQAMOD SEQAMMOD >> >> In fact there seems to be 2 versions of the program one in SEQAMOD and in >> AEQAMOD if different sizes >> -- >> For IBM-MAIN subscribe / signoff / archive access instructions, send email to >> lists...@listserv.ua.edu with the message: INFO IBM-MAIN > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: EQA10OSM
Just by looking at the dataset names. Typically the AEQAMOD should be a DLIB dataset The SEQAMOD would be your TLIB. TLIBs would go into your live environment DLIB would only be used when an SMP/e ACCEPT is done. Lizette > -Original Message- > From: IBM Mainframe Discussion List On Behalf Of > Joseph Reichman > Sent: Thursday, July 18, 2019 6:26 PM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: EQA10OSM > > Hi > > Does any know the significance of this debug tool module with regards to > initializing a LE Assembler main program the BALR to CEEINIT is aborting in > this module PSW 02 it’s comes from a base just googling seems like I > don’t have the right version which doesn’t make sense Have the SVC’s > installed SEQAMOD SEQAMMOD > > In fact there seems to be 2 versions of the program one in SEQAMOD and in > AEQAMOD if different sizes > -- > For IBM-MAIN subscribe / signoff / archive access instructions, send email to > lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
EQA10OSM
Hi Does any know the significance of this debug tool module with regards to initializing a LE Assembler main program the BALR to CEEINIT is aborting in this module PSW 02 it’s comes from a base just googling seems like I don’t have the right version which doesn’t make sense Have the SVC’s installed SEQAMOD SEQAMMOD In fact there seems to be 2 versions of the program one in SEQAMOD and in AEQAMOD if different sizes -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Abend entry LE Assembler Has to so with :> " WHILE RUNNING PROGRAM EQA10OSM WHICH STARTS AT 0002E138"
I installed the TWO Debug tool SVC in Addition to putting the following libraries EQAE10.SEQABMOD IN APF library and link list I have this library in the TSOLIB of my clist This module is a CSECT in seems to be a LE module in debug tool library would anyone know significance of this thanks --- BROWSEEQAE10.SEQAMOD(CEEEV006) Li CHARS 'EQA10OSM' found Command ===> Scroll ===> CSR * Top of Data ** xY...WxM...W.Ú;0¬Q.>..xà..à0¬>.. -&.x4..xÇ...ÄxM...Ä.W;\¬Q.Óxà..à\¬>.. -&..Ä.Áx8 0OHTDXC10OSMEQA00OSXEQA10OSM-..üØ.ç.Ø... Ø.ÜQ ..×? .xd...Îx4...Ì.ÏxÈ..×Õ}Hxd..×|S4xd..×? .xd...Î.Ïxd..×|#Ìxd..×? .xd..K.-.¨©&µ Jçì .J ì-&.ì0-..Õ.7 .¬..Õx4...7 .¬*.Õ.Dx4."xV.¡x4.#ì...xì..&&..ì-..P.-.-.ì .. -Original Message- From: IBM Mainframe Discussion List On Behalf Of Seymour J Metz Sent: Thursday, July 18, 2019 3:21 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Abend entry LE Assembler Try adding ENTRY TESTPRGE -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List <mailto:IBM-MAIN@LISTSERV.UA.EDU> on behalf of Joseph Reichman <mailto:reichman...@gmail.com> Sent: Thursday, July 18, 2019 1:04 PM To: mailto:IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Abend entry LE Assembler This is the whole Job I ran TESTPRGD under test and Made a break point at the BALR to CEEINIT expansion from CEEENTRY your edit profile using the command RECOVERY ON. //IBMUSER$ JOB 'ADCD V2R9','SYSPROG',NOTIFY=,REGION=0M //* //STEP0100 EXEC PGM=ASMA90,PARM='OBJECT,ADATA,LIST(133),GOFF(ADATA)' //SYSLIB DD DISP=SHR,DSN=SYS1.MACLIB // DD DISP=SHR,DSN=CEE.SCEEMAC //SYSUT1 DD UNIT=SYSDA,SPACE=(1700,(600,100)) //SYSUT2 DD UNIT=SYSDA,SPACE=(1700,(600,100)) //SYSUT3 DD UNIT=SYSDA,SPACE=(1700,(600,100)) //SYSADATA DD DSN=&,DISP=(,PASS),SPACE=(CYL,(1,1),RLSE) //SYSPRINT DD DSN=IBMUSER.TEST.SYSPRINT(TESTPRGD),DISP=SHR //SYSLIN DD DSN=&(TESTPRGD),DISP=(,PASS), //UNIT=SYSDA,SPACE=(80,(200,50,1)) //SYSINDD * TESTPRGD CSECT TESTPRGD AMODE 31 TESTPRGD RMODE ANY ** *TEST PROGRAM TO CALL C/C++ DLL * ** YREGS STMR14,R12,12(R13) LR R3,R15 USING TESTPRGD,R3 LR R14,R13 LA R13,SAVEAREA ST R14,SAVEAREA+4 ST R13,8(,R14) *ESTAE RECOVERY L R15,A1C401B BALR R14,R15 L R13,4(,R13) LM R14,R12,12(R13) XR R15,R15 BR R14 RECOVERY DS 0D DC X'0700' SAVEAREA DS 18F A1C401B DC V(TESTPRGE) LTORG TESTPRGE CEEENTRY PPA=DLLPPA,MAIN=YES,AUTO=WORKSIZE *LOADEP=CEETEST *LA R1,PARM *LR R15,R0 *BASRR14,R15 CEEPCALL opendata,MF=(E,) XR R15,R15 CEETERM RC=(R15) *CEEPDDA OPENDATA,SCOPE=IMPORT *ARM1DC A(STRING) *ARM DC A(FEEDBACK) *TRING DS 0H *DC H'8' *DC C'AT ENTRY' *EEDBACK DS CL12 DLLPPA CEEPPA WORKAREA DSECT ORG *+CEEDSASZ LEAVE SPACE FOR THE DSA FIXED PART DS 0D WORKSIZE EQU *-WORKAREA CEEDSA MAPPING OF THE DYNAMIC SAVE AREA CEECAA MAPPING OF THE COMMON ANCHOR AREA CEEEDB MAPPING OF THE ENCLAVE DATA BLOCK END /* //* //* LINK EDIT THE PROGRAM * //* //STEP0200 EXEC PGM=IEWL,COND=(0,LT,STEP0100), // PARM='AMODE(31),LIST,MAP,XREF,CASE=MIXED' //SYSPRINT DD SYSOUT=* //SYSDEFSD DD SYSOUT=* //OBJ DD DSN=&,DISP=(OLD,PASS) //SYSDEFSD DD SYSOUT=* //OBJ DD DSN=&,DISP=(OLD,PASS) //SYSLIB DD DISP=SHR,DSN=IBMUSER.DBGR.DLLLIB // DD DISP=SHR,DSN=CEE.SCEELKED //SYSLMOD DD DISP=SHR,DSN=IBMUSER.DBGR.DLLLIB //SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(3,2)),DSN= //SYSPRINT DD SYSOUT=*,DCB=(RECFM=FB,BLKSIZE=3509) //SYSLIN DD * IMPORT CODE,SYSADATA,opendata INCLUDE OBJ(TESTPRGD) INCLUDE SYSLIB(SYSADATA) ENTRY TESTPRGD NAME TESTPRGD(R) /* // -Original Message- From: IBM Mainframe Discussion List <mailto:IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of Don Poitras Sent: Thursday, July 18, 2019 12:57 PM To: mailto:IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Abend entry