CREATE OR REPLACE PACKAGE pack_test IS -- Globale Variablen
g_var NUMBER(5);
-- Globale Proceduren
PROCEDURE mehr_gehalt (
mit_nr IN NUMBER
); --Globale Funktionen
FUNCTION berechnen (
x IN NUMBER
) RETURN NUMBER;
--Globale Cursor
CURSOR c_pack IS
SELECT
ename,
sal
FROM
emp; -- Globale Exceptions
value_to_long_fehler EXCEPTION;
PRAGMA exception_init ( value_to_long_fehler, -1438 );
END pack_test;
/