set echo off

rem ##################################################################

prompt "The old versions of the tables are deleted."
prompt "Do not worry about the message  Table does not exist ..."

drop table Election;
drop table Pres_Hobby;
drop table Admin_Pr_Vp;
drop table Administration;
drop table Pres_Marriage;
drop table President;
drop table State;

rem ##################################################################

prompt "The Relations of the US Presidents Database are being created ..."

prompt "STATE: "
create table State         ( State_Name    char(17)  not null ,
                             Admin_Entered number(3) null     ,
                             Year_Entered  number(4) not null ,
				PRIMARY KEY(State_Name)
                           );

prompt "PRESIDENT: "
create table President     ( Pres_Name     char(15)  not null ,
                             Birth_Year    number(4) not null ,
                             Years_Serv    number(2) not null ,
                             Death_Age     number(3) null     ,
                             Party         char(12)  not null ,
                             State_Born    char(17)  not null ,
				PRIMARY KEY (Pres_Name),
				FOREIGN KEY (State_Born) REFERENCES State
                           );


prompt "PRES_HOBBY: "
create table Pres_Hobby    ( Pres_Name     char(15)  not null ,
                             Hobby         char(18)  not null ,
				PRIMARY KEY (Pres_Name, Hobby),
				FOREIGN KEY (Pres_Name) REFERENCES President
                           );

prompt "ADMINISTRATION: "
create table Administration( Admin_Nr      number(3) not null ,
                             Pres_Name     char(15)  not null ,
                             Year_Inaugurated number(4) not null ,
				PRIMARY KEY (Admin_Nr, Pres_Name),
				FOREIGN KEY (Pres_Name) REFERENCES President
                           );

prompt "ADMIN_PR_VP: "
create table Admin_Pr_Vp   ( Admin_Nr      number(3) not null ,
                             Pres_Name     char(15)  not null ,
                             Vice_Pres_Name char(17) not null ,
				PRIMARY KEY (Admin_Nr, Pres_Name,
						Vice_Pres_Name),
				FOREIGN KEY (Admin_Nr, Pres_Name) REFERENCES
						Administration
                           );

prompt "PRES_MARRIAGE: "
create table Pres_Marriage ( Pres_Name     char(15)  not null ,
                             Spouse_Name   char(15)  not null ,
                             Pr_Age        number(3) not null ,
                             Sp_Age        number(3) not null ,
                             Nr_Children   number(2) not null ,
                             Mar_Year      number(4) not null ,
				PRIMARY KEY (Pres_Name, Spouse_Name),
				FOREIGN KEY (Pres_Name) REFERENCES President
                           );

prompt "ELECTION: "
create table Election      ( Election_Year number(4) not null ,
                             Candidate     char(15)  not null ,
                             Votes         number(3) not null ,
                             Winner_Loser_Indic char(1) not null,
				PRIMARY KEY (Election_Year, Candidate)
                           );

rem ##################################################################

rem prompt "Unique Indexes are being created for enforcing key constraints ..."

rem prompt "PRESIDENT: Pres_Name -> PN B Y D Pa S"
rem create unique index PRESIDENT_Index on PRESIDENT(Pres_Name);

rem prompt "STATE: State_Name -> S A Y"
rem create unique index STATE_Index on STATE(State_Name);

rem prompt "PRES_HOBBY: Pres_Name Hobby -> P H"
rem create unique index PRES_HOBBY_Index on PRES_HOBBY(Pres_Name,Hobby);

rem prompt "ADMINISTRATION: Admin_Nr Pres_Name -> A P Y"
rem create unique index ADMINISTRATION_Index on ADMINISTRATION(Admin_Nr,Pres_Name);

rem prompt "ADMIN_PR_VP: Admin_Nr Pres_Name Vice_Pres_Name -> A P V"
rem create unique index ADMIN_PR_VP_Index on ADMIN_PR_VP(Admin_Nr,Pres_Name,Vice_Pres_Name);

