Du rufst sie auf, wie du sie in Delphi aufrufen würdest.
Und wie ich dir im anderen Thread empfahl: benutzte keine globalen Futionen, das wird einfach zu chaotisch.
So würde ein
Package aussehen:
SQL-Code:
create or replace
package Mööp
is
procedure TestProc(aAnlagenNummer
in Tabelle1.AnlagenNummer
,aAnzahl
in Tabelle1.Anzahl
,aLetzteAP
in Tabelle1.Letzte_AP
,aLetzteIP
in Tabelle1.Letzte_IP
,aLetzteFP
in Tabelle1.Letzte_FP);
end Mööp;
create or replace
package body Mööp
is
procedure TestProc(aAnlagenNummer
in Tabelle1.AnlagenNummer
,aAnzahl
in Tabelle1.Anzahl
,aLetzteAP
in Tabelle1.Letzte_AP
,aLetzteIP
in Tabelle1.Letzte_IP
,aLetzteFP
in Tabelle1.Letzte_FP)
is
begin
-- was auch immer hier passiert...
null;
end TestProc;
end Mööp;
Und so dein Trigger:
SQL-Code:
create or replace trigger TestTrigger
before insert or update on Tabelle1
for each row
begin
Mööp.TestProc(:new.AnlagenNummer,
:new.Anzahl,
:new.Letzte_AP,
:new.Letzte_IP,
:new.Letzte_FP);
end TestTrigger;
btw: Schaue mal bei
hier vorbei, du scheinst einen verklemmten Capslock zu haben.