Error in creating a trigger

Question

i am creating a trigger i am getting an error
create or replace TRIGGER INS_Discharge
AFTER INSERT
ON Discharge
FOR EACH ROW
AS
declare
vr_DischargeType INT ;
vr_Visit_ID INT ;
vr_Discharge_Date DATE;
vr_VisitDate DATE;
vr_AdmTime varchar(5) ;
vr_TransferID INT ;
vr_BedID AS INT ;
BEGIN
select :NEW.DischargeType into vr_DischargeType
from dual;
select :NEW.Discharge_Date into vr_Discharge_Date
from dual;
select :NEW.VisitDate into vr_VisitDate
from dual;
SELECT VisitDate into vr_VisitDate FROM Visit WHERE Visit_ID = vr_Visit_ID ;
UPDATE Visit SET DischargeType = vr_DischargeType, DischargeDate = vr_Discharge_Date
WHERE Visit_ID = vr_Visit_ID ;
SELECT MAX(Transfer_ID)into vr_TransferID FROM BedSchedule WHERE VisitID = vr_Visit_ID ;
IF vr_DischargeType = 2 then
SELECT Bed_ID into vr_BedID FROM BedSchedule WHERE Transfer_ID = vr_TransferID ;
UPDATE Bed_Mst SET Bed_Status_ID = 1 WHERE Bed_ID = vr_BedID ;
:NEW.Bed_ID :=vr_BedID;
end if;
END ;
Error report:
ORA-04079: invalid trigger specification
04079. 00000 - "invalid trigger specification"
*Cause:    The create TRIGGER statement is invalid.
*Action:   Check the statement for correct syntax.                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                       

Answer 1

i have done you said .... i have oracle version 10g
create or replace TRIGGER trUPD_Discharge
AFTER UPDATE
ON Discharge
for each row
AS
declare
vr_DischargeType INT ;
vr_Discharge_Date DATE;
vr_Visit_ID INT ;
vr_CancelStatus INt;
BEGIN
/*select :NEW.DischargeType into vr_DischargeType from dual;
select :NEW.Visit_ID into vr_Visit_ID from dual;
select :NEW.Discharge_Date into vr_Discharge_Date from dual;
select nvl((select :NEW.CancelStatus from dual),0)
into vr_CancelStatus from dual;
If vr_CancelStatus = 0 then
UPDATE Visit SET DischargeType = :NEW.DischargeType,
DischargeDate =:NEW.Discharge_Date WHERE Visit_ID = :NEW.Visit_ID ;
end if;
END;
but still getting same error
Error report:
ORA-04079: invalid trigger specification
04079. 00000 - "invalid trigger specification"
*Cause:    The create TRIGGER statement is invalid.
*Action:   Check the statement for correct syntax.