rem prompt "PRES_MARRIAGE: Pres_Name Spouse_Name -> PN SN PA SA N M"
rem prompt "               Keine Wiederheirat moeglich ???"
rem create unique index PRES_MARRIAGE_Index on PRES_MARRIAGE(Pres_Name,Spouse_Name);

rem prompt "ELECTION: Election_Year Candidate -> E C V W"
rem create unique index ELECTION_Index on ELECTION(Election_Year,Candidate);

rem ##################################################################

prompt "The Rows for the table STATE(S A Y) are  being inserted ... "
insert into  State values ('Massachusetts',NULL,1776);
insert into  State values ('Pennsylvania',NULL,1776);
insert into  State values ('Virginia',NULL,1776);
insert into  State values ('Connecticut',NULL,1776);
insert into  State values ('South Carolina',NULL,1776);
insert into  State values ('Maryland',NULL,1776);
insert into  State values ('New Jersey',NULL,1776);
insert into  State values ('Georgia',NULL,1776);
insert into  State values ('New Hampshire',NULL,1776);
insert into  State values ('Delawhare',NULL,1776);
insert into  State values ('New York',NULL,1776);
insert into  State values ('North Carolina',NULL,1776);
insert into  State values ('Rhode Island',NULL,1776);
insert into  State values ('Vermont',1,1791);
insert into  State values ('Kentucky',1,1792);
insert into  State values ('Tennesee',2,1796);
insert into  State values ('Ohio',4,1803);
insert into  State values ('Louisiana',6,1812);
insert into  State values ('Indiana',7,1816);
insert into  State values ('Mississippi',8,1817);
insert into  State values ('Illinois',8,1818);
insert into  State values ('Alabama',8,1819);
insert into  State values ('Maine',8,1820);
insert into  State values ('Missouri',9,1821);
insert into  State values ('Arkansas',12,1836);
insert into  State values ('Michigan',12,1837);
insert into  State values ('Florida',14,1845);
insert into  State values ('Texas',15,1845);
insert into  State values ('Iowa',15,1846);
insert into  State values ('Wisconsin',15,1848);
insert into  State values ('California',16,1850);
insert into  State values ('Minnesota',18,1858);
insert into  State values ('Oregon',18,1859);
insert into  State values ('Kansas',18,1861);
insert into  State values ('West Virginia',19,1863);
insert into  State values ('Nevada',19,1864);
insert into  State values ('Nebraska',20,1867);
insert into  State values ('Colorado',22,1876);
insert into  State values ('North Dakota',26,1889);
insert into  State values ('South Dakota',26,1889);
insert into  State values ('Montana',26,1889);
insert into  State values ('Washington',26,1889);
insert into  State values ('Idaho',26,1890);
insert into  State values ('Wyoming',26,1890);
insert into  State values ('Utah',27,1896);
insert into  State values ('Oklahoma',30,1907);
insert into  State values ('New Mexico',31,1912);
insert into  State values ('Arizona',31,1912);
insert into  State values ('Alaska',43,1959);
insert into  State values ('Hawaii',43,1959);

rem ###########################################################################

