#BEGINBUCKET NICKNAME
#/ ----------------------------------------------------------------------------
#/ This template runs SAS to add nicknames defined in the samples DBINICK member.
#/ ----------------------------------------------------------------------------
#BEGININSTANCEQUALIFIERS
#IFNOTEQ {ARTIFACTTYPE} XRG #THEN NOINSTANCEFROMENTRY
#CREATEINSTANCEFROMENTRY
#NOINSTANCEFROMENTRY
#ENDQUALIFIERS
#/ -------------------------------------------------------------------
#BEGINPREFIX
#/ -------------------------------------------------------------------
#SET [DSLANGCODE] EN         #/ Set language symbol to EN for firing up SAS
//SASNICK EXEC PGM=[ENTRY],
//  PARM=('SETINIT MSGCASE ERRORABEND NOWORKTERM',
#IFEQ [ORDERENCODING] WU #://        'CAPSOUT',
//        'MACRO ERRORCHECK=STRICT SASUSER=WORK DEBUG=NOMSASHELP')
#IFEQ [HOST] z64 #THEN USEZE
#TABLEFIX LD  #/ Load Library
#THEN STEPLIB
#USEZE
#TABLEFIX ZE  #/ 64-bit load library
#STEPLIB
//STEPLIB  DD DISP=SHR,
//  DSN=[CUSTPRODQUAL].[LOQUAL]
#TABLEFIX SH  #/ Sashelp
#IFNOT [INSTALL-TO-STAGE] #THEN NOTSTAGEDINSTALL
//SASHELP  DD DISP=OLD,
//  DSN=[CUSTPRODQUAL][STAGEQUAL].[LOQUAL]
#THEN NEXT
#NOTSTAGEDINSTALL
//SASHELP DD DISP=OLD,
//  DSN=[CUSTPRODQUAL].[LOQUAL]
#NEXT
#TABLEFIX AU  #/ Autocalls
//[DFLTDDN] DD DISP=SHR,
//  DSN=[CUSTPRODQUAL].[LOQUAL]
#IFEQ [HOST] z64 #THEN SKIPSM
#TABLEFIX SM  #/ SAS messages
//[DFLTDDN] DD DISP=SHR,
//  DSN=[CUSTPRODQUAL].[LOQUAL]
#SKIPSM
//TKMVSENV DD DATA,DLM='!1'
#SNIPPETINSERT SASDefaultTkmvsenv.txt
!1
//WORK     DD UNIT=[TMPUNI],SPACE=(6144,([WORKSPC])),
//         DCB=(RECFM=FS,LRECL=6144,BLKSIZE=6144)
//SASLOG   DD SYSOUT=[SYSOUT]
//SASCLOG  DD SYSOUT=[SYSOUT]
//CONFIG   DD DATA,DLM='!1'
#SNIPPETINSERT SASDefaultConfig.txt
!1
//SASLIST  DD SYSOUT=[SYSOUT]
//SASPARM  DD UNIT=[TMPUNI],SPACE=(400,(100,300)),
//         DCB=(RECFM=FB,LRECL=80,BLKSIZE=400,BUFNO=1)
#TABLEFIX SS
//SYSIN  DD  DATA,DLM='!1'
%macro donick(dsn);
  dsnexst &dsn;
  %if &sysdexst %then %do;
    filename DBINICK &dsn disp=shr;
    %include DBINICK;
  %end;
%mend;
%donick('[CUSTPRODQUAL][STAGEQUAL].[LOQUAL](DBINICK)');
!1
//*
#/ -------------------------------------------------------------------
#BEGININSTANCE               #/ This instance is intentionally null
#/ -------------------------------------------------------------------
#BEGINSUFFIX                 #/ This suffix is intentionally null
#/ -------------------------------------------------------------------
#ENDBUCKET NICKNAME
