if($ls_tipo=="P")
{
$ls_codpro =$ls_provbene;
$ls_cedbene="----------";
}
else
{
$ls_cedbene=$ls_provbene;
$ls_codpro ="----------";
}
$ls_nomproben=$_POST["txtnomproben"];
$in_classmovbanco->io_sql->begin_transaction();
$ldec_montoaux=$ldec_monto_mov+$ldec_retenido+$ldec_antret;
$lb_valido=$in_classmovbanco->uf_guardar_automatico($ls_codban,$ls_ctaban,$ls_mov_document,$ls_codope,$ld_fecha,$ls_mov_descripcion,$ls_codconmov,$ls_codpro,$ls_cedbene,$ls_nomproben,$ldec_monto_mov,$ldec_objret,$ldec_montoaux,$ls_chevau,$ls_estmov,$li_estint,$li_cobrapaga,$ls_estbpd,$ls_mov_procede,$ls_estreglib,$ls_estdoc,$ls_tipo,$ls_tipdocres,$ls_numdocres,$ls_fecdocres,$ls_tipreg,$ls_fte_financiamiento,$ls_origen,$ls_tippag,$ls_mediopago,$ls_modalidad,$ls_coduniadm,$ls_codbansig,$ls_codestpro1,$ls_codbanbene,$ls_nombanbene,$ls_ctabanbene,$ls_codbanaut,$ls_nombanaut,$ls_ctabanaut,$ls_rifaut,$ls_nombreaut,$ls_nrocontrol,$li_estserext);
$arr_movbco["codban"]=$ls_codban;
$arr_movbco["ctaban"]=$ls_ctaban;
$arr_movbco["mov_document"]=$ls_mov_document;
$ld_fecdb=$fun->uf_convertirdatetobd($ld_fecha);
$arr_movbco["codope"]=$ls_codope;
$arr_movbco["fecha"]=$ld_fecha;
$arr_movbco["codpro"]=$ls_codpro;
$arr_movbco["cedbene"]=$ls_cedbene;
$arr_movbco["estmov"]=$ls_estmov;
$arr_movbco["monto_mov"]=$ldec_monto_mov;
$arr_movbco["objret"] =$ldec_objret;
$arr_movbco["retenido"] =$ldec_retenido;
$ls_codded="00000";
$ls_tipo=$_POST["rb_provbene"];
$ls_provbene=$_POST["txtprovbene"];
if($ls_tipo=='P')
{
$ls_codpro=$ls_provbene;
$ls_cedbene='----------';
}
else
{
$ls_cedbene=$ls_provbene;
$ls_codpro='----------';
}
$ls_nomproben=$_POST["txtdesproben"];
$li_estserext=0;
$lb_valido=$in_classmovbco->uf_guardar_automatico($ls_codban_tesoreria,$ls_ctaban_tesoreria,$ls_docmov,$ls_mov_operacion,$ld_fecha,$ls_desmov,$ls_codconmov,$ls_codpro,$ls_cedbene,$ls_nomproben,$ldec_montomov,$ldec_monobjret,$ldec_montoret,'',$ls_estmov,0,0,'M','SCBMOV','',$ls_estdoc,$ls_tipo,$ls_tipdocressig,$ls_numdocressig,$ls_fecordpagsig,$ls_tipreg,$ls_codfuefin,$ls_origen,$ls_forpagsig,$ls_medpagsig,$ls_modalidad,$ls_unidad,$ls_codbansig,$ls_codestpro1,$ls_codban,$ls_denban,$ls_cuenta_banco,$ls_codbanaut,$ls_nombanaut,$ls_ctabanaut,$ls_rifaut,$ls_nombreaut,$ls_nrocontrol,$li_estserext);
if($lb_valido)
{
$in_classmovbco->io_sql->commit();
$ls_estdoc='C';
$io_msg->message("Movimiento Registrado");
}
else
{
$in_classmovbco->io_sql->rollback();
$io_msg->message($in_classmovbco->is_msg_error);
}
uf_cargar_dt();
}
if($ls_operacion == "ELIMINAR")
{
