home *** CD-ROM | disk | FTP | other *** search
/ PC Format Collection 48 / SENT14D.ISO / tech / delphi / disk15 / ibtutor.pak / DOMAINS.SQL next >
Encoding:
Text File  |  1995-08-24  |  1.6 KB  |  69 lines
  1. /*
  2.     THIS FILE IS FOR USE WITH THE TUTORIAL IN "GETTING STARTED",
  3.     IT IS NOT MEANT TO BE USED WITHOUT REFERRING TO THE MANUAL.
  4.  
  5. *   You must change the parameters below to match your
  6. *   server name, database name , username, and password.
  7. *   This files defines domains for the EMPLOYEE database.
  8. */
  9.  
  10. CONNECT "server:\dir\mydb.gdb"
  11. USER "USERNAME" PASSWORD "password";
  12.  
  13. /*
  14. You are supposed to enter these four domain
  15. definitions by hand (see tutorial):
  16.  
  17. CREATE DOMAIN FIRSTNAME AS VARCHAR(15)
  18. CREATE DOMAIN LASTNAME AS VARCHAR(20)
  19.  
  20. CREATE DOMAIN EMPNO AS SMALLINT
  21.  
  22. CREATE DOMAIN DEPTNO AS CHAR(3)
  23.      CHECK ((VALUE = '000') OR 
  24.     (VALUE > '0' AND VALUE <= '999') 
  25.     OR (VALUE IS NULL))
  26. */
  27.  
  28. CREATE DOMAIN addressline AS VARCHAR(30);
  29.  
  30. CREATE DOMAIN projno
  31.     AS CHAR(5)
  32.     CHECK (VALUE = UPPER (VALUE));
  33.  
  34. CREATE DOMAIN custno
  35.     AS INTEGER
  36.     CHECK (VALUE > 1000);
  37.  
  38. CREATE DOMAIN phonenumber   AS VARCHAR(20);
  39.  
  40. CREATE DOMAIN countryname   AS VARCHAR(15);
  41.  
  42. CREATE DOMAIN jobcode
  43.     AS VARCHAR(5)
  44.     CHECK (VALUE > '99999');  /* must begin with a letter */
  45.  
  46. CREATE DOMAIN jobgrade
  47.     AS SMALLINT
  48.     CHECK (VALUE BETWEEN 0 AND 6);
  49.  
  50. CREATE DOMAIN salary
  51.     AS NUMERIC(10,2)
  52.     DEFAULT 0
  53.     CHECK (VALUE > 0);  /* salary is in any currency type */
  54.  
  55. /* budget is in US dollars */
  56. CREATE DOMAIN budget
  57.     AS DECIMAL(12,2)
  58.     DEFAULT 50000
  59.     CHECK (VALUE > 10000 AND VALUE <= 2000000);
  60.  
  61. CREATE DOMAIN prodtype
  62.     AS VARCHAR(12)
  63.     DEFAULT 'software' NOT NULL
  64.     CHECK (VALUE IN ('software', 'hardware', 'other', 'N/A'));
  65.  
  66. CREATE DOMAIN ponumber
  67.     AS CHAR(8)
  68.     CHECK (VALUE STARTING WITH 'V');
  69.