require_once("../shared/class_folder/grid_param.php");
$io_grid=new grid_param();
require_once("../shared/class_folder/class_mensajes.php");
$io_msg=new class_mensajes();
require_once("../shared/class_folder/class_datastore.php");
$io_datastore=new class_datastore();
require_once("../shared/class_folder/class_funciones.php");
$io_function=new class_funciones();
require_once("../shared/class_folder/class_datastore.php");
$io_datastore=new class_datastore();
require_once ("class_folder/sigesp_sob_c_funciones_sob.php");
$io_funsob= new sigesp_sob_c_funciones_sob();
require_once("class_folder/sigesp_sob_class_obra.php");
$io_obra=new sigesp_sob_class_obra();
require_once("class_folder/sigesp_sob_c_anticipo.php");
$io_anticipo=new sigesp_sob_c_anticipo();
require_once("class_folder/sigesp_sob_c_contrato.php");
$io_contrato=new sigesp_sob_c_contrato();
require_once("../shared/class_folder/evaluate_formula.php");
$io_formula=new evaluate_formula();
require_once("class_folder/sigesp_sob_class_mensajes.php");
$io_mensaje=new sigesp_sob_class_mensajes();
$la_empresa=$_SESSION["la_empresa"];
$ls_codemp=$la_empresa["codemp"];
$ls_tituloretenciones="Retenciones Asignadas";
$li_anchoretenciones=600;
$ls_nametable="grid";
$la_columretenciones[1]="Código";
$la_columretenciones[2]="Descripción";
$la_columretenciones[3]="Cuenta";
{
$ls_codcon=$la_data["codcon"][$li_j];
$lb_valido=$io_anticipo->uf_calcular_montoanticipo($ls_codcon,$ld_montoanticipo);
if($lb_valido)
{
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)