1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117
|
CREATE OR REPLACE TRIGGER "NEGOCE"."HYB_CMD"
AFTER
insert or update or delete on NEGOCE.SORDER
for each row
DECLARE
var_table_modif VARCHAR2(20);
var_type_modif VARCHAR2(20);
var_old_key VARCHAR2(20);
var_new_key VARCHAR2(20);
var_foreign_key VARCHAR2(20);
var_time_log VARCHAR2(20);
var_param_log VARCHAR2(20);
begin
var_table_modif:= 'SORDER';
var_time_log:= TO_CHAR(SYSDATE, 'YYYYMMDDHH24MISS');
IF INSERTING THEN
var_type_modif:= 'INSERT';
var_new_key:= :new.SOHNUM_0;
var_old_key:= 'null';
var_foreign_key:= 'null';
var_param_log:= :new.DEMDLVDAT_0;
EXECUTE IMMEDIATE
'
insert into NEGOCE.XLOGACT
(NUMLOG_0,TABLELOG_0,TYPEMOD_0,NEWKEY_0,OLDKEY_0,TIMELOG_0,FOREIGNKEY_0,PARAM_0)
values
('' '',''' || var_table_modif || ''',''' || var_type_modif || ''',''' || var_new_key || ''',''' || var_old_key || ''',''' || var_time_log || ''',''' || var_foreign_key || ''',''' || var_param_log || ''')
';
END IF;
IF UPDATING THEN
var_type_modif:= 'UPDATE';
var_new_key:= :new.SOHNUM_0;
var_old_key:= :old.SOHNUM_0;
var_foreign_key:= 'null';
var_param_log:= :old.DEMDLVDAT_0;
EXECUTE IMMEDIATE
'
insert into NEGOCE.XLOGACT
(NUMLOG_0,TABLELOG_0,TYPEMOD_0,NEWKEY_0,OLDKEY_0,TIMELOG_0,FOREIGNKEY_0,PARAM_0)
values
('' '',''' || var_table_modif || ''',''' || var_type_modif || ''',''' || var_new_key || ''',''' || var_old_key || ''',''' || var_time_log || ''',''' || var_foreign_key || ''',''' || var_param_log || ''')
';
END IF;
IF DELETING THEN
var_type_modif:= 'DELETE';
var_new_key:= 'null';
var_old_key:= :old.SOHNUM_0;
var_foreign_key:= 'null';
var_param_log:= :old.DEMDLVDAT_0;
EXECUTE IMMEDIATE
'
insert into NEGOCE.XLOGACT
(NUMLOG_0,TABLELOG_0,TYPEMOD_0,NEWKEY_0,OLDKEY_0,TIMELOG_0,FOREIGNKEY_0,PARAM_0)
values
('' '',''' || var_table_modif || ''',''' || var_type_modif || ''',''' || var_new_key || ''',''' || var_old_key || ''',''' || var_time_log || ''',''' || var_foreign_key || ''',''' || var_param_log || ''')
';
END IF;
end;
ALTER TRIGGER "NEGOCE"."HYB_CMD" ENABLE |
Partager