{ $ld_totaldisminucion=$ld_totaldisminucion+$la_disminucion["monto"][$li_i]; } } $ld_totalvariacion=$ld_totalaumento-$ld_totaldisminucion; $lb_valido=$io_contrato-> uf_select_contrato($ls_codcon,$la_contrato); if ($lb_valido) { $io_datastore->data=$la_contrato; $li_i=1; $ls_codcon=$io_datastore->getValue("codcon",$li_i); $ls_moncon=$io_funsob->uf_convertir_numerocadena($io_datastore->getValue("monto",$li_i)); } $io_anticipo->uf_calcular_montoanticipo($ls_codcon,$ld_montototalanticipoaux); $ld_montototalanticipo=$io_funsob->uf_convertir_numerocadena($ld_montototalanticipoaux); $ld_montocontrato=$la_contrato["monto"][1]; $ld_montocontratofinal=$ld_montocontrato+$ld_totalvariacion; $ld_montocontrato=$io_funsob->uf_convertir_numerocadena($ld_montocontrato); $ld_montocontratofinal=$io_funsob->uf_convertir_numerocadena($ld_montocontratofinal); $ld_monvar=$io_funsob->uf_convertir_numerocadena($ld_totalvariacion); $lb_valido=$io_obra->uf_select_obra($io_datastore->getValue("codobr",$li_i),$la_obra); if($lb_valido) $ls_desobr=$la_obra["desobr"][1]; } elseif($ls_operacion=="ue_guardar") { $ld_monto=$io_funsob->uf_convertir_cadenanumero($ls_monto); $ld_montotant=$io_funsob->uf_convertir_cadenanumero($ls_montotant); $ld_porant=$io_funsob->uf_convertir_cadenanumero($ls_porant);
if($ld_montoanticipo!=0) $la_data["totalanticipo"][$li_j]=$io_funsob->uf_convertir_numerocadena($ld_montoanticipo); else $la_data["totalanticipo"][$li_j]="---"; } } break; case "amortizacionanticipo": include_once("class_folder/sigesp_sob_c_anticipo.php"); include_once("class_folder/sigesp_sob_c_valuacion.php"); $io_anticipo=new sigesp_sob_c_anticipo(); $io_valuacion=new sigesp_sob_c_valuacion(); for($li_j=1;$li_j<=$li_filasdata;$li_j++) { $ls_codcon=$la_data["codcon"][$li_j]; $lb_valido=$io_anticipo->uf_calcular_montoanticipo($ls_codcon,$ld_montoanticipo); if($lb_valido && $ld_montoanticipo!=0) { $lb_valido=$io_valuacion->uf_amortizacion_anticipo($ls_codcon,$ld_amortizacion); if($lb_valido) { $ld_poramortizacion=$ld_amortizacion*100/$ld_montoanticipo; $la_data["amortizacionanticipo"][$li_j]=$io_funsob->uf_convertir_numerocadena($ld_poramortizacion); } } elseif($ld_montoanticipo==0) { $la_data["amortizacionanticipo"][$li_j]="---"; } } break;