-- Parametrización de tipo de operacion Cartera de Crédito
-- TTIPOSPRODUCTO
update ttiposproducto set ctipoproducto = 'CR' where fhasta = fncfhasta and ctipoproducto = 'C';

-- TTIPOSOPERACIONID
insert into TTIPOSOPERACIONID (CTIPOPRODUCTO, CTIPOOPERACION) values ('CR', 'CDC');
update ttiposoperacion set ctipoproducto = 'CR' where fhasta = fncfhasta and ctipoproducto = 'C';
delete ttiposoperacionid where ctipoproducto = 'C';

-- TMECANISMOSCREDITOID
insert into TMECANISMOSCREDITOID (CMECANISMOCREDITO) values ('OD');

-- TMECANISMOSCREDITO
insert into TMECANISMOSCREDITO (CIDIOMA, CMECANISMOCREDITO, FHASTA, VERSIONCONTROL, FDESDE, DESCRIPCION) values ('ES', 'OD', fncfhasta, 0, fncsysdate, 'OPERACIÓN DIRECTA');