prompt "The Rows for the table PRESIDENT(PN B Y D Pa S) are being inserted ..."
insert into  President values ('Washington G',1732,7,67,'Federalist','Virginia');
insert into  President values ('Adams J',1735,4,90,'Federalist','Massachusetts');
insert into  President values ('Jefferson T',1743,8,83,'Demo-Rep','Virginia');
insert into  President values ('Madison J',1751,8,85,'Demo-Rep','Virginia');
insert into  President values ('Monroe J',1758,8,73,'Demo-Rep','Virginia');
insert into  President values ('Adams J Q',1767,4,80,'Demo-Rep','Massachusetts');
insert into  President values ('Jackson A',1767,8,78,'Democratic','South Carolina');
insert into  President values ('Van Buren M',1782,4,79,'Democratic','New York');
insert into  President values ('Harrison W H',1773,0,68,'Whig','Virginia');
insert into  President values ('Tyler J',1790,3,71,'Whig','Virginia');
insert into  President values ('Polk J K',1795,4,53,'Democratic','North Carolina');
insert into  President values ('Taylor Z',1784,1,65,'Whig','Virginia');
insert into  President values ('Fillmore M',1800,2,74,'Whig','New York');
insert into  President values ('Pierce F',1801,4,64,'Democratic','New Hampshire');
insert into  President values ('Buchanan J',1791,4,77,'Democratic','Pennsylvania');
insert into  President values ('Lincoln A',1809,4,56,'Republican','Kentucky');
insert into  President values ('Johnson A',1808,4,66,'Democratic','North Carolina');
insert into  President values ('Grant U S',1822,8,63,'Republican','Ohio');
insert into  President values ('Hayes R B',1822,4,70,'Republican','Ohio');
insert into  President values ('Garfield J A',1831,0,49,'Republican','Ohio');
insert into  President values ('Arthur C A',1830,3,56,'Republican','Vermont');
insert into  President values ('Cleveland G',1837,8,71,'Democratic','New Jersey');
insert into  President values ('Harrison B',1833,4,67,'Republican','Ohio');
insert into  President values ('McKinley W',1843,4,58,'Republican','Ohio');
insert into  President values ('Roosevelt T',1858,7,60,'Republican','New York');
insert into  President values ('Taft W H',1857,4,72,'Republican','Ohio');
insert into  President values ('Wilson W',1856,8,67,'Democratic','Virginia');
insert into  President values ('Harding W G',1865,2,57,'Republican','Ohio');
insert into  President values ('Coolidge C',1872,5,60,'Republican','Vermont');
insert into  President values ('Hoover H C',1871,4,90,'Republican','Iowa');
insert into  President values ('Roosevelt F D',1882,12,63,'Democratic','New York');
insert into  President values ('Truman H S',1884,7,88,'Democratic','Missouri');
insert into  President values ('Eisenhower D D',1890,8,79,'Republican','Texas');
insert into  President values ('Kennedy J F',1917,2,46,'Democratic','Texas');
insert into  President values ('Johnson L B',1908,5,65,'Democratic','California');
insert into  President values ('Nixon R M',1913,5,NULL,'Republican','Nebraska');
insert into  President values ('Ford G R',1913,5,NULL,'Republican','Georgia');
insert into  President values ('Carter J E',1924,4,NULL,'Democratic','Georgia');
insert into  President values ('Reagan R',1911,8,NULL,'Republican','Illinois');
insert into  President values ('Bush G',1924,4,NULL,'Republican','Massachusetts');
rem insert into  President values ('Clinton W J',1946,1,NULL,'Democratic','?');

rem ###########################################################################

