#BEGINBUCKET XXCOPYOUT
#/ -------------------------------------------------
#BEGINDEFS
#/ -------------------------------------------------
#/EXCEPTIONFORMISSINGSYMBOL
#TABLECALL <MVSDSDATATABLE> KEY:MVS2BDSCODE
#/ -------------------------------------------------
#BEGINSTATICINSTANCES
#/ ------------------------------------------------------------------
#STATICINSTANCE 
#/ -------------------------------------------------
#BEGININSTANCEQUALIFIERS
#/ -------------------------------------------------
#/ This doesn't apply for instances
#/ -------------------------------------------------
#BEGINPREFIX 
#/ -------------------------------------------------
//COPYOUT  EXEC PGM=IEBCOPY,COND=(4,LT)                  
//SYSPRINT DD SYSOUT=[SYSOUT]                                   
//SYSUT3   DD UNIT=SYSDA,SPACE=(TRK,(1,1))               
//SYSUT4   DD UNIT=SYSDA,SPACE=(TRK,(1,1))               
//DDIN     DD DSN=[CNTLDSN],DISP=SHR   
//DDINXF   DD DSN=[CUSTPRODQUAL].[XF:LOQUAL], 
//      DISP=SHR                                         
//DDOTRX  DD DSN=[CUSTPRODQUAL][STAGEQUAL].[RX:LOQUAL],          
//      DISP=(OLD,KEEP)                                  
//DDOTXF  DD DSN=[CUSTPRODQUAL][STAGEQUAL].[XF:LOQUAL],
//      DISP=(OLD,KEEP)                                  
//DDOTBZ  DD DSN=[CUSTPRODQUAL][STAGEQUAL].[BZ:LOQUAL],   
//      DISP=(OLD,KEEP)
//DDOTRC  DD DSN=[CUSTPRODQUAL][STAGEQUAL].[RC:LOQUAL],       
//      DISP=(OLD,KEEP)                 
//DDOTXC  DD DSN=[CUSTPRODQUAL][STAGEQUAL].[XC:LOQUAL],
//      DISP=(OLD,KEEP)
//DDOTXP  DD DSN=[CUSTPRODQUAL][STAGEQUAL].[XP:LOQUAL],  
//      DISP=(OLD,KEEP)
#INSTANCESMISSINGPRODUCT raptor #THEN NEXT                     
//DDOTOC  DD DSN=[CUSTPRODQUAL][STAGEQUAL].[OC:LOQUAL],   
//      DISP=(OLD,KEEP)
#NEXT                               
//SYSIN DD DATA,DLM='!!'                                 
#/ -------------------------------------------------
#BEGININSTANCE      #/ Each instance is ./ ADD followed by fully qualified DSN for editing, as part of SASEDTX SYSIN stream.
#/ -------------------------------------------------
COMPR2 COPY INDD=((DDOTRX,R)),OUTDD=DDOTRX
COMPR4 COPY INDD=((DDOTXF,R)),OUTDD=DDOTXF
COMPR7 COPY INDD=((DDOTBZ,R)),OUTDD=DDOTBZ
COMPR1 COPY INDD=((DDOTRC,R)),OUTDD=DDOTRC
COMPR3 COPY INDD=((DDOTXC,R)),OUTDD=DDOTXC
COMPR5 COPY INDD=((DDOTXP,R)),OUTDD=DDOTXP
#IFNOTEQ {PRODUCT} raptor #THEN NEXT            
CPOC COPY INDD=((DDIN,R)),OUTDD=DDOTOC    
  S M=RAPTISP       
  S M=RAPTMON                                     
  S M=RAPTPARM                                    
  S M=RAPTVER                                     
  S M=RAPTXMS                                     
  S M=SASOSE                                      
  S M=SMOESMF
#NEXT                                          
CPBZ COPY INDD=((DDIN,R)),OUTDD=DDOTBZ                                      
  S M=SPNCCNTL                                                              
  S M=SPNCPARM                                                              
  S M=SPNCSHEL                                                              
  S M=SPNOCNTL                                                              
  S M=SPNOPARM                                                              
  S M=SPNOSHEL
CPRX COPY INDD=((DDIN,R)),OUTDD=DDOTRX                       
 S M=SASTREXX                                                
