Hello
.
.
Can anyone add some additional information regarding IEAARR.
I am trying to clean up an existing Associated Recovery Routine,
by first using IEAARR to drive a Target Routine that is designed to
Abend and drive the Associated Recovery Routine.
.
This works well .. I have No issues with IEAARR, and no issues with the ARR.
.
I have provided my IEAARR and its expansion.
.
IEAARR DYNSTORAGE=AVAIL,     
      ARRPTR=ARRRTN@,        
      ARRPARAMPTR=ARRPARMS@, 
      PARAMPTR=TARGPARMS@,   
      TARGETPTR=TARGETRTN@,  
      TARGETSTATE=PROB       
.
400+M00M0011 DS    0H                             IEAARR-0          
401+              PUSH  PRINT                                       
402+                   PRINT ON                                     
403+         L     1,ARRRTN@               Pass ARR address         
404+         L     0,ARRPARMS@             Pass ARRPARAM address    
405+         L     14,TARGPARMS@           Get parameter address    
406+         SAR   0,14                    Pass parameter address   
407+         L     15,TARGETRTN@           Pass target address      
408+         L     14,16(0,0)              GET CVT ADDRESS          
409+         L     14,772(14,0)            GET SFT ADDRESS          
410+         L     14,500(14,0)            GET LX/EX FOR SERVICE RTN
411+         PC    0(14)                                            
412+         POP   PRINT                                            
413+*                                            IEAARR-0 
.
.
My understanding is the Expansion of IEAARR issues a Program Call (PC) to the
IEAARR service. Register 15 contains the address of the Target Routine.
.
Does the PC routine (IEAARR) simply branch to the Target Routine (R15) making 
it 
an extension of the IEAARR PC Service Routine? 
.
Is the Target Routine Attached as a separate Task ?
.
Can anyone add some details as to how IBM architected this..
.
.
 Paul 
.
.
.           
----------------------------------------------------------------------
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