prompt "The rows for the table PRES_HOBBY(P H) are being inserted ..."
insert into  Pres_Hobby values ('Adams J Q','Billards');
insert into  Pres_Hobby values ('Adams J Q','Swimming');
insert into  Pres_Hobby values ('Adams J Q','Walking');
insert into  Pres_Hobby values ('Arthur C A','Fishing');
insert into  Pres_Hobby values ('Cleveland G','Fishing');
insert into  Pres_Hobby values ('Coolidge C','Fishing');
insert into  Pres_Hobby values ('Coolidge C','Golf');
insert into  Pres_Hobby values ('Coolidge C','Indian Clubs');
insert into  Pres_Hobby values ('Coolidge C','Mechanical Horse');
insert into  Pres_Hobby values ('Coolidge C','Pitching Hay');
insert into  Pres_Hobby values ('Eisenhower D D','Bridge');
insert into  Pres_Hobby values ('Eisenhower D D','Golf');
insert into  Pres_Hobby values ('Eisenhower D D','Hunting');
insert into  Pres_Hobby values ('Eisenhower D D','Painting');
insert into  Pres_Hobby values ('Eisenhower D D','Fishing');
insert into  Pres_Hobby values ('Garfield J A','Billards');
insert into  Pres_Hobby values ('Harding W G','Golf');
insert into  Pres_Hobby values ('Harding W G','Poker');
insert into  Pres_Hobby values ('Harding W G','Riding');
insert into  Pres_Hobby values ('Harrison B','Hunting');
insert into  Pres_Hobby values ('Hayes R B','Croquet');
insert into  Pres_Hobby values ('Hayes R B','Driving');
insert into  Pres_Hobby values ('Hayes R B','Shooting');
insert into  Pres_Hobby values ('Hoover H C','Fishing');
insert into  Pres_Hobby values ('Hoover H C','Medicine Ball');
insert into  Pres_Hobby values ('Jackson A','Riding');
insert into  Pres_Hobby values ('Jefferson T','Fishing');
insert into  Pres_Hobby values ('Jefferson T','Riding');
insert into  Pres_Hobby values ('Johnson L B','Riding');
insert into  Pres_Hobby values ('Kennedy J F','Sailing');
insert into  Pres_Hobby values ('Kennedy J F','Swimming');
insert into  Pres_Hobby values ('Kennedy J F','Touch Football');
insert into  Pres_Hobby values ('Lincoln A','Walking');
insert into  Pres_Hobby values ('McKinley W','Riding');
insert into  Pres_Hobby values ('McKinley W','Swimming');
insert into  Pres_Hobby values ('McKinley W','Walking');
insert into  Pres_Hobby values ('Nixon R M','Golf');
insert into  Pres_Hobby values ('Roosevelt F D','Fishing');
insert into  Pres_Hobby values ('Roosevelt F D','Sailing');
insert into  Pres_Hobby values ('Roosevelt F D','Swimming');
insert into  Pres_Hobby values ('Roosevelt T','Boxing');
insert into  Pres_Hobby values ('Roosevelt T','Hunting');
insert into  Pres_Hobby values ('Roosevelt T','Jujitsu');
insert into  Pres_Hobby values ('Roosevelt T','Riding');
insert into  Pres_Hobby values ('Roosevelt T','Shooting');
insert into  Pres_Hobby values ('Roosevelt T','Tennis');
insert into  Pres_Hobby values ('Roosevelt T','Wrestling');
insert into  Pres_Hobby values ('Taft W H','Golf');
insert into  Pres_Hobby values ('Taft W H','Riding');
insert into  Pres_Hobby values ('Taylor Z','Riding');
insert into  Pres_Hobby values ('Truman H S','Fishing');
insert into  Pres_Hobby values ('Truman H S','Poker');
insert into  Pres_Hobby values ('Truman H S','Walking');
insert into  Pres_Hobby values ('Van Buren M','Riding');
insert into  Pres_Hobby values ('Washington G','Fishing');
insert into  Pres_Hobby values ('Washington G','Riding');
insert into  Pres_Hobby values ('Wilson W','Golf');
insert into  Pres_Hobby values ('Wilson W','Riding');
insert into  Pres_Hobby values ('Wilson W','Walking');
insert into  Pres_Hobby values ('Reagan R','SDI');
insert into  Pres_Hobby values ('Bush G','Sailing');

