>From the CSVDYNEX doc :

"MODADDR specifies a fullword (or a register containing the address of a 
fullword) that contains the address of the exit routine to be added."

I suggest you code "MODADDR=LLA_EXIT" in your CSVDYNEX macro specification.

Rob Scott
Lead Developer
Rocket Software
77 Fourth Avenue . Suite 100 . Waltham . MA 02451-1468 . USA
Tel: +1.781.684.2305
Email: rsc...@rs.com
Web: www.rocketsoftware.com


-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of MichealButz
Sent: 08 January 2014 16:46
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Error Adding CSVLLIX1 using CSVDYNEX with modaddr paramter

Hi,

 

I am getting the following return code when try to add CSVLLIX1 with the moaddr 
parameter of CSVDYNEX

The AMODE of the program is correct = 31 As The high order bit of the address 
is one

With the dsname parameter I get a RC of 0                       R15 = 8 , R0
= 827 

Below is my code 

 

*  Add LLA exit CSVLLIX1 in case module is LLA MA

*                                                

          LOAD EP=CSVLLIX1                        

          ST   R0,LLA_EXIT                        

          L     R9,PSAAOLD-PSA(,R0)               

 ZZ       USING ASCB,R9                           

          ICM   R8,B'1111',ZZ.ASCBJBNI            

          BZ    STARTTSK                          

          MVC   JOB_NAME,0(R8)                    

          B     PRIME_JOB                         

 STARTTSK DS    0H                                

          ICM   R8,B'1111',ZZ.ASCBJBNS            

          MVC   JOB_NAME,0(R8)                    

 PRIME_JOB DS   0H                                

          LA    R8,JOB_NAME                       

 *                                                

          L     R10,LLA_EXIT                      

          CSVDYNEX REQUEST=ADD,                   

                EXITNAME=CSVLLIX1,                

                STATE=ACTIVE,                     

                MODNAME=CSVLLIX1,                 

                MODADDR=(R10),                    

                JOBNAME=(R8),                     

                POS=FIRST,                        

                RETCODE=RETCODE,                  

                RSNCODE=RSNCODE,MF=(E,DYN_PARM)   

 

Program defination

 

    Name     Prompt         Alias-of      Size       TTR      AC    AM
RM   

 . CSVLLIX1                             00000060    00480B    01     31
ANY  

 

 

 

R15 = 08          

               

  R0 = xxxx0827     

           

              

              

  CSVDYNEXRSNBADAMODE                       

                                           

 Meaning: Program error. For an ADD,       

 MODIFY, or REPLACE request: one of the    

 following occurred:                       

                                           

 °   An exit routine with AMODE=31 is      

     being added to an exit that requires  

     that its exit routines have AMODE=24. 

                                           

 °   An exit routine with AMODE=24 is      

     being added to an exit that requires  

     that its exit routines have AMODE=31. 

                                           

 Action: Make sure the AMODE attributes of 

 the exit routine to be added conform to   

 the exit definition.                    

 

 

2.5.3 Exit Routine Environment

 

 

CSVLLIX1 receives control in the following environment: 

 

 

. Enabled for interrupts. 

 

 

. In supervisor state and in primary ASC mode with the primary ASID equal to 
the home ASID. 

 

 

. In AMODE 31 and RMODE ANY. 

 

 

. Under a content supervisor's SVRB within the user's address space. 

 

 

. With no locks or ENQs held. 

 

 

. Under any task that might issue a LINK, LOAD, XCTL, or ATTACH macro. 

 

 

 

Subtopics:

 

 


----------------------------------------------------------------------
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

Reply via email to