Hi 

 

I copied the example from the LE guide for 64 bit Virtual Storage Addressing
with the exception of zeroing service rtn address and go a return code X'20'
32

 

                                  

       CALL  (15),                

             (INIT_MAIN,          

             CEEXPTBL_ADDR,       

             0,                   

             TOKEN),              

             MF=(E,CALL_PL)       

 

CEEXPTBL_ADDR DC       AD(CEEXPTBL)  Address of PIPI table

 

*                                                              

CEEXPTBL      CELQPIT  ,             Start of CELQPIPI table   

              CELQPITY CEEWQPMA,0    Dynamically load CEEEQPMA 

              CELQPITS ,             End of CELQPIPI table     

*                                                              

 

CEEWQPMA is the C program it resides in my PDSE LIBRARY         


----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to