prompt "The rows of the table ADMINISTRATION(A P Y) are being inserted ..."
insert into  Administration values (1,'Washington G',1789);
insert into  Administration values (2,'Washington G',1793);
insert into  Administration values (3,'Adams J',1797);
insert into  Administration values (4,'Jefferson T',1801);
insert into  Administration values (5,'Jefferson T',1805);
insert into  Administration values (6,'Madison J',1809);
insert into  Administration values (7,'Madison J',1813);
insert into  Administration values (8,'Monroe J',1817);
insert into  Administration values (9,'Monroe J',1821);
insert into  Administration values (10,'Adams J Q',1825);
insert into  Administration values (11,'Jackson A',1829);
insert into  Administration values (12,'Jackson A',1833);
insert into  Administration values (13,'Van Buren M',1837);
insert into  Administration values (14,'Harrison W H',1841);
insert into  Administration values (14,'Tyler J',1841);
insert into  Administration values (15,'Polk J K',1845);
insert into  Administration values (16,'Taylor Z',1849);
insert into  Administration values (16,'Fillmore M',1850);
insert into  Administration values (17,'Pierce F',1853);
insert into  Administration values (18,'Buchanan J',1857);
insert into  Administration values (19,'Lincoln A',1861);
insert into  Administration values (20,'Lincoln A',1865);
insert into  Administration values (20,'Johnson A',1865);
insert into  Administration values (21,'Grant U S',1869);
insert into  Administration values (22,'Grant U S',1873);
insert into  Administration values (23,'Hayes R B',1877);
insert into  Administration values (24,'Garfield J A',1881);
insert into  Administration values (24,'Arthur C A',1881);
insert into  Administration values (25,'Cleveland G',1885);
insert into  Administration values (26,'Harrison B',1889);
insert into  Administration values (27,'Cleveland G',1893);
insert into  Administration values (28,'McKinley W',1897);
insert into  Administration values (29,'McKinley W',1901);
insert into  Administration values (29,'Roosevelt T',1901);
insert into  Administration values (30,'Roosevelt T',1905);
insert into  Administration values (31,'Taft W H',1909);
insert into  Administration values (32,'Wilson W',1913);
insert into  Administration values (33,'Wilson W',1917);
insert into  Administration values (34,'Harding W G',1921);
insert into  Administration values (34,'Coolidge C',1923);
insert into  Administration values (35,'Coolidge C',1925);
insert into  Administration values (36,'Hoover H C',1929);
insert into  Administration values (37,'Roosevelt F D',1933);
insert into  Administration values (38,'Roosevelt F D',1937);
insert into  Administration values (39,'Roosevelt F D',1941);
insert into  Administration values (40,'Roosevelt F D',1945);
insert into  Administration values (40,'Truman H S',1945);
insert into  Administration values (41,'Truman H S',1949);
insert into  Administration values (42,'Eisenhower D D',1953);
insert into  Administration values (43,'Eisenhower D D',1957);
insert into  Administration values (44,'Kennedy J F',1961);
insert into  Administration values (44,'Johnson L B',1963);
insert into  Administration values (45,'Johnson L B',1965);
insert into  Administration values (46,'Nixon R M',1969);
insert into  Administration values (47,'Nixon R M',1973);
insert into  Administration values (47,'Ford G R',1974);
insert into  Administration values (48,'Carter J E',1977);
insert into  Administration values (49,'Reagan R',1981);
insert into  Administration values (50,'Reagan R',1985);
insert into  Administration values (51,'Bush G',1989);
rem insert into  Administration values (52,'Clinton W J',1993);

