Skip to main content

Exit driver example

Following is an example of a simple exit driver:

ICHPWX01 #SETUP                   Perform exit driver setup
         #XITRTN NAME=PWXIT001    Execute the PWXIT001 exit
         #XITRTN NAME=PWXIT002,COND=8  Execute the PWXIT002 exit
*                                 routine if PWXIT001 return code
*                                 was 8 or less
         #XITRTN NAME=PSNCPWX1,COND=0  Execute the PSNCPWX1 exit rtn
*                                 if no previous exit had a return
*                                 code greater than 0
         L     R15,HIGHRC         Load the max return code
         #TERM RC=(R15)           Return to the security product
         END