#IFEQ [ORDERENCODING] C0 #: S M=((REXTENC0,REXXENC0))      
#IFEQ [ORDERENCODING] C0 #: S M=((REXTHUC0,REXXHUC0))      
#IFEQ [ORDERENCODING] F0 #: S M=((REXTENF0,REXXENF0))      
#IFEQ [ORDERENCODING] R0 #: S M=((REXTENR0,REXXENR0))      
#IFEQ [ORDERENCODING] W0 #: S M=((REXTENW0,REXXENW0))      
#IFEQ [ORDERENCODING] W0 #: S M=((REXTESW0,REXXESW0))      
#IFEQ [ORDERENCODING] W0 #: S M=((REXTFRW0,REXXFRW0))      
#IFEQ [ORDERENCODING] W0 #: S M=((REXTDBW0,REXXDBW0))      
#IFEQ [ORDERENCODING] W3 #: S M=((REXTENW3,REXXENW3))      
#IFEQ [ORDERENCODING] W3 #: S M=((REXTDEW3,REXXDEW3))      
#IFEQ [ORDERENCODING] W5 #: S M=((REXTENW5,REXXENW5))      
#IFEQ [ORDERENCODING] W6 #: S M=((REXTENW6,REXXENW6))      
#IFEQ [ORDERENCODING] W6 #: S M=((REXTSVW6,REXXSVW6))      
#IFEQ [ORDERENCODING] W7 #: S M=((REXTENW7,REXXENW7))      
#IFEQ [ORDERENCODING] W8 #: S M=((REXTENW8,REXXENW8))      
#IFEQ [ORDERENCODING] W8 #: S M=((REXTESW8,REXXESW8))      
#IFEQ [ORDERENCODING] W9 #: S M=((REXTENW9,REXXENW9))      
#IFEQ [ORDERENCODING] WA #: S M=((REXTENWA,REXXENWA))      
#IFEQ [ORDERENCODING] WA #: S M=((REXTFRWA,REXXFRWA))      
#IFEQ [ORDERENCODING] WB #: S M=((REXTENWB,REXXENWB))      
#IFEQ [ORDERENCODING] WB #: S M=((REXTDEWB,REXXDEWB))      
#IFEQ [ORDERENCODING] WB #: S M=((REXTFRWB,REXXFRWB))      
#IFEQ [ORDERENCODING] WU #: S M=((REXTENWU,REXXENWU))      
#IFEQ [ORDERENCODING] WU #: S M=((REXTDBWU,REXXDBWU))     
#/ THIS SECTION TO COPY UP CUSTOMER'S SITE TO STAGED FOR ACTION C          
#IFNOT [INSTALL-TO-STAGE] #THEN NOCOPYSITE                                    
CXXF COPY INDD=((DDINXF,R)),OUTDD=DDOTXF                                    
  S M=SITE                                                               
#NOCOPYSITE                                                                 
#/ ONLY COPY EDITED SITE TO XF FOR ACTION A.                                
CPXF COPY INDD=((DDIN,R)),OUTDD=DDOTXF                                      
#IFNOT [INSTALL-NEW] #THEN NOCOPYSITE                                       
  S M=CFGSITE                                                               
#NOCOPYSITE                                                                 
  S M=CFGBAT                                                                
  S M=CFGCOMM                                                               
  S M=CFGTSO                                                                
#IFNOTEQ [ORDERENCODING] C0 #THEN NEXTENCODE                              
  S M=CFGENC0                                                               
  S M=CFGHUC0                                                               
#NEXTENCODE                                                                 
#IFNOTEQ [ORDERENCODING] F0 #THEN NEXTENCODE                              
  S M=CFGENF0                                                               
#NEXTENCODE                                                                 
#IFNOTEQ [ORDERENCODING] R0 #THEN NEXTENCODE                              
  S M=CFGENR0                                                               
#NEXTENCODE                                                                 
#IFNOTEQ [ORDERENCODING] W0 #THEN NEXTENCODE                              
  S M=CFGENW0                                                               
  S M=CFGESW0                                                               
  S M=CFGFRW0                                                               
  S M=CFGDBW0                                                               