prompt "The rows of the table ADMIN_PR_VP(A P V) are being inserted ..."
insert into  Admin_Pr_Vp values (1,'Washington G','Adams J');
insert into  Admin_Pr_Vp values (2,'Washington G','Adams J');
insert into  Admin_Pr_Vp values (3,'Adams J','Jefferson T');
insert into  Admin_Pr_Vp values (4,'Jefferson T','Burr A');
insert into  Admin_Pr_Vp values (5,'Jefferson T','Clinton G');
insert into  Admin_Pr_Vp values (6,'Madison J','Clinton G');
insert into  Admin_Pr_Vp values (7,'Madison J','Gerry E');
insert into  Admin_Pr_Vp values (8,'Monroe J','Tompkins D');
insert into  Admin_Pr_Vp values (9,'Monroe J','Tompkins D');
insert into  Admin_Pr_Vp values (10,'Adams J Q','Calhoun J');
insert into  Admin_Pr_Vp values (11,'Jackson A','Calhoun J');
insert into  Admin_Pr_Vp values (12,'Jackson A','Van Buren M');
insert into  Admin_Pr_Vp values (13,'Van Buren M','Johnson R M');
insert into  Admin_Pr_Vp values (14,'Harrison W H','Tyler J');
insert into  Admin_Pr_Vp values (15,'Polk J K','Dallas G M');
insert into  Admin_Pr_Vp values (16,'Taylor Z','Fillmore M');
insert into  Admin_Pr_Vp values (17,'Pierce F','De Vane King W R');
insert into  Admin_Pr_Vp values (18,'Buchanan J','Breckinridge J C');
insert into  Admin_Pr_Vp values (19,'Lincoln A','Hamlin H');
insert into  Admin_Pr_Vp values (20,'Lincoln A','Johnson A');
insert into  Admin_Pr_Vp values (21,'Grant U S','Colfax S');
insert into  Admin_Pr_Vp values (22,'Grant U S','Wilson H');
insert into  Admin_Pr_Vp values (23,'Hayes R B','Wheeler W');
insert into  Admin_Pr_Vp values (24,'Garfield J A','Arthur C A');
insert into  Admin_Pr_Vp values (25,'Cleveland G','Hendricks T A');
insert into  Admin_Pr_Vp values (26,'Harrison B','Morton L P');
insert into  Admin_Pr_Vp values (27,'Cleveland G','Stevenson A E');
insert into  Admin_Pr_Vp values (28,'McKinley W','Hobart G A');
insert into  Admin_Pr_Vp values (29,'McKinley W','Roosevelt T');
insert into  Admin_Pr_Vp values (30,'Roosevelt T','Fairbanks C W');
insert into  Admin_Pr_Vp values (31,'Taft W H','Sherman J S');
insert into  Admin_Pr_Vp values (32,'Wilson W','Marshall T R');
insert into  Admin_Pr_Vp values (33,'Wilson W','Marshall T R');
insert into  Admin_Pr_Vp values (34,'Harding W G','Coolidge C');
insert into  Admin_Pr_Vp values (35,'Coolidge C','Dawes C G');
insert into  Admin_Pr_Vp values (36,'Hoover H C','Curtis C');
insert into  Admin_Pr_Vp values (37,'Roosevelt F D','Garner J N');
insert into  Admin_Pr_Vp values (38,'Roosevelt F D','Garner J N');
insert into  Admin_Pr_Vp values (39,'Roosevelt F D','Wallace H A');
insert into  Admin_Pr_Vp values (40,'Roosevelt F D','Truman H S');
insert into  Admin_Pr_Vp values (41,'Truman H S','Barkley A W');
insert into  Admin_Pr_Vp values (42,'Eisenhower D D','Nixon R M');
insert into  Admin_Pr_Vp values (43,'Eisenhower D D','Nixon R M');
insert into  Admin_Pr_Vp values (44,'Kennedy J F','Johnson L B');
insert into  Admin_Pr_Vp values (45,'Johnson L B','Humphrey H H');
insert into  Admin_Pr_Vp values (46,'Nixon R M','Agnew S T');
insert into  Admin_Pr_Vp values (47,'Nixon R M','Agnew S T');
insert into  Admin_Pr_Vp values (47,'Nixon R M','Ford G R');
insert into  Admin_Pr_Vp values (47,'Ford G R','Rockefeller N A');
insert into  Admin_Pr_Vp values (48,'Carter J E','Mondale W F');
insert into  Admin_Pr_Vp values (49,'Reagan R','Bush G');
insert into  Admin_Pr_Vp values (50,'Reagan R','Bush G');
insert into  Admin_Pr_Vp values (51,'Bush G','Quayle D');
rem insert into  Admin_Pr_Vp values (52,'Clinton W J','Gore A');

