$li_tipo_comp = 1;
$ld_debaux=0;
$ld_habaux=0;
$ld_mondeb=0;
$ld_monhab=0;
$ls_procede_doc = $ls_procdoc;
$ldec_monto_actual=$ldec_monto;
$ldec_monto_anterior=0;
$lb_valido=$int_scg->uf_select_comprobante($ls_codemp,$ls_procede,$ls_comprobante,$ls_fecha,$ls_codban,$ls_ctaban);
if($lb_valido)
{
$ld_fecha=$fun->uf_convertirdatetobd($ls_fecha);
$lb_valido = $int_scg->uf_scg_procesar_insert_movimiento($ls_codemp,$ls_procede,$ls_comprobante,$ld_fecha,
$ls_tipo,$ls_cod_prov,$ls_ced_bene,$ls_cuenta,
$ls_procede_doc,$ls_documento,$ls_debhab,$ls_denominacion,
$ldec_monto_anterior,$ldec_monto_actual,$ls_codban,$ls_ctaban);
$lb_valido=$int_scg->uf_sql_transaction( $lb_valido );
if(!$lb_valido)
{
$msg->message("Error al registrar movimiento contable. ".$int_scg->is_msg_error);
}
$ds_mov->insertRow("SC_cuenta",$ls_cuenta);
$ds_mov->insertRow("Denominacion",$ls_denominacion);
$ds_mov->insertRow("Procede_doc",$ls_procdoc);
$ds_mov->insertRow("Documento",$ls_documento);
$ds_mov->insertRow("DebHab",$ls_debhab);
$ds_mov->insertRow("Monto",$ldec_monto);
}
