Databases Reference
In-Depth Information
erhöht. Die Variable name2 wird mit dem Wert der Variablen
name initialisiert und. falls name NULL sein sollte, durch „Un-
bekannt“ ersetzt.
CREATE OR REPLACE PROCEDURE Hallo3
(name VARCHAR, alt INTEGER, beruf VARCHAR)
IS
zaehler INTEGER DEFAULT 0;
name2 VARCHAR(10) DEFAULT name;
BEGIN
IF name IS NULL THEN
BEGIN
zaehler:=zaehler+1;
name2:='Unbekannt';
END;
END IF;
DBMS_OUTPUT.PUT(name2);
IF beruf IS NULL AND alt IS NULL
THEN
zaehler:=zaehler+2;
DBMS_OUTPUT.PUT_LINE('.');
ELSIF alt IS NULL THEN
zaehler:=zaehler+1;
DBMS_OUTPUT.PUT_LINE(' ist '||beruf||'.');
ELSIF beruf IS NULL THEN
zaehler:=zaehler+1;
DBMS_OUTPUT.PUT_LINE(' ist '||alt
||' Jahre alt.');
ELSE
IF alt<25
THEN
DBMS_OUTPUT.PUT_LINE(' ist schon '
||beruf||'.');
ELSE
DBMS_OUTPUT.PUT_LINE(' ('||alt
||') ist '||beruf||'.');
END IF;
END IF;
DBMS_OUTPUT.PUT_LINE(zaehler
||' fehlende Angaben');
END;
Wie jedes sonstige Programm auch, müssen PL/SQL-Proze-
duren systematisch getestet werden. Dies geschieht hier exemp-
larisch durch die folgenden Testfälle, die auch die genaue
Funktionalität weiter verdeutlichen. Zum professionellen Tes-
ten gibt es Entwicklungsumgebungen mit Debug-Möglichkei-
ten. Ein systematischer Ansatz zur Testerstellung wird im Kapi-
tel über das Testen vorgestellt.
systematisches
Testen von Pro-
grammen
250
