$ls_codestpro5 = substr($ls_programatica,$li_loncodestpro1+$li_loncodestpro2+$li_loncodestpro3+$li_loncodestpro4+4,$li_loncodestpro5);
$ls_codestpro4 = trim(str_pad($ls_codestpro4,25,0,0));
$ls_codestpro5 = trim(str_pad($ls_codestpro5,25,0,0));
}
else
{
$ls_codestpro4 = $ls_codestpro5 = str_pad("",25,0,0);
}
$ls_programatica = $ls_codestpro1.$ls_codestpro2.$ls_codestpro3.$ls_codestpro4.$ls_codestpro5;
$ls_numdoc=$_POST["txtdocumento".$li_row_delete];
$ls_operacion=$_POST["txtoperacion".$li_row_delete];
$ldec_montospg=$_POST["txtmonto".$li_row_delete];
$ldec_montospg=str_replace(".","",$ldec_montospg);
$ldec_montospg=str_replace(",",".",$ldec_montospg);
$in_classmovbco->io_sql->begin_transaction();
$lb_valido=$in_classmovbco->uf_delete_dt_spg($ls_docmov,$ls_codban_tesoreria,$ls_ctaban_tesoreria,$ls_mov_operacion,$ls_estmov,$ls_numdoc,$ls_cuenta_spg,$ls_operacion,$ls_programatica,$ldec_montospg,$ls_estcla);
$io_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=="DELETESCG")
{
$li_row_delete=$_POST["delete_scg"];
$ls_codded=$_POST["txtcodded".$li_row_delete];