#NEXTENCODE                                                                 
#IFNOTEQ [ORDERENCODING] W3 #THEN NEXTENCODE                              
  S M=CFGENW3                                                               
  S M=CFGDEW3                                                               
#NEXTENCODE          
#IFNOTEQ [ORDERENCODING] W5 #THEN NEXTENCODE                                     
  S M=CFGENW5                                                                      
#NEXTENCODE                                                                        
#IFNOTEQ [ORDERENCODING] W6 #THEN NEXTENCODE                                     
  S M=CFGENW6                                                                      
  S M=CFGSVW6                                                                      
#NEXTENCODE                                                                        
#IFNOTEQ [ORDERENCODING] W7 #THEN NEXTENCODE                                     
  S M=CFGENW7                                                                      
#NEXTENCODE                                                                        
#IFNOTEQ [ORDERENCODING] W8 #THEN NEXTENCODE                                     
  S M=CFGENW8                                                                      
  S M=CFGESW8                                                                      
#NEXTENCODE                                                                        
#IFNOTEQ [ORDERENCODING] W9 #THEN NEXTENCODE                                     
  S M=CFGENW9                                                                      
#NEXTENCODE                                                                        
#IFNOTEQ [ORDERENCODING] WA #THEN NEXTENCODE                                     
  S M=CFGENWA                                                                      
  S M=CFGFRWA                                                                      
#NEXTENCODE                                                                        
#IFNOTEQ [ORDERENCODING] WB #THEN NEXTENCODE                                     
  S M=CFGENWB                                                                      
  S M=CFGDEWB                                                                      
  S M=CFGFRWB                                                                      
#NEXTENCODE                                                                        
#IFNOTEQ [ORDERENCODING] WU #THEN NEXTENCODE                                     
  S M=CFGENWU                                                                      
  S M=CFGDBWU                                                                      
#NEXTENCODE                                                                        
CPXF2 COPY INDD=((DDIN,R)),OUTDD=DDOTXF                                      
#IFNOT [INSTALL-NEW] #THEN NOCOPYSITE                                                                                                  
  S M=((CFGSITE,SITE))                                                      
#NOCOPYSITE                                                                 
  S M=((CFGBAT,BATCH))                                                      
  S M=((CFGCOMM,COMMON))                                                    
  S M=((CFGTSO,TSO))                                                        
#IFNOTEQ [ORDERENCODING] C0 #THEN NEXTENCODE                              
  S M=((CFGENC0,ENC0))                                                      
  S M=((CFGHUC0,HUC0))                                                      
#NEXTENCODE                                                                 
#IFNOTEQ [ORDERENCODING] F0 #THEN NEXTENCODE                              
  S M=((CFGENF0,ENF0))                                                      
#NEXTENCODE                                                                 
#IFNOTEQ [ORDERENCODING] R0 #THEN NEXTENCODE                              
  S M=((CFGENR0,ENR0))                                                      
#NEXTENCODE                                                                 
#IFNOTEQ [ORDERENCODING] W0 #THEN NEXTENCODE                              
  S M=((CFGENW0,ENW0))                                                      
  S M=((CFGESW0,ESW0))                                                      
  S M=((CFGFRW0,FRW0))                                                      
  S M=((CFGDBW0,DBW0))                                                      
#NEXTENCODE                                                                 
#IFNOTEQ [ORDERENCODING] W3 #THEN NEXTENCODE                              
  S M=((CFGENW3,ENW3))                                                      
  S M=((CFGDEW3,DEW3))                                                      
#NEXTENCODE          
#IFNOTEQ [ORDERENCODING] W5 #THEN NEXTENCODE                                     
  S M=((CFGENW5,ENW5))                                                             
#NEXTENCODE                                                                        
#IFNOTEQ [ORDERENCODING] W6 #THEN NEXTENCODE                                     
  S M=((CFGENW6,ENW6))                                                             
  S M=((CFGSVW6,SVW6))                                                             
#NEXTENCODE                                                                        
#IFNOTEQ [ORDERENCODING] W7 #THEN NEXTENCODE                                     
  S M=((CFGENW7,ENW7))                                                             
#NEXTENCODE                                                                        
#IFNOTEQ [ORDERENCODING] W8 #THEN NEXTENCODE                                     
  S M=((CFGENW8,ENW8))                                                             
  S M=((CFGESW8,ESW8))                                                             
