#BEGINBUCKET XXCOPYOUTSAS
#/ ------------------------------------------------------------------
#BEGINDEFS
#/ ------------------------------------------------------------------
#TABLECALL <MVSDSDATATABLE> KEY:MVS2BDSCODE
#/ -------------------------------------------------
#BEGINSTATICINSTANCES
#/ ------------------------------------------------------------------
#STATICINSTANCE 
#/ -------------------------------------------------
#BEGININSTANCEQUALIFIERS
#/ -------------------------------------------------
#/ This doesn't apply for instances
#/ -------------------------------------------------
#BEGINPREFIX      #/ Prefix invokes SAS from targeted SAS installation
#/ -------------------------------------------------------------------
#SET [DSLANGCODE] EN         #/ Set language symbol to EN for firing up SAS
//SASDLIB EXEC PGM=[ENTRY],                       
//  PARM=('SETINIT MSGCASE CAPSOUT ERRORABEND NOWORKTERM',     
//        'MACRO ERRORCHECK=STRICT SASUSER=WORK')
#TABLEFIX <MVSDSDATATABLE> LD  #/ Load Library
//STEPLIB  DD DISP=SHR,                                        
//  DSN=[CUSTPRODQUAL].[LOQUAL]                                       
#TABLEFIX <MVSDSDATATABLE> SH  #/ Sashelp
//[DFLTDDN]  DD DISP=SHR,                                        
//  DSN=[CUSTPRODQUAL].[LOQUAL]                                       
#TABLEFIX <MVSDSDATATABLE> AU  #/ Autocalls
//[DFLTDDN] DD DISP=SHR,                                        
//  DSN=[CUSTPRODQUAL].[LOQUAL]                                        
#TABLEFIX <MVSDSDATATABLE> SM  #/ SAS messages
//[DFLTDDN] DD DISP=SHR,                                        
//  DSN=[CUSTPRODQUAL].[LOQUAL]                                        
//WORK     DD UNIT=[TMPUNI],SPACE=(6144,([WORKSPC])),          
//         DCB=(RECFM=FS,LRECL=6144,BLKSIZE=6144)              
//SASLOG   DD SYSOUT=[SYSOUT]                                  
//SASCLOG  DD SYSOUT=[SYSOUT]                                  
//CONFIG   DD DISP=SHR,  #/ Using configuration file for install, not customer's
//         DSN=[CNTLDSN]($CFGINST)                             
//CNTLDSN  DD DISP=SHR, 
//         DSN=[CNTLDSN]                             
//DDOTTE   DD DISP=SHR, 
//         DSN=[CUSTPRODQUAL][STAGEQUAL].[TE:LOQUAL]                             
//SASLIST  DD SYSOUT=[SYSOUT]                                  
//SASPARM  DD UNIT=[TMPUNI],SPACE=(400,(100,300)),             
//         DCB=(RECFM=FB,LRECL=80,BLKSIZE=400,BUFNO=1)         
//SYSIN  DD DATA,DLM='!^'  #/ Begin source code stream for SAS session. Delimiter is !^ in column 1 of line
options filestat symbolgen mprint mlogic;
#/ -------------------------------------------------
#BEGININSTANCE
#/ -------------------------------------------------
#IFEQ [ORDERENCODING] C0 #:DATA _NULL_;INFILE CNTLDSN(TKMVENC0);FILE DDOTTE(TKMVSENV);INPUT;PUT _INFILE_;
#IFEQ [ORDERENCODING] C0 #:DATA _NULL_;INFILE CNTLDSN(TKMVHUC0);FILE DDOTTE(TKMVHUCO);INPUT;PUT _INFILE_;
#IFEQ [ORDERENCODING] F0 #:DATA _NULL_;INFILE CNTLDSN(TKMVENF0);FILE DDOTTE(TKMVSENV);INPUT;PUT _INFILE_;
#IFEQ [ORDERENCODING] R0 #:DATA _NULL_;INFILE CNTLDSN(TKMVENR0);FILE DDOTTE(TKMVSENV);INPUT;PUT _INFILE_;
#IFEQ [ORDERENCODING] W0 #:DATA _NULL_;INFILE CNTLDSN(TKMVENW0);FILE DDOTTE(TKMVSENV);INPUT;PUT _INFILE_;
#IFEQ [ORDERENCODING] W0 #:DATA _NULL_;INFILE CNTLDSN(TKMVESW0);FILE DDOTTE(TKMVESW0);INPUT;PUT _INFILE_;
#IFEQ [ORDERENCODING] W0 #:DATA _NULL_;INFILE CNTLDSN(TKMVFRW0);FILE DDOTTE(TKMVFRW0);INPUT;PUT _INFILE_;
#IFEQ [ORDERENCODING] W0 #:DATA _NULL_;INFILE CNTLDSN(TKMVDBW0);FILE DDOTTE(TKMVDBW0);INPUT;PUT _INFILE_;
#IFEQ [ORDERENCODING] W3 #:DATA _NULL_;INFILE CNTLDSN(TKMVENW3);FILE DDOTTE(TKMVSENV);INPUT;PUT _INFILE_;
#IFEQ [ORDERENCODING] W3 #:DATA _NULL_;INFILE CNTLDSN(TKMVDEW3);FILE DDOTTE(TKMVDEW3);INPUT;PUT _INFILE_;
#IFEQ [ORDERENCODING] W5 #:DATA _NULL_;INFILE CNTLDSN(TKMVENW5);FILE DDOTTE(TKMVSENV);INPUT;PUT _INFILE_;
#IFEQ [ORDERENCODING] W6 #:DATA _NULL_;INFILE CNTLDSN(TKMVENW6);FILE DDOTTE(TKMVSENV);INPUT;PUT _INFILE_;
#IFEQ [ORDERENCODING] W6 #:DATA _NULL_;INFILE CNTLDSN(TKMVSVW6);FILE DDOTTE(TKMVSVW6);INPUT;PUT _INFILE_;
#IFEQ [ORDERENCODING] W7 #:DATA _NULL_;INFILE CNTLDSN(TKMVENW7);FILE DDOTTE(TKMVSENV);INPUT;PUT _INFILE_;
#IFEQ [ORDERENCODING] W8 #:DATA _NULL_;INFILE CNTLDSN(TKMVENW8);FILE DDOTTE(TKMVSENV);INPUT;PUT _INFILE_;
#IFEQ [ORDERENCODING] W8 #:DATA _NULL_;INFILE CNTLDSN(TKMVESW8);FILE DDOTTE(TKMVESW8);INPUT;PUT _INFILE_;
#IFEQ [ORDERENCODING] W9 #:DATA _NULL_;INFILE CNTLDSN(TKMVENW9);FILE DDOTTE(TKMVSENV);INPUT;PUT _INFILE_;
#IFEQ [ORDERENCODING] WA #:DATA _NULL_;INFILE CNTLDSN(TKMVENWA);FILE DDOTTE(TKMVSENV);INPUT;PUT _INFILE_;
#IFEQ [ORDERENCODING] WA #:DATA _NULL_;INFILE CNTLDSN(TKMVFRWA);FILE DDOTTE(TKMVFRWA);INPUT;PUT _INFILE_;
#IFEQ [ORDERENCODING] WB #:DATA _NULL_;INFILE CNTLDSN(TKMVENWB);FILE DDOTTE(TKMVSENV);INPUT;PUT _INFILE_;
#IFEQ [ORDERENCODING] WB #:DATA _NULL_;INFILE CNTLDSN(TKMVFRWB);FILE DDOTTE(TKMVFRWB);INPUT;PUT _INFILE_;
#IFEQ [ORDERENCODING] WB #:DATA _NULL_;INFILE CNTLDSN(TKMVDEWB);FILE DDOTTE(TKMVDEWB);INPUT;PUT _INFILE_;
#IFEQ [ORDERENCODING] WU #:DATA _NULL_;INFILE CNTLDSN(TKMVENWU);FILE DDOTTE(TKMVENWU);INPUT;PUT _INFILE_;
#IFEQ [ORDERENCODING] WU #:DATA _NULL_;INFILE CNTLDSN(TKMVDBWU);FILE DDOTTE(TKMVSENV);INPUT;PUT _INFILE_;
#/ -------------------------------------------------------------------
#BEGINSUFFIX                 
#/ -------------------------------------------------------------------
!^
//*
#/ -------------------------------------------------------------------
#ENDBUCKET                
