if($ls_tipo=="P")
{
$arr_movbco["codpro"] =$ls_provbene;
$arr_movbco["cedbene"]="----------";
}
else
{
$arr_movbco["cedbene"]=$ls_provbene;
$arr_movbco["codpro"] ="----------";
}
$arr_movbco["monto_mov"]=$ldec_montomov;
$arr_movbco["objret"] =$ldec_monobjret;
$arr_movbco["estmov"]=$ls_estmov;
$arr_movbco["retenido"] =$ldec_montoret;
$in_classmovbco->io_sql->begin_transaction();
$lb_valido=$in_classmovbco->uf_delete_dt_scg($ls_docmov,$ls_codban,$ls_cuenta_banco,$ls_mov_operacion,$ls_estmov,$ls_numdoc,$ls_cuentascg,$ls_debhab,$ls_codded,$ldec_montoscg,'SCG');
$io_msg->message($in_classmovbco->is_msg_error);
if($lb_valido)
{
if($ls_codded!="00000")
{
if(($ls_mov_operacion=="ND")||($ls_mov_operacion=="RE")||($ls_mov_operacion=="CH"))
{
$ls_operacioncon="H";
}
else
{
$ls_operacioncon="D";
}
$ldec_monto=$ldec_montoscg;
$lb_valido=$in_classmovbco->uf_update_montodelete($arr_movbco,$ls_cuenta_scg,'SCBMOV',$ls_desmov,$ls_docmov,$ls_operacioncon,$ldec_monto,$ldec_monobjret,'00000');
else
{
$in_classmovbco->io_sql->rollback();
}
$msg->message($in_classmovbco->is_msg_error);
uf_nuevo();
}
if($ls_operacion=="DELETESCG")
{
$li_row_delete=$_POST["delete_scg"];
$ls_codded='00000';
$ls_cuenta_scg=$_POST["txtcontable".$li_row_delete];
$ls_debhab=$_POST["txtdebhab".$li_row_delete];
$ls_numdoc=$_POST["txtdocscg".$li_row_delete];
$in_classmovbco->io_sql->begin_transaction();
$lb_valido=$in_classmovbco->uf_delete_dt_scg($ls_docmov,$ls_codban,$ls_cuenta_banco,$ls_mov_operacion,$ls_numdoc,$ls_cuenta_scg,$ls_debhab,$ls_codded);
$msg->message($in_classmovbco->is_msg_error);
if($lb_valido)
{
$in_classmovbco->io_sql->commit();
}
else
{
$in_classmovbco->io_sql->rollback();
}
uf_cargar_dt();
}
if($ls_operacion=="DELETESPG")
{
$li_row_delete=$_POST["delete_spg"];
$ls_cuenta_spg=$_POST["txtcuenta".$li_row_delete];
