DO
statement
DOEND
|
Dieses Dokument behandelt folgende Themen:
Eine Erläuterung der in dem Syntax-Diagramm verwendeten Symbole entnehmen Sie dem Abschnitt Syntax-Symbole.
Die Statements DO
und DOEND
werden im
Reporting Mode verwendet, wenn mehrere Statements in Abhängigkeit von einer
logischen Bedingung ausgeführt werden sollen.
Die Statements DO
und DOEND
gelten nur im
Reporting Mode.
WRITE TITLE
,
WRITE TRAILER
, und die
Bedingungs-Statements, die mit AT
beginnen (AT BREAK
,
AT END OF DATA
,
AT END OF PAGE
,
AT START OF DATA
,
AT TOP OF PAGE
) dürfen
innerhalb einer DO
/DOEND
-Konstruktion nicht verwendet
werden..
Wenn Sie innerhalb einer
DO
/DOEND
-Konstruktion eine Verarbeitungsschleife
initiieren, müssen Sie sie vor dem DOEND
-Statement wieder
schließen.
** Example 'DOEEX1': DO/DOEND ************************************************************************ * EMP. FIND EMPLOYEES WITH CITY = 'MILWAUKEE' VEH. FIND VEHICLES WITH PERSONNEL-ID = PERSONNEL-ID IF NO RECORDS FOUND DO ESCAPE DOEND DISPLAY PERSONNEL-ID (EMP.) NAME (EMP.) SALARY (EMP.,1) MAKE (VEH.) MAINT-COST (VEH.,1) AT END OF DATA DO WRITE NOTITLE / 10X 'AVG SALARY:' T*SALARY (1) AVER(SALARY (1)) / 10X 'AVG MAINTENANCE (ZERO VALUES EXCLUDED):' T*MAINT-COST (1) NAVER(MAINT-COST (1)) DOEND /* LOOP LOOP END
Ausgabe des Programms DOEEX1
:
PERSONNEL NAME ANNUAL MAKE MAINT-COST ID SALARY --------- -------------------- ---------- -------------------- ---------- 20021100 JONES 31000 GENERAL MOTORS 140 20027800 LAWLER 29000 GENERAL MOTORS 0 20027800 LAWLER 29000 TOYOTA 86 20030600 NORDYKE 47000 FORD 194 AVG SALARY: 35666 AVG MAINTENANCE (ZERO VALUES EXCLUDED): 140