prompt "The rows of the table PRES_MARRIAGE(PN SN PA SA N M) are being inserted ..."
insert into  Pres_Marriage values ('Washington G','Custis M D',26,27,0,1759);
insert into  Pres_Marriage values ('Adams J','Simth A',28,19,5,1764);
insert into  Pres_Marriage values ('Jefferson T','Skelton M W',28,23,6,1772);
insert into  Pres_Marriage values ('Madison J','Todd D D P',43,26,0,1794);
insert into  Pres_Marriage values ('Monroe J','Kortright E',27,17,3,1786);
insert into  Pres_Marriage values ('Adams J Q','Johnson L C',30,22,4,1797);
insert into  Pres_Marriage values ('Jackson A','Robards R D',26,26,0,1794);
insert into  Pres_Marriage values ('Van Buren M','Hoes H',24,23,4,1807);
insert into  Pres_Marriage values ('Harrison W H','Symmos A T',22,20,10,1795);
insert into  Pres_Marriage values ('Tyler J','Christian L',23,22,8,1813);
insert into  Pres_Marriage values ('Tyler J','Gardiner J',54,24,7,1844);
insert into  Pres_Marriage values ('Polk J K','Chidross S',28,20,0,1824);
insert into  Pres_Marriage values ('Taylor Z','Smith M M',25,21,6,1810);
insert into  Pres_Marriage values ('Fillmore M','Powers A',26,27,2,1826);
insert into  Pres_Marriage values ('Fillmore M','McIntosh C C',58,44,0,1858);
insert into  Pres_Marriage values ('Pierce F','Appleton J M',29,28,3,1834);
insert into  Pres_Marriage values ('Lincoln A','Todd M',33,23,4,1842);
insert into  Pres_Marriage values ('Johnson A','McCardle E',18,16,5,1827);
insert into  Pres_Marriage values ('Grant U S','Dent J B',26,22,4,1848);
insert into  Pres_Marriage values ('Hayes R B','Webb L W',30,21,8,1852);
insert into  Pres_Marriage values ('Garfield J A','Rudolph L',26,26,7,1853);
insert into  Pres_Marriage values ('Arthur C A','Horndon E L',29,22,3,1859);
insert into  Pres_Marriage values ('Cleveland G','Folson F',49,21,5,1886);
insert into  Pres_Marriage values ('Harrison B','Scott C L',20,21,2,1853);
insert into  Pres_Marriage values ('Harrison B','Dimmick M S L',62,37,1,1896);
insert into  Pres_Marriage values ('McKinley W','Saxton I',27,23,2,1871);
insert into  Pres_Marriage values ('Roosevelt T','Lee A H',22,19,1,1880);
insert into  Pres_Marriage values ('Roosevelt T','Carow E K',28,25,5,1886);
insert into  Pres_Marriage values ('Taft W H','Horron H',28,25,3,1886);
insert into  Pres_Marriage values ('Wilson W','Axson E L',28,25,3,1885);
insert into  Pres_Marriage values ('Wilson W','Galt E B',58,43,0,1915);
insert into  Pres_Marriage values ('Harding W G','DeWolfe F K',25,30,0,1891);
insert into  Pres_Marriage values ('Coolidge C','Goodhue G A',33,26,2,1905);
insert into  Pres_Marriage values ('Hoover H C','Henry L',24,23,2,1899);
insert into  Pres_Marriage values ('Roosevelt F D','Roosevelt A E',23,20,6,1905);
insert into  Pres_Marriage values ('Truman H S','Wallace E V',35,34,1,1918);
insert into  Pres_Marriage values ('Eisenhower D D','Doud G',25,19,2,1916);
insert into  Pres_Marriage values ('Kennedy J F','Bouvier J L',36,24,3,1953);
insert into  Pres_Marriage values ('Johnson L B','Taylor C A',26,21,2,1934);
insert into  Pres_Marriage values ('Nixon R M','Ryan T C',27,28,2,1940);
insert into  Pres_Marriage values ('Ford G R','Warren E B',35,30,4,1948);
insert into  Pres_Marriage values ('Carter J E','Smith R',21,18,4,1946);
insert into  Pres_Marriage values ('Reagan R','Wyman J',28,25,2,1940);
insert into  Pres_Marriage values ('Reagan R','Davis N',41,28,2,1952);
insert into  Pres_Marriage values ('Bush G','Pierce B',20,19,5,1945);
rem insert into  Pres_Marriage values ('Clinton W J','C Hillary',?,?,?,?);

