Her giver jeg et eksempel på at udskrive 1 til 10 uden at bruge loopet i PL/SQL. Du kan udskrive op til et hvilket som helst tal ved at ændre værdien 10 til et hvilket som helst tal, f.eks. 100.
PL/SQL-program til at udskrive 1 til 10 uden at bruge loop
I nedenstående program bruger jeg PL/SQL-etiketter i stedet for løkken til at øge værdien og udskrive. I label named (label_main) øger jeg værdien af variablen (i) og kontrollerer, om dens værdi er større end 10, og sender derefter kontrollen til en etiket med navnet (label_end), ellers overfører jeg kontrol til label (label_main). Du kan ændre værdien i IF-tilstanden fra 10 til det ønskede tal for at udskrive op til det tal.
SET SERVEROUTPUT ON;
DECLARE
i NUMBER;
BEGIN
i := 0;
<<label_main>>
i := i + 1;
IF i > 10
THEN
GOTO label_end;
END IF;
<<label_print>>
DBMS_OUTPUT.put_line (i);
GOTO label_main;
<<label_end>>
NULL;
END;
/ Output
1 2 3 4 5 6 7 8 9 10 PL/SQL procedure successfully completed.