declare
begin
  execute immediate 'INSERT INTO FUNCION_SISTEMA (FUNCIONSISTEMA_ID, SISTEMA_ID, NOMBFUNCION, DESCRUTA, ACTIVO, FECMODIF, USUARIO_ID) 
	VALUES (FUNCION_SISTEMA_SEQ.nextVal, 1, ''ADM > CATALOGO > PUNTO VENTA > COBRANCA ADICIONAL'', 
	''COM.RJCONSULTORES.ADMINISTRACION.PUNTOVENTA.COBRANCAADICIONAL'', 1, SYSDATE, 1)';
exception when others then null;
end;