if ($int_scg->ib_db_error )
{
$msg->message($ls_mensaje_error) ;
$int_scg->ib_db_error = false;
//return false;
}
if ($lb_valido)
{
$msg->message("Existen movimientos asociados a esta cuenta ... no se puede eliminar.");
// return false ;
}
else
{
$ls_cuenta_cero = $int_scg->uf_scg_sin_ceros($ls_cuenta) ;
$li_total_rows = $int_scg->uf_scg_select_cuenta_sin_cero($is_codemp,$ls_cuenta_cero);
if($li_total_rows > 1)
{
$msg->message("Existen cuentas de nivel inferior ... no se puede eliminar.");
//return false;
}
else
{
$lb_valido = $int_scg->uf_scg_delete_cuenta( $is_codemp,$ls_cuenta);
$msg->message($int_scg->is_msg_error);
if($int_scg->ib_db_error)
{
$msg->message($int_scg->is_msg_error);
{
$li_indice = $li_indice + 1;
$li_lenCta = strlen(trim($ls_new_cad));
$li_pos = $fun->uf_posocurrencia( $ls_formcont, "-", $li_indice );
if ($li_pos > 0)
{
$ls_sub = substr($ls_new_cad, 0, $li_pos );
$len=$li_lenCta - $li_pos;
$ls_new_cad = $ls_sub . "-" . substr($ls_new_cad,$li_pos,$len );
$li_max_nivel= $li_max_nivel + 1;
}
}//for
$li_nivel_cta = $int_scg->uf_scg_obtener_nivel($ls_cuenta); //Obtiene nivel de la cta
$ls_cta_ceros = $int_scg->uf_scg_sin_ceros($ls_cuenta ); //devuelve la cta sin ceros
$ls_sc_cuenta = $iscg_procesos->uf_disable_cta_inferior( $ls_cta_ceros, $ls_cuenta, $ls_cod_report);
$ls_opcion=$_POST["radiobutton"];
if ($ls_opcion=="N")
{
$ds_prorep->data=$_SESSION["objact"];echo "AJA 6<br>";
$i=$_POST["fila"];
$ld_asignado=str_replace('.','',$ld_asignado);
$ld_asignado=str_replace(',','.',$ld_asignado);
$ds_prorep->updateRow("asignado",$ld_asignado,$i);
$ls_modrep="1"; //Modalidad Mensual
$ls_distribuir="1";
$total=count($ls_sc_cuenta);
for($li=1;$li<=$total;$li++)
{echo "AJA 7<br>";
