";
} //fin del for
}//fin del if
uf_agregarlineablanca1($aa_object,$ai_totrows);
$io_inm_edif->uf_buscar_material($ls_codact,$ls_expact,$aa_object,$ai_totrows);
if ($ai_totrows>1)
{ $ai_totrows=$ai_totrows+1;
uf_agregarlineablanca1($aa_object,$ai_totrows);
}
}
break;
case "AGREGAR":
$ai_totrows=$io_fac->uf_obtenervalor("htotal","");
$parametros=$io_fac->uf_obtenervalor("hparam1","");
$arre_parametros=split("&",$parametros);
$j=1;
$k=0;
for ($i=0;$i<$ai_totrows;$i++)
{
$k++;
$ls_codcomp=trim(substr($arre_parametros[$j],13,15));
$j++;
$ls_dencom=trim(substr($arre_parametros[$j],13,63));
$j++;
$ls_dentipest=trim(substr($arre_parametros[$j],15,80));
$j++;
$ls_codtipest=trim(substr($arre_parametros[$j],15,80));
$j++;
$aa_object[$k][1]="
";
$aa_object[$k][2]="";
$aa_object[$k][3]="";
$aa_object[$k][4]="
";
}
$ai_totrows=$ai_totrows+1;
uf_agregarlineablanca1($aa_object,$ai_totrows);
$ls_codact=$io_fac->uf_obtenervalor("txtcodact","");
$ls_expact=$io_fac->uf_obtenervalor("txtexpact","");
$lb_valido=$io_inm_edif->uf_select_inmueble_edificio($ls_codact,$ls_expact,$ls_clasfun,$ls_diract,$ls_areatot,
$ls_areacons,$ls_numpiso, $ls_areatotpiso, $ls_areanex,
$ls_lindero,$ls_estlegprop,$ls_avaluo,$ls_feccont,$ls_moncont,
$ls_existe);
break;
case "ELIMINAR":
$ai_totrows=$io_fac->uf_obtenervalor("htotal","");
$ls_codact=$io_fac->uf_obtenervalor("txtcodact","");
$ls_expact=$io_fac->uf_obtenervalor("txtexpact","");
$ls_fila=$io_fac->uf_obtenervalor("fila","");
$lb_valido=$io_inm_edif->uf_select_inmueble_edificio($ls_codact,$ls_expact,$ls_clasfun,$ls_diract,$ls_areatot,
$ls_areacons,$ls_numpiso, $ls_areatotpiso, $ls_areanex,
$ls_lindero,$ls_estlegprop,$ls_avaluo,$ls_feccont,$ls_moncont,
$ls_existe);
$ai_totrows=$io_fac->uf_obtenervalor("htotal","");
$ai_totrows=$ai_totrows-1;
if ($ai_totrows>1)
{ $li_temp=0;
for ($i=1;$i<=$ai_totrows;$i++)
{
$li_temp++;
$ls_dentipest=$io_fac->uf_obtenervalor("txtdentipest".$i,"");
$ls_codtipest=$io_fac->uf_obtenervalor("txtcodtipest".$i,"");
$ls_codcomp=$io_fac->uf_obtenervalor("txtcodcomp".$i,"");
$ls_dencom=$io_fac->uf_obtenervalor("txtdencomp".$i,"");
$ls_encontrado="";
if ($i==$ls_fila)
{
$io_inm_edif->uf_select_saf_edificiotipest($ls_codtipest,$ls_codcomp,$ls_codact,$ls_expact,$ls_encontrado);
if ($ls_encontrado>0)
{
$io_inm_edif->uf_eliminar_materiales($ls_codtipest,$ls_codcomp,$ls_codact,$ls_expact,$la_seguridad);
}
}
if ($i!=$ls_fila)
{
$aa_object[$li_temp][1]="
";
$aa_object[$li_temp][2]="";
$aa_object[$li_temp][3]="";
$aa_object[$li_temp][4]="
";
}
} //fin del for
uf_agregarlineablanca1($aa_object,$ai_totrows);
}//fin del if
break;
} //FIN DEL switch
if($ls_expact and $aa_object and $ai_totrows){
$io_inm_edif->uf_buscar_material($ls_codact,$ls_expact,$aa_object,$ai_totrows);
if ($ai_totrows>1)
{ $ai_totrows=$ai_totrows+1;
uf_agregarlineablanca1($aa_object,$ai_totrows);
}
}
?>
