Re: Abend entry LE Assembler Has to so with :> " WHILE RUNNING PROGRAM EQA10OSM WHICH STARTS AT 0002E138"

[Doug Henry]

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"

[Joseph Reichman]

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"

[Doug Henry]

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: Abend entry LE Assembler Has to so with :> " WHILE RUNNING PROGRAM EQA10OSM WHICH STARTS AT 0002E138"

[Joseph Reichman]

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  on
behalf of Joseph Reichman 
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  On
Behalf Of Don Poitras
Sent: Thursday, July 18, 2019 12:57 PM
To: mailto:IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Abend entry LE Assembler

In your link-edit, what did you set the entry point to? You were