ING_DB
This commit is contained in:
Oliver Lehmann
parent
7aa015e489
commit
5799b68c01
|
|
@ -0,0 +1,87 @@
|
||||||
|
#
|
||||||
|
# MAKEFILE ZUR INSTALLATION DER DEMONSTRATIONEN
|
||||||
|
# ---------------------------------------------
|
||||||
|
#
|
||||||
|
# (Alle Funkionen koennen auch mit grossen Buchstaben
|
||||||
|
# aufgerufen werden !)
|
||||||
|
#
|
||||||
|
# FUNKTIONSBESCHREIBUNG
|
||||||
|
# ---------------------
|
||||||
|
#
|
||||||
|
# ----- make INSTALL
|
||||||
|
# installiert das Kommando `demodb' zur Erzeugung
|
||||||
|
# einer vollstaendigen Demonstrationsdatenbank
|
||||||
|
# durch einen Datenbanknutzer oeffentlich.
|
||||||
|
# Zusaetzlich wird das Kommando `tutdb' zum auto-
|
||||||
|
# matischen Abarbeiten der QL-Lehrbeispiele erzeugt.
|
||||||
|
#
|
||||||
|
# ----- make CLEAN
|
||||||
|
# loescht alle generierten und installierten Beispiele.
|
||||||
|
#
|
||||||
|
|
||||||
|
|
||||||
|
#
|
||||||
|
# ----- BASIS DEFINITIONEN
|
||||||
|
#
|
||||||
|
SHELL= /bin/sh
|
||||||
|
BIN= ../../bin
|
||||||
|
RM= rm -f
|
||||||
|
CP= cp
|
||||||
|
CHMOD= chmod
|
||||||
|
MODE= 0755
|
||||||
|
|
||||||
|
|
||||||
|
#
|
||||||
|
# ----- INSTALL
|
||||||
|
# installiert das Kommando `demodb' zur Erzeugung
|
||||||
|
# einer vollstaendigen Demonstrationsdatenbank
|
||||||
|
# durch einen Datenbanknutzer oeffentlich.
|
||||||
|
# Zusaetzlich wird das Kommando `tutdb' zum auto-
|
||||||
|
# matischen Abarbeiten der QL-Lehrbeispiele erzeugt.
|
||||||
|
# Beide Kommandos erhalten als Argument ein vom
|
||||||
|
# Nutzer vorzuschlagenden Datenbanknamen.
|
||||||
|
#
|
||||||
|
INSTALL: install
|
||||||
|
|
||||||
|
install: $(BIN)/demodb $(BIN)/tutdb
|
||||||
|
|
||||||
|
$(BIN)/demodb: demodb
|
||||||
|
$(CP) demodb $@
|
||||||
|
@$(CHMOD) $(MODE) $@
|
||||||
|
|
||||||
|
$(BIN)/tutdb: tutdb
|
||||||
|
$(CP) tutdb $@
|
||||||
|
@$(CHMOD) $(MODE) $@
|
||||||
|
|
||||||
|
#
|
||||||
|
# ----- CLEAN
|
||||||
|
# loescht alle generierten und installierten Beispiele.
|
||||||
|
#
|
||||||
|
CLEAN: clean
|
||||||
|
|
||||||
|
clean:
|
||||||
|
@-$(RM) $(BIN)/demodb $(BIN)/tutdb
|
||||||
|
|
||||||
|
|
||||||
|
#
|
||||||
|
# FOLGENDE FUNKTION SIND INTERN
|
||||||
|
#
|
||||||
|
HOME= /z/dbs/demo/ql
|
||||||
|
DISK= /dev/dbs
|
||||||
|
SRC= Makefile READ_ME abt artikel \
|
||||||
|
erfindungen lager lieferant lieferung \
|
||||||
|
personal teile verkauf demodb \
|
||||||
|
tutdb tutorial
|
||||||
|
|
||||||
|
.save: $(SRC)
|
||||||
|
mount $(DISK) /wrk
|
||||||
|
cp $? $@ /wrk/demo_ql
|
||||||
|
> $@
|
||||||
|
umount $(DISK)
|
||||||
|
|
||||||
|
$(HOME)/.save: $(SRC)
|
||||||
|
cp $? $(HOME)
|
||||||
|
> $@
|
||||||
|
|
||||||
|
.PRECIOUS: .save
|
||||||
|
.PRECIOUS: $(HOME)/.save
|
||||||
|
|
@ -0,0 +1,227 @@
|
||||||
|
if test "$1" = "" ; then
|
||||||
|
echo Kein Datenbankname spezifiziert
|
||||||
|
exit
|
||||||
|
fi
|
||||||
|
echo Die Datenbank $1 wird erstellt -- bitte warten Sie !
|
||||||
|
if creatdb -c $2 $1 ; then echo Erzeugen der Relationen laeuft ; else exit; fi
|
||||||
|
iql -s $1 << 'EOF'
|
||||||
|
|
||||||
|
:: abt
|
||||||
|
\print
|
||||||
|
\reset
|
||||||
|
create abt
|
||||||
|
(
|
||||||
|
num is i2,
|
||||||
|
name is c20,
|
||||||
|
lager is i2,
|
||||||
|
etage is i2,
|
||||||
|
leiter is i2
|
||||||
|
)
|
||||||
|
copy abt
|
||||||
|
(
|
||||||
|
num is c0,
|
||||||
|
name is c0,
|
||||||
|
lager is c0,
|
||||||
|
etage is c0,
|
||||||
|
leiter is c0nl
|
||||||
|
)
|
||||||
|
from "{pathname}/demo/ql/abt"
|
||||||
|
range of abt is abt
|
||||||
|
define permit all on abt to all
|
||||||
|
\go
|
||||||
|
:: artikel
|
||||||
|
\print
|
||||||
|
\reset
|
||||||
|
create artikel
|
||||||
|
(
|
||||||
|
num is i2,
|
||||||
|
name is c20,
|
||||||
|
abt is i2,
|
||||||
|
preis is i2,
|
||||||
|
menge is i2,
|
||||||
|
lieferant is i2
|
||||||
|
)
|
||||||
|
copy artikel
|
||||||
|
(
|
||||||
|
num is c0,
|
||||||
|
name is c0,
|
||||||
|
abt is c0,
|
||||||
|
preis is c0,
|
||||||
|
menge is c0,
|
||||||
|
lieferant is c0nl
|
||||||
|
)
|
||||||
|
from "{pathname}/demo/ql/artikel"
|
||||||
|
range of artikel is artikel
|
||||||
|
define permit all on artikel to all
|
||||||
|
\go
|
||||||
|
:: erfind
|
||||||
|
\print
|
||||||
|
\reset
|
||||||
|
create erfind
|
||||||
|
(
|
||||||
|
erfindung is c36,
|
||||||
|
erfinder is c20,
|
||||||
|
jahr is c9,
|
||||||
|
land is c12
|
||||||
|
)
|
||||||
|
copy erfind
|
||||||
|
(
|
||||||
|
x0 is "d0'",
|
||||||
|
erfindung is "c0'",
|
||||||
|
x1 is d2,
|
||||||
|
erfinder is "c0'",
|
||||||
|
x2 is "d0'",
|
||||||
|
jahr is "c0'",
|
||||||
|
x3 is d2,
|
||||||
|
land is "c0'",
|
||||||
|
x4 is "d0;",
|
||||||
|
x5 is d0nl
|
||||||
|
)
|
||||||
|
from "{pathname}/demo/ql/erfindungen"
|
||||||
|
range of erfind is erfind
|
||||||
|
define permit all on erfind to all
|
||||||
|
\go
|
||||||
|
:: lager
|
||||||
|
\print
|
||||||
|
\reset
|
||||||
|
create lager
|
||||||
|
(
|
||||||
|
num is i2,
|
||||||
|
ort is c15,
|
||||||
|
plz is i2,
|
||||||
|
strasse is c15
|
||||||
|
)
|
||||||
|
copy lager
|
||||||
|
(
|
||||||
|
num is c0,
|
||||||
|
ort is c0,
|
||||||
|
plz is c0,
|
||||||
|
strasse is c0nl
|
||||||
|
)
|
||||||
|
from "{pathname}/demo/ql/lager"
|
||||||
|
range of lager is lager
|
||||||
|
define permit all on lager to all
|
||||||
|
\go
|
||||||
|
:: lieferant
|
||||||
|
\print
|
||||||
|
\reset
|
||||||
|
create lieferant
|
||||||
|
(
|
||||||
|
num is i2,
|
||||||
|
name is c15,
|
||||||
|
ort is c15,
|
||||||
|
plz is i2,
|
||||||
|
strasse is c15
|
||||||
|
)
|
||||||
|
copy lieferant
|
||||||
|
(
|
||||||
|
num is c0,
|
||||||
|
name is c0,
|
||||||
|
ort is c0,
|
||||||
|
plz is c0,
|
||||||
|
strasse is c0nl
|
||||||
|
)
|
||||||
|
from "{pathname}/demo/ql/lieferant"
|
||||||
|
range of lieferant is lieferant
|
||||||
|
define permit all on lieferant to all
|
||||||
|
\go
|
||||||
|
:: lieferung
|
||||||
|
\print
|
||||||
|
\reset
|
||||||
|
create lieferung
|
||||||
|
(
|
||||||
|
lnum is i2,
|
||||||
|
tnum is i2,
|
||||||
|
bnum is i2,
|
||||||
|
liefdat is c8,
|
||||||
|
menge is i2
|
||||||
|
)
|
||||||
|
copy lieferung
|
||||||
|
(
|
||||||
|
lnum is c0,
|
||||||
|
tnum is c0,
|
||||||
|
bnum is c0,
|
||||||
|
liefdat is c0,
|
||||||
|
menge is c0nl
|
||||||
|
)
|
||||||
|
from "{pathname}/demo/ql/lieferung"
|
||||||
|
range of lieferung is lieferung
|
||||||
|
define permit all on lieferung to all
|
||||||
|
\go
|
||||||
|
:: personal
|
||||||
|
\print
|
||||||
|
\reset
|
||||||
|
create personal
|
||||||
|
(
|
||||||
|
num is i2,
|
||||||
|
name is c20,
|
||||||
|
gehalt is i2,
|
||||||
|
leiter is i2,
|
||||||
|
gebdat is i2,
|
||||||
|
einstdat is i2
|
||||||
|
)
|
||||||
|
copy personal
|
||||||
|
(
|
||||||
|
num is c0,
|
||||||
|
name is c0,
|
||||||
|
gehalt is c0,
|
||||||
|
leiter is c0,
|
||||||
|
gebdat is c0,
|
||||||
|
einstdat is c0nl
|
||||||
|
)
|
||||||
|
from "{pathname}/demo/ql/personal"
|
||||||
|
range of personal is personal
|
||||||
|
define permit all on personal to all
|
||||||
|
\go
|
||||||
|
:: teile
|
||||||
|
\print
|
||||||
|
\reset
|
||||||
|
create teile
|
||||||
|
(
|
||||||
|
tnum is i2,
|
||||||
|
tname is c20,
|
||||||
|
farbe is c8,
|
||||||
|
gewicht is i2,
|
||||||
|
menge is i2
|
||||||
|
)
|
||||||
|
copy teile
|
||||||
|
(
|
||||||
|
tnum is c0,
|
||||||
|
tname is c0,
|
||||||
|
farbe is c0,
|
||||||
|
gewicht is c0,
|
||||||
|
menge is c0nl
|
||||||
|
)
|
||||||
|
from "{pathname}/demo/ql/teile"
|
||||||
|
range of teile is teile
|
||||||
|
define permit all on teile to all
|
||||||
|
\go
|
||||||
|
:: verkauf
|
||||||
|
\print
|
||||||
|
\reset
|
||||||
|
create verkauf
|
||||||
|
(
|
||||||
|
num is c6,
|
||||||
|
datum is c8,
|
||||||
|
lager is i2,
|
||||||
|
abt is i2,
|
||||||
|
artikel is i2,
|
||||||
|
menge is i2,
|
||||||
|
person is i2
|
||||||
|
)
|
||||||
|
copy verkauf
|
||||||
|
(
|
||||||
|
num is c0,
|
||||||
|
datum is c0,
|
||||||
|
lager is c0,
|
||||||
|
abt is c0,
|
||||||
|
artikel is c0,
|
||||||
|
menge is c0,
|
||||||
|
person is c0nl
|
||||||
|
)
|
||||||
|
from "{pathname}/demo/ql/verkauf"
|
||||||
|
range of verkauf is verkauf
|
||||||
|
define permit all on verkauf to all
|
||||||
|
\go
|
||||||
|
EOF
|
||||||
|
echo Datenbank $1 erstellt
|
||||||
Loading…
Reference in New Issue