#NEXTENCODE                                                                        
#IFNOTEQ [ORDERENCODING] W9 #THEN NEXTENCODE                                     
  S M=((CFGENW9,ENW9))                                                             
#NEXTENCODE                                                                        
#IFNOTEQ [ORDERENCODING] WA #THEN NEXTENCODE                                     
  S M=((CFGENWA,ENWA))                                                             
  S M=((CFGFRWA,FRWA))                                                             
#NEXTENCODE                                                                        
#IFNOTEQ [ORDERENCODING] WB #THEN NEXTENCODE                                     
  S M=((CFGENWB,ENWB))                                                             
  S M=((CFGDEWB,DEWB))                                                             
  S M=((CFGFRWB,FRWB))                                                             
#NEXTENCODE                                                                        
#IFNOTEQ [ORDERENCODING] WU #THEN NEXTENCODE                                     
  S M=((CFGENWU,ENWU))                                                             
  S M=((CFGDBWU,DBWU))                                                             
#NEXTENCODE 
CPRC COPY INDD=((DDIN,R)),OUTDD=DDOTRC                                             
#IFEQ [ORDERENCODING] C0 #: S M=((REXCENC0,REXXENC0))                         
#IFEQ [ORDERENCODING] C0 #: S M=((REXCHUC0,REXXHUC0))                         
#IFEQ [ORDERENCODING] F0 #: S M=((REXCENF0,REXXENF0))                         
#IFEQ [ORDERENCODING] R0 #: S M=((REXCENR0,REXXENR0))                         
#IFEQ [ORDERENCODING] W0 #: S M=((REXCENW0,REXXENW0))                         
#IFEQ [ORDERENCODING] W0 #: S M=((REXCESW0,REXXESW0))                         
#IFEQ [ORDERENCODING] W0 #: S M=((REXCFRW0,REXXFRW0))                         
#IFEQ [ORDERENCODING] W0 #: S M=((REXCDBW0,REXXDBW0))                            
#IFEQ [ORDERENCODING] W3 #: S M=((REXCENW3,REXXENW3))                            
#IFEQ [ORDERENCODING] W3 #: S M=((REXCDEW3,REXXDEW3))                            
#IFEQ [ORDERENCODING] W5 #: S M=((REXCENW5,REXXENW5))                            
#IFEQ [ORDERENCODING] W6 #: S M=((REXCENW6,REXXENW6))                            
#IFEQ [ORDERENCODING] W6 #: S M=((REXCSVW6,REXXSVW6))      
#IFEQ [ORDERENCODING] W7 #: S M=((REXCENW7,REXXENW7))      
#IFEQ [ORDERENCODING] W8 #: S M=((REXCENW8,REXXENW8))      
#IFEQ [ORDERENCODING] W8 #: S M=((REXCESW8,REXXESW8))      
#IFEQ [ORDERENCODING] W9 #: S M=((REXCENW9,REXXENW9))      
#IFEQ [ORDERENCODING] WA #: S M=((REXCENWA,REXXENWA))      
#IFEQ [ORDERENCODING] WA #: S M=((REXCFRWA,REXXFRWA))      
#IFEQ [ORDERENCODING] WB #: S M=((REXCENWB,REXXENWB))      
#IFEQ [ORDERENCODING] WB #: S M=((REXCDEWB,REXXDEWB))      
#IFEQ [ORDERENCODING] WB #: S M=((REXCFRWB,REXXFRWB))      
#IFEQ [ORDERENCODING] WU #: S M=((REXCENWU,REXXENWU))      
#IFEQ [ORDERENCODING] WU #: S M=((REXCDBWU,REXXDBWU))
CPXC COPY INDD=((DDIN,R)),OUTDD=DDOTXC                          
#IFEQ [ORDERENCODING] C0 #: S M=CLSTENC0              
#IFEQ [ORDERENCODING] C0 #: S M=CLSTHUC0              
#IFEQ [ORDERENCODING] F0 #: S M=CLSTENF0              
#IFEQ [ORDERENCODING] R0 #: S M=CLSTENR0              
#IFEQ [ORDERENCODING] W0 #: S M=CLSTENW0              
#IFEQ [ORDERENCODING] W0 #: S M=CLSTESW0           
#IFEQ [ORDERENCODING] W0 #: S M=CLSTFRW0           
#IFEQ [ORDERENCODING] W0 #: S M=CLSTDBW0           
#IFEQ [ORDERENCODING] W3 #: S M=CLSTENW3           
#IFEQ [ORDERENCODING] W3 #: S M=CLSTDEW3           
#IFEQ [ORDERENCODING] W5 #: S M=CLSTENW5           
#IFEQ [ORDERENCODING] W6 #: S M=CLSTENW6           
#IFEQ [ORDERENCODING] W6 #: S M=CLSTSVW6           
#IFEQ [ORDERENCODING] W7 #: S M=CLSTENW7           
#IFEQ [ORDERENCODING] W8 #: S M=CLSTENW8           
#IFEQ [ORDERENCODING] W8 #: S M=CLSTESW8           
#IFEQ [ORDERENCODING] W9 #: S M=CLSTENW9           
#IFEQ [ORDERENCODING] WA #: S M=CLSTENWA           
#IFEQ [ORDERENCODING] WA #: S M=CLSTFRWA           
#IFEQ [ORDERENCODING] WB #: S M=CLSTDEWB         
#IFEQ [ORDERENCODING] WB #: S M=CLSTFRWB         
#IFEQ [ORDERENCODING] WU #: S M=CLSTENWU         
#IFEQ [ORDERENCODING] WU #: S M=CLSTDBWU
CPXP COPY INDD=((DDIN,R)),OUTDD=DDOTXP                     
#IFEQ [ORDERENCODING] C0 #: S M=PROCENC0       
#IFEQ [ORDERENCODING] C0 #: S M=PROCHUC0       
#IFEQ [ORDERENCODING] F0 #: S M=PROCENF0       
#IFEQ [ORDERENCODING] R0 #: S M=PROCENR0       
#IFEQ [ORDERENCODING] W0 #: S M=PROCENW0       
#IFEQ [ORDERENCODING] W0 #: S M=PROCESW0       
#IFEQ [ORDERENCODING] W0 #: S M=PROCFRW0       
#IFEQ [ORDERENCODING] W0 #: S M=PROCDBW0       
#IFEQ [ORDERENCODING] W3 #: S M=PROCENW3       
#IFEQ [ORDERENCODING] W3 #: S M=PROCDEW3       
#IFEQ [ORDERENCODING] W5 #: S M=PROCENW5       
#IFEQ [ORDERENCODING] W6 #: S M=PROCENW6       
#IFEQ [ORDERENCODING] W6 #: S M=PROCSVW6       
#IFEQ [ORDERENCODING] W7 #: S M=PROCENW7       
#IFEQ [ORDERENCODING] W8 #: S M=PROCENW8       
#IFEQ [ORDERENCODING] W8 #: S M=PROCESW8       
#IFEQ [ORDERENCODING] W9 #: S M=PROCENW9       
#IFEQ [ORDERENCODING] WA #: S M=PROCENWA       
#IFEQ [ORDERENCODING] WA #: S M=PROCFRWA       
#IFEQ [ORDERENCODING] WB #: S M=PROCENWB       
#IFEQ [ORDERENCODING] WB #: S M=PROCDEWB       
#IFEQ [ORDERENCODING] WB #: S M=PROCFRWB       
#IFEQ [ORDERENCODING] WU #: S M=PROCENWU       
#IFEQ [ORDERENCODING] WU #: S M=PROCDBWU
COMPR COPY INDD=((DDIN,R)),OUTDD=DDIN
COMPR2 COPY INDD=((DDOTRX,R)),OUTDD=DDOTRX
COMPR4 COPY INDD=((DDOTXF,R)),OUTDD=DDOTXF
COMPR7 COPY INDD=((DDOTBZ,R)),OUTDD=DDOTBZ
COMPR1 COPY INDD=((DDOTRC,R)),OUTDD=DDOTRC
COMPR3 COPY INDD=((DDOTXC,R)),OUTDD=DDOTXC
COMPR5 COPY INDD=((DDOTXP,R)),OUTDD=DDOTXP
#/ -------------------------------------------------
#BEGINSUFFIX 
#/ -------------------------------------------------
!!
//*
#ENDBUCKET 