File: create.sql

package info (click to toggle)
libsql-translator-perl 0.11024-1
  • links: PTS, VCS
  • area: main
  • in suites: buster
  • size: 4,572 kB
  • sloc: perl: 67,471; sql: 3,809; xml: 258; makefile: 2
file content (33 lines) | stat: -rw-r--r-- 708 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
create table person (
  -- field comment 1
  -- field comment 2
  person_id INTEGER PRIMARY KEY AUTOINCREMENT,
  'name' varchar(20) not null,
  'age' integer,
  weight double(11,2),
  iq tinyint default '0',
  description text
);

create unique index u_name on person (name);

create table pet (
  "pet_id" int,
  "person_id" int references person (person_id),
  "name" varchar(30),
  "age" int,
  check ( age < 100 ),
  primary key (pet_id, person_id)
);

create trigger pet_trig after insert on pet 
  begin
    update pet set name=name;
  end
;

create view person_pet as
  select pr.person_id, pr.name as person_name, pt.name as pet_name
  from   person pr, pet pt
  where  person.person_id=pet.pet_id
;