Executer une mise à jour (BIND) du plan

Cet commande est utilisée pour pour actualiser les chemins d'accés
de l'optimiseur.
 
DSN SYSTEM(xxxx)                                               
BIND PLAN (xxx) PKLIST(xxx.*) +                        
     OWNER(xxx) ENABLE(CICS) CICS(xxx) +                  
     VALIDATE(BIND) ISOLATION(CS) ACQUIRE(USE) +               
     RELEASE(COMMIT) EXPLAIN(NO) ACTION(REPLACE) RETAIN        
END                                                            

 
Exemple de JCL :

//QZ0302  JOB ,'DB2',CLASS=C,MSGCLASS=X,MSGLEVEL=(1,1),TIME=1440
//JOBLIB  DD DSN=DSN410.SDSNLOAD,DISP=SHR
//        DD DSN=DSN410.RUNLIB.LOAD,DISP=SHR
//        DD DSN=SYS1.PLI.V2R3M0.SIBMLINK,DISP=SHR
//        DD DSN=SYS1.PLI.V2R3M0.PLILINK,DISP=SHR
//* ------------------------------------------------------------ **/
//* - BIND DU PLAN
//* ------------------------------------------------------------ **/
//QZ030201 EXEC PGM=IKJEFT01,DYNAMNBR=45,REGION=0M
//STEPLIB  DD  DSN=ISR.V3R3M0.ISRLOAD,DISP=SHR                          
//         DD  DSN=ISP.V3R3M0.ISPLOAD,DISP=SHR                          
//         DD  DISP=SHR,DSN=DSN410.SDSNLOAD
//SYSPROC  DD  DSN=UGAP.UGAP.CLIB,DISP=SHR                              
//         DD  DSN=MDI.UGAP.CLIB,DISP=SHR                               
//DBRMLIB  DD DSN=PROD.DB2.DBRMLIB,DISP=OLD
//SYSTSPRT DD  SYSOUT=*                                                 
//SYSPRINT DD  SYSOUT=1                                                
//ISPLOG   DD  SYSOUT=*,DCB=(LRECL=121,BLKSIZE=1210,RECFM=FB)           
//SYSTSIN  DD  *                                                        
CONTROL MSG NOLIST
DSN SYSTEM(DB2P)
BIND PLAN (RPPSM00) PKLIST(RCPSM00.*) +
     OWNER(PROD) ENABLE(CICS) CICS(CICSPRO) +
     VALIDATE(BIND) ISOLATION(CS) ACQUIRE(USE) +
     RELEASE(COMMIT) EXPLAIN(NO) ACTION(REPLACE) RETAIN
END
//* ------------------------------------------------------------ **/