prompt "The rows of the table ELECTION(E C V W) are being inserted ..."
insert into  Election values (1789,'Washington G',69,'W');
insert into  Election values (1789,'Adams J',34,'L');
insert into  Election values (1789,'Jay J',9,'L');
insert into  Election values (1789,'Harrison R H',6,'L');
insert into  Election values (1789,'Rutledge J',6,'L');
insert into  Election values (1789,'Hancock J',4,'L');
insert into  Election values (1789,'Clinton G',3,'L');
insert into  Election values (1789,'Huntington S',2,'L');
insert into  Election values (1789,'Milton J',2,'L');
insert into  Election values (1789,'Armstrong J',1,'L');
insert into  Election values (1789,'Lincoln B',1,'L');
insert into  Election values (1789,'Telfair E',1,'L');
insert into  Election values (1792,'Washington G',132,'W');
insert into  Election values (1792,'Adams J',77,'L');
insert into  Election values (1792,'Clinton G',50,'L');
insert into  Election values (1792,'Jefferson T',4,'L');
insert into  Election values (1792,'Burr A',1,'L');
insert into  Election values (1796,'Adams J',71,'W');
insert into  Election values (1796,'Jefferson T',68,'L');
insert into  Election values (1796,'Pinckney T',59,'L');
insert into  Election values (1796,'Burr A',30,'L');
insert into  Election values (1796,'Adams S',15,'L');
insert into  Election values (1796,'Ellsworth O',11,'L');
insert into  Election values (1796,'Clinton G',7,'L');
insert into  Election values (1796,'Jay J',5,'L');
insert into  Election values (1796,'Iredell J',3,'L');
insert into  Election values (1796,'Henry J',2,'L');
insert into  Election values (1796,'Johnson S',2,'L');
insert into  Election values (1796,'Washington G',2,'L');
insert into  Election values (1796,'Pinckney C C',1,'L');
insert into  Election values (1960,'Bird',15,'L');
insert into  Election values (1964,'Johnson L B',486,'W');
insert into  Election values (1964,'Goldwater B',52,'L');
insert into  Election values (1968,'Nixon R M',302,'W');
insert into  Election values (1968,'Humphrey H H',191,'L');
insert into  Election values (1968,'Wallace G C',46,'L');
insert into  Election values (1972,'Nixon R M',520,'W');
insert into  Election values (1972,'McGovern G S',17,'L');
insert into  Election values (1972,'Hospers J',1,'L');
insert into  Election values (1976,'Carter J E',297,'W');
insert into  Election values (1976,'Ford G R',240,'L');
insert into  Election values (1980,'Reagan R',489,'W');
insert into  Election values (1980,'Carter J E',49,'L');
insert into  Election values (1984,'Reagan R',525,'W');
insert into  Election values (1984,'Mondale W',13,'L');
insert into  Election values (1988,'Bush G',426,'W');
insert into  Election values (1988,'Dukakis M',112,'L');
insert into  Election values (1992,'Clinton W J',370,'W');
insert into  Election values (1992,'Bush G',168,'L');
insert into  Election values (1992,'Perot R',0,'L');

rem ##################################################################

prompt "This script gives read rights on all presidential tables to public ..."

grant select on president      to public;
grant select on state          to public;
grant select on pres_hobby     to public;
grant select on administration to public;
grant select on admin_pr_vp    to public;
grant select on pres_marriage  to public;
grant select on election       to public;

rem ##################################################################

commit;