Universität Gesamthochschule Kassel
Online-Datenbanken
Testdatenbank DBLAND
%{
******************************************************************************
macro4.d2w
Datenbank: DBLAND
Tabellen : STAEDTE und LAENDER
Funktion :
Attribute der Staedte:
Name, beliebige Spalte (ais Spalte aus Tabelle STEADTE)
Land (als Spalte aus Tabelle LAENDER)
Auswahl nach der Zugehoerigkeit zum Land
Besonderheit :
Auswahl der Landeszugeoerigkeit ueber Optionsschalter
Version : 02.06.98
******************************************************************************
%}
%{
******************************************************************************
Define Section:
******************************************************************************
%}
%DEFINE{
DATABASE="dbland"
SHOWSQL="YES"
%LIST " </TH> <TH> " NLIST
%LIST " </TD> <TD> " VLIST
%}
%{
******************************************************************************
SQL Section:
******************************************************************************
%}
%SQL (sql_anweisung) {
select s.NAME,s.$(spalte),l.NAME,l.EINW,s.$(spalte)*100/l.EINW
from HORN.STAEDTE AS s, HORN.LAENDER AS l
where s.LAND=l.LAND
AND l.LAND = $(land)
AND s.$(spalte) $(bedingung)
%SQL_REPORT{
<HR>
Ergebnis der Suchanfrage :
<P>
<TABLE border="1">
<TR> <TH> lfde.Nr. </TH> <TH> Stadt </TH> <TH> $(spalte) </TH>
<TH> Land </TH> <TH> Einw.Land </TH> <TH> Prozent </TH>
</TR>
%ROW{
<TR> <TD> $(ROW_NUM) </TD> <TD>$(VLIST) </TD> </TR>
%}
</TABLE>
<P>
Es wurden $(ROW_NUM) Städte ausgewählt.
<HR>
%}
%SQL_MESSAGE {
100 : "in dem Land liegt keine Stadt mit der Bedingung $(spalte) $(bedingung)" : exit
%}
%}
%{
******************************************************************************
HTML_INPUT Section:
******************************************************************************
%}
%HTML_INPUT{
<HTML>
<HEAD>
<TITLE>db2www-dbland-macro4 </TITLE>
</HEAD>
<BODY>
<H1> Zugriff auf Datenbank klaus</H1>
<H2> Tabellen : STAEDTE und LAENDER </H2>
<p>
<H3> Beispiel 4 : </H3>
Auswahl der Städte aus einem Land. <BR>
Vorgabe eines Attributes und einer Bedingung hierfür.
<P>
<FORM METHOD="POST"
ACTION="/cgi-bin/db2www/dbland/macro4.d2w/report">
<P>
Auswahl des Landes: <BR>
<SELECT NAME="land">
<OPTION VALUE="'BW'"> Baden-Württemberg
<OPTION VALUE="'BY'"> Bayern
<OPTION VALUE="'B '"> Berlin
<OPTION VALUE="'HB'"> Bremen
<OPTION VALUE="'HH'"> Hamburg
<OPTION VALUE="'HE'"> Hessen
<OPTION VALUE="'NS'"> Niedersachsen
<OPTION VALUE="'NW'"> Nordrhein-Westfalen
<OPTION VALUE="'RP'"> Rheinland-Pfalz
<OPTION VALUE="'SR'"> Saarland
<OPTION VALUE="'SH'"> Schleswig-Holstein
</SELECT>
<P>
Auswahl des Attributes zur Stadt: <BR>
<SELECT NAME="spalte">
<OPTION VALUE="BEV_1900"> Einwohnerzahl 1900
<OPTION VALUE="BEV_1939"> Einwohnerzahl 1939
<OPTION VALUE="BEV_1981"> Einwohnerzahl 1981
</SELECT>
<P>
Auswahl-Bedingung für das Attribut $(spalte): <BR>
<INPUT TYPE="text" NAME="bedingung" VALUE=">100">
<hr>
<INPUT TYPE="submit" VALUE="Submit Query"> <INPUT TYPE="reset" VALUE="Reset">
</FORM>
</BODY>
</HTML>
%}
%{
******************************************************************************
HTML_REPORT Section:
******************************************************************************
%}
%HTML_REPORT{
<HTML>
<HEAD>
<TITLE>db2www-dbland-macro3 </TITLE>
</HEAD>
<BODY>
<H1> Zugriff auf Datenbank dbland</H1>
<H2> Tabellen : STAEDTE und LAENDER </H2>
<p>
<H3> Beispiel 4 : </H3>
Liste der Städte aus dem Land $(land) <br>
mit der Bedingung $(spalte) $(bedingung)
<P>
%exec_sql(sql_anweisung)
</BODY>
</HTML>
%}
Letzte Modifikation: 08.06.98
Autor,Verantwortlicher : K.Horn - HRZ
horn@hrz.uni-kassel.de