Completando la Ideal
[code]
-- Sp
Update RDB$PROCEDURES
Set RDB$PROCEDURE_SOURCE = Null
Where RDB$PROCEDURE_SOURCE Is Not Null;
-- Trigger
Update RDB$TRIGGERS
Set RDB$TRIGGER_SOURCE = NULL
Where Upper(B_Substr(RDB$TRIGGER_SOURCE,1,5))<>'CHECK' And RDB$TRIGGER_SOURCE Is Not Null;
-- Historia
Delete From Ibe$Version_History;
[code]
|