DCP_REDABAS4__Progra.. - Das ist die Eingangsseite, an der ...
DCP_REDABAS4__Progra.. - Das ist die Eingangsseite, an der ...
DCP_REDABAS4__Progra.. - Das ist die Eingangsseite, an der ...
Erfolgreiche ePaper selbst erstellen
Machen Sie aus Ihren PDF Publikationen ein blätterbares Flipbook mit unserer einzigartigen Google optimierten e-Paper Software.
Sie erinnern sich sicher, dass das Ziel unseres Beispiels darin<br />
besteht, <strong>die</strong> Kosten <strong>der</strong> Teile eines Auftrags und dessen Gesamtkosten<br />
zu ermitteln, d. h. das Feld "betrag" <strong>der</strong> Datei<br />
"aufpos", das gegenwaertig 0.00 enthaelt (vgl. Bild 73) durch<br />
den sich aus preis*<strong>an</strong>z ("preis" aus Datei "best<strong>an</strong>d", 't<strong>an</strong>z"~ aus<br />
Datei "aufpos") ergebenden Betrag zu ersetzen.<br />
Wir verwenden dafuer den schon im Abschnitt<br />
REPLACE-Befehl.<br />
3.1.3. erwaehnten<br />
REPLACE betrag WITH be->preis * <strong>an</strong>z<br />
Beachten Sie, dass Fel<strong>der</strong>n, <strong>die</strong> ausserhalb des aktuellen<br />
Bereiches <strong>an</strong>gesprochen werden, <strong>der</strong> Aliasname vor<strong>an</strong>gestellt<br />
werden muss. Da wir uns im ersten Arbeitsbereich befinden, gilt<br />
<strong>die</strong>s fuer das Datenfeld "preis" <strong>der</strong> Datei "best<strong>an</strong>d'l.<br />
Nachdem <strong>die</strong> Kosten <strong>der</strong> ersten Position eines Auftrags berechnet<br />
wurden, gehen wir zur naechsten Auftragsposition ueber. Der<br />
naechste Satz <strong>der</strong> Datei im Bereich 1 ("aufpos") muss auf <strong>die</strong><br />
gleiche Weise bearbeitet werden.<br />
Mit dem Befehl<br />
SKIP<br />
wird zum naechsten Datensatz uebergeg<strong>an</strong>gen und <strong>der</strong><br />
REPLACE-Befehl gegeben.<br />
Die Befehlsfolge muss so l<strong>an</strong>ge fortgesetzt werden,<br />
letzte Datensatz <strong>der</strong> Primaerdatei bearbeitet wurde.<br />
gleiche<br />
bis<br />
<strong>der</strong><br />
Sie werden sicherlich bemerkt haben, dass <strong>die</strong>se Art <strong>der</strong> Bearbeitung,<br />
d. h. fuer jeden Datensatz <strong>die</strong> gleiche Befehlsfolge<br />
ablaufen zu lassen, keinesfalls effektiv <strong>ist</strong>. Wir wollten Ihnen<br />
<strong>an</strong>h<strong>an</strong>d des vor<strong>an</strong>gehenden Beispiels lediglich <strong>die</strong> Wirkungsweise<br />
<strong>der</strong> gleichzeitigen Bearbeitung von Dateien demonstrieren, im<br />
naechsten Kapitel "<strong>Progra</strong>mmiereni' werden Sie kennenlernen, wie<br />
<strong>der</strong>artige gleichartige Befehlsfolgen als programmschleifen<br />
ausgebildet werden koennen.<br />
Im Bild 74 <strong>ist</strong> <strong>die</strong> eben beschriebene Befehlsfolge noch einmal<br />
dargestellt.<br />
USE best<strong>an</strong>d<br />
INDEX ON teilnr TO teilbes<br />
SELECT 1<br />
USE aufpos ALIAS auf<br />
SELECT 2<br />
USE best<strong>an</strong>d INDEX teilbes ALIAS be<br />
SELECT 1<br />
SET RELATION TO teilnr INTO be<br />
REPLACE betrag WITH be->preis * <strong>an</strong>z<br />
SKIP<br />
REPLACE betrag WITH be->preis * <strong>an</strong>z<br />
SKIP<br />
Bild 74<br />
Befehlsfolge fuer gleichzeitiges Bearbeiten<br />
von Datenb<strong>an</strong>kdateien<br />
- 106 -