/****************************************************************/

  /*          SAS SAMPLE LIBRARY                                  */

  /*                                                              */

  /*    NAME: DBMACS.SAS                                          */

  /*   TITLE: MACROS USED IN PROC ACCESS AND PROC DBLOAD EXAMPLES */

  /* PRODUCT: SAS/ACCESS SOFTWARE FOR RELATIONAL DATABASES        */

  /*  SYSTEM: MVS,CMS,VSE,VAX VMS,OPENVMS,UNIX,OS/2,WINDOWS       */

  /*    KEYS: DATABASE PASSTHRU                                   */

  /*   PROCS: DBLOAD SQL                                          */

  /*    DATA:                                                     */

  /*                                                              */

  /*                                                              */

  /*     REF: SAS/ACCESS SOFTWARE FOR RELATIONAL DATABASES:       */

  /*          REFERENCE, VERSION 6, FIRST EDITION                 */

  /*    MISC: USE THE FOLLOWING MACROS TO SPECIFY YOUR DATABASE-  */

  /*          DESCRIPTION STATEMENTS WHEN YOU CREATE DBMS TABLES  */

  /*          AND ACCESS AND VIEW DESCRIPTORS.                    */

  /*          YOU MAY WANT TO DELETE DATABASE DESCRIPTION MACROS  */

  /*          FOR DATABASES THAT YOU DO NOT HAVE INSTALLED.       */

  /*          SEE CHAPTER 7 IN "SAS/ACCESS SOFTWARE FOR RELATIONAL*/

  /*          DATABASES: REFERENCE, VERSION 6, FIRST EDITION"     */

  /*          FOR YOUR DBMS FOR INFORMATION ON THE STATEMENTS     */

  /*          THAT ARE SPECIFIC TO YOUR DBMS.                     */

  /*                                                              */

  /****************************************************************/

 

 

   %let dbms=Your-DBMS;       /*  INSERT DBMS NAME INTO THE MACRO. */

   %macro dbmsdesc;           /*  FOR EXAMPLE: %let dbms=ORACLE;   */

   %global vchar

           char

           smallint

           int

           float

           dec

           date;

 

   %if %upcase(&dbms)=ORACLE       %then %do;

       %* DATABASE DESCRIPTION STATEMENTS;

       %macro dbdesc;

          USER=Your-user-name;

          ORAPW=Your-password;

          PATH="Your-pathname";

       %mend dbdesc;

       %* DATATYPE DEFINITIONS;

       %let   vchar=varchar;

       %let   char=char;

       %let   smallint=number(6);

       %let   int=number;

       %let   float=number;

       %let   date=date;

 

   %end;

 

   %else %if %upcase(&dbms)=AS400  %then %do;

       %* DATABASE DESCRIPTION STATEMENTS;

       %macro dbdesc;

          COLLECTION=your-collection-name;

       %mend dbdesc;

       %* DATATYPE DEFINITIONS;

       %let   char=char;

       %let   vchar=varchar;

       %let   smallint=smallint;

       %let   int=integer;

       %let   dec=decimal(15,2);

       %let   float=float;

       %let   date=date;

 

   %end;

 

   %else %if %upcase(&dbms)=DB2   %then %do;

       %* DATABASE DESCRIPTION STATEMENTS;

       %macro dbdesc;

          SSID=your_ssid;

       %mend dbdesc;

       %* DATATYPE DEFINITIONS;

       %let   char=char;

       %let   vchar=varchar;

       %let   smallint=smallint;

       %let   int=integer;

       %let   dec=decimal(15,2);

       %let   float=float;

       %let   date=date;

 

   %end;

 

   %else %if %upcase(&dbms)=DB2_2  %then %do;

       %* DATABASE DESCRIPTION STATEMENTS;

       %macro dbdesc;

          IN=your_database;

       %mend dbdesc;

       %* DATATYPE DEFINITIONS;

       %let   char=char;

       %let   vchar=varchar;

       %let   smallint=smallint;

       %let   int=integer;

       %let   dec=decimal(15,2);

       %let   float=float;

       %let   date=date;

 

   %end;

 

   %else %if %upcase(&dbms)=DB2_6000  %then %do;  /* THIS DATABASE ALSO HAS

       %* DATABASE DESCRIPTION STATEMENTS;        THE ALIASES: DB2,DB2_UNIX */

       %macro dbdesc;

          IN=your_database;

       %mend dbdesc;

       %* DATATYPE DEFINITIONS;

       %let   char=char;

       %let   vchar=varchar;

       %let   smallint=smallint;

       %let   int=integer;

       %let   dec=decimal(15,2);

       %let   float=float;

       %let   date=date;

 

   %end;

 

   %else %if %upcase(&dbms)=SQLDS  %then %do;

       %* DATABASE DESCRIPTION STATEMENTS;

       %macro dbdesc;

          USER=your_user_name;

          SQLDSPW=your_password;

       %mend dbdesc;

       %* DATATYPE DEFINITIONS;

       %let   char=char;

       %let   vchar=varchar;

       %let   smallint=smallint;

       %let   int=integer;

       %let   dec=decimal(15,2);

       %let   float=float;

       %let   date=date;

 

   %end;

 

   %else %if %upcase(&dbms)=INGRES %then %do;

       %* DATABASE DESCRIPTION STATEMENTS;

       %macro dbdesc;

          DATABASE=your_database;

       %mend dbdesc;

       %* DATATYPE DEFINITIONS;

       %let   char=char;

       %let   vchar=varchar;

       %let   smallint=smallint;

       %let   int=integer;

       %let   float=float;

       %let   dec=money;

       %let   date=date;

 

   %end;

 

   %else %if %upcase(&dbms)=RDB %then %do;

       %* DATABASE DESCRIPTION STATEMENTS;

       %macro dbdesc;

          DATABASE=your_database;

       %mend dbdesc;

       %* DATATYPE DEFINITIONS;

       %let   char=char;

       %let   vchar=varchar;

       %let   smallint=smallint;

       %let   int=integer;

       %let   dec=decimal(15,2);

       %let   float=float;

       %let   date=date;

 

   %end;

 

   %else %if %upcase(&dbms)=SYBASE %then %do;

       %* DATABASE DESCRIPTION STATEMENTS;

       %macro dbdesc;

          DATABASE=your_database;

          INTERFACE=your_interface_file;

          PASSWORD=your_password;

          SERVER=your_server_name;

          USER=your_user_name;

       %mend dbdesc;

       %* DATATYPE DEFINITIONS;

       %let   char=char;

       %let   vchar=varchar;

       %let   smallint=smallint;

       %let   int=int;

       %let   dec=money;

       %let   float=float;

       %let   date=datetime;

 

   %end;

 

   %else %if %upcase(&dbms)=SQLSERVR %then %do;

       %* DATABASE DESCRIPTION STATEMENTS;

       %macro dbdesc;

          DATABASE=your_database;

          INTERFACE=your_interface_file;

          PASSWORD=your_password;

          SERVER=your_server_name;

          USER=your_user_name;

       %mend dbdesc;

       %* DATATYPE DEFINITIONS;

       %let   char=char;

       %let   vchar=varchar;

       %let   smallint=smallint;

       %let   int=int;

       %let   dec=money;

       %let   float=float;

       %let   date=datetime;

 

   %end;

 

 %mend dbmsdesc;