also hier ist mein ganzer Quellcode
BEGIN
v_probe := 511;
v_million := (v_probe - MOD( v_probe, c_million )) / c_million;
v_probe := v_probe - v_million*c_million;
v_tausend := (v_probe - MOD( v_probe, c_tausend )) / c_tausend;
v_probe := v_probe - v_tausend*c_tausend;
v_hundert := (v_probe - MOD( v_probe, c_hundert )) / c_hundert;
v_probe := v_probe - v_hundert*c_hundert;
v_zehner := (v_probe - MOD( v_probe, c_zehner )) / c_zehner;
v_einer := v_probe - v_zehner*c_zehner;
---------------------------------------------------------------------------
v_hundert_char := EinerWandeln( v_hundert);
v_zehner_char := EinerWandeln( v_zehner );
v_einer_char := EinerWandeln( v_einer );
--Wandelt Eigenständige Zahlen im Bereich 0 - 99 um
IF v_hundert_char = 'null' THEN
v_hundert_char := '';
v_ergebnis := v_einer_char||v_zehner_char;
ELSIF v_zehner = 0 THEN
v_zehner_char := '';
v_ergebnis := v_hundert_char||c_hundert_char||
c_und||v_einer_char;
ELSIF v_zehner = 1 THEN
v_zehner_char := 'zehn' ;
v_ergebnis := v_hundert_char|| c_hundert_char||
v_einer_char||v_zehner_char;
ELSIF v_zehner = 2 THEN
v_zehner_char := 'zwan';
v_ergebnis := v_hundert_char|| c_hundert_char||
v_einer_char||c_und||
v_zehner_char||c_zehner_char;
ELSIF v_zehner = 3 THEN
v_zehner_char := 'dreissig';
v_ergebnis := v_hundert_char|| c_hundert_char||
v_einer_char||c_und||v_zehner_char;
ELSIF v_zehner = 6 THEN
v_zehner_char := 'sech';
v_ergebnis := v_hundert_char|| c_hundert_char||
v_einer_char||c_und||
v_zehner_char||c_zehner_char;
ELSIF v_zehner = 1 AND v_einer = 0 THEN
v_ausnahme := 'zehn';
v_ergebnis := v_hundert_char|| c_hundert_char||
c_und||v_ausnahme;
ELSIF v_zehner = 1 AND v_einer = 2 THEN
v_ausnahme := 'elf';
v_ergebnis := v_hundert_char|| c_hundert_char||
c_und||v_ausnahme;
ELSIF v_zehner = 1 AND v_einer = 2 THEN
v_ausnahme := 'zwoelf';
v_ergebnis := v_hundert_char|| c_hundert_char||
c_und||v_ausnahme;
ELSE v_ergebnis := v_hundert_char || c_hundert_char ||
v_einer_char || c_und ||
v_zehner_char || c_zehner_char ;
END IF;
dbms_output.put_line( v_ergebnis );
END;
hoffe du blickst durch