DELETE FROM TSUBSISTEMAEVENTOSTRANSACCION WHERE CEVENTO IN ('CHAMBER_EXECUTE','CHAMBER_NEGATE');
DELETE FROM TSUBSISTEMAEVENTOS WHERE CEVENTO IN ('CHAMBER_EXECUTE','CHAMBER_NEGATE');
DELETE FROM TSUBSISTEMAEVENTOSID WHERE CEVENTO IN ('CHAMBER_EXECUTE','CHAMBER_NEGATE');

-----------------------

insert into TSUBSISTEMAEVENTOSID (CEVENTO, CSUBSISTEMA, CPERSONA_COMPANIA) values ('CLEARING_EXECUTE', '04', 2);
insert into TSUBSISTEMAEVENTOS (CEVENTO, CSUBSISTEMA, CIDIOMA, FHASTA, VERSIONCONTROL, FDESDE, DESCRIPCION) values ('CLEARING_EXECUTE', '04', 'ES', fncsysdate(), 0, fncsysdate(), 'Ejecucion de Pagos por Camara');
insert into TSUBSISTEMAEVENTOSTRANSACCION (CEVENTO, CSUBSISTEMA, CPERSONA_COMPANIA, FHASTA, VERSIONCONTROL, FDESDE, CSUBSISTEMA_TRANSACCION, CTRANSACCION, VERSIONTRANSACCION, RUBRO) values ('CLEARING_EXECUTE', '04', 2, fncsysdate(), 0, fncsysdate(), '04', '6003', '01', null);

----------------------

insert into TSUBSISTEMAEVENTOSID (CEVENTO, CSUBSISTEMA, CPERSONA_COMPANIA) values ('CLEARING_NEGATE', '04', 2);
insert into TSUBSISTEMAEVENTOS (CEVENTO, CSUBSISTEMA, CIDIOMA, FHASTA, VERSIONCONTROL, FDESDE, DESCRIPCION) values ('CLEARING_NEGATE', '04', 'ES', fncfhasta(), 0, fncsysdate(), 'Negacion de Pagos por Camara');
insert into TSUBSISTEMAEVENTOSTRANSACCION (CEVENTO, CSUBSISTEMA, CPERSONA_COMPANIA, FHASTA, VERSIONCONTROL, FDESDE, CSUBSISTEMA_TRANSACCION, CTRANSACCION, VERSIONTRANSACCION, RUBRO) values ('CLEARING_NEGATE', '04', 2, fncfhasta(), 0, fncsysdate(), '04', '6003', '01', null);