Cuenta |
Denominacion |
Asignado |
Enero |
Febrero |
Marzo |
Abril |
Mayo |
Junio |
Julio |
Agosto |
Septiembre |
Octubre |
Noviembre |
Diciembre |
Saldo Real Anterior |
Saldo Aprobado |
Saldo Modificado |
uf_select_scg_plantillacuentareporte( $ls_codemp, $ls_cod_report );
if ($li_rtn==0) //no existen registros
{
if ($ls_cod_report=="0405")
{
$lb_valido = $iscg_procesos->uf_cargar_txt_inversiones($ls_codemp);
if($lb_valido)
{
$msg->message("Los datos fueron cargados");
$rs_cta=$iscg_procesos->uf_select_scg_datastore( $ls_codemp, $ls_cod_report );
$data=$SQL->obtener_datos($rs_cta);
$ds_prorep=new class_datastore();
$ds_prorep->data=$data;
$li_num=$ds_prorep->getRowCount("cod_report");
for($i=1;$i<=$li_num;$i++)
{
$ls_status=$data["status"][$i];
if($ls_status=="S")
{
?>
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| getValue("sc_cuenta",$i)?> |
".$ds_prorep->getValue("denominacion",$i)."";
print"".number_format($ds_prorep->getValue("asignado",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("enero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("febrero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("marzo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("abril",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("mayo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("junio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("julio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("agosto",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("septiembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("octubre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("noviembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("diciembre",$i),2,",",".")." | ";
print"
";
}//for
}//if($lb_valido)
else
{
$msg->message("Error al cargar los datos");
}
}//if($ls_cod_report=="0405")
if ($ls_cod_report=="0714")
{
$lb_valido = $iscg_procesos->uf_cargar_txt_inversiones_0714($ls_codemp);
if($lb_valido)
{
$msg->message("Los datos fueron cargados");
$rs_cta=$iscg_procesos->uf_select_scg_datastore( $ls_codemp, $ls_cod_report );
$data=$SQL->obtener_datos($rs_cta);
$ds_prorep=new class_datastore();
$ds_prorep->data=$data;
$li_num=$ds_prorep->getRowCount("cod_report");
for($i=1;$i<=$li_num;$i++)
{
$ls_status=$data["status"][$i];
if($ls_status=="S")
{
?>
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| getValue("sc_cuenta",$i)?> |
".$ds_prorep->getValue("denominacion",$i)."";
print"".number_format($ds_prorep->getValue("asignado",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("enero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("febrero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("marzo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("abril",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("mayo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("junio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("julio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("agosto",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("septiembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("octubre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("noviembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("diciembre",$i),2,",",".")." | ";
print"
";
}//for
}//if($lb_valido)
else
{
$msg->message("Error al cargar los datos");
}
}//if($ls_cod_report=="0714")
//----------------------------------------------------------------------------------------------------------------------
//----------------------------------------------------------------------------------------------------------------------
//----------------------------------------------------------------------------------------------------------------------
if ($ls_cod_report=="0801")
{
$lb_valido = $iscg_procesos->uf_cargar_cuentas_inversiones_ins08($ls_codemp);
if($lb_valido)
{
$msg->message("Los datos fueron cargados");
$rs_cta=$iscg_procesos->uf_select_scg_datastore( $ls_codemp, $ls_cod_report );
$data=$SQL->obtener_datos($rs_cta);
$ds_prorep=new class_datastore();
$ds_prorep->data=$data;
$li_num=$ds_prorep->getRowCount("cod_report");
for($i=1;$i<=$li_num;$i++)
{
$ls_status=$data["status"][$i];
if($ls_status=="S")
{
?>
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| getValue("sc_cuenta",$i)?> |
".$ds_prorep->getValue("denominacion",$i)."";
print"".number_format($ds_prorep->getValue("asignado",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("enero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("febrero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("marzo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("abril",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("mayo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("junio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("julio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("agosto",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("septiembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("octubre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("noviembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("diciembre",$i),2,",",".")." | ";
print"
";
}//for
}//if($lb_valido)
else
{
$msg->message("Error al cargar los datos");
}
}//if($ls_cod_report=="0801")
//----------------------------------------------------------------------------------------------------------------------
//----------------------------------------------------------------------------------------------------------------------
if ($ls_cod_report=="0802")
{
$lb_valido = $iscg_procesos->uf_cargar_cuentas_edoresultado_ins08($ls_codemp);
if($lb_valido)
{
$msg->message("Los datos fueron cargados");
$rs_cta=$iscg_procesos->uf_select_scg_datastore( $ls_codemp, $ls_cod_report );
$data=$SQL->obtener_datos($rs_cta);
$ds_prorep=new class_datastore();
$ds_prorep->data=$data;
$li_num=$ds_prorep->getRowCount("cod_report");
for($i=1;$i<=$li_num;$i++)
{
$ls_status=$data["status"][$i];
if($ls_status=="S")
{
?>
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| getValue("sc_cuenta",$i)?> |
".$ds_prorep->getValue("denominacion",$i)."";
print"".number_format($ds_prorep->getValue("asignado",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("enero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("febrero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("marzo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("abril",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("mayo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("junio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("julio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("agosto",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("septiembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("octubre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("noviembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("diciembre",$i),2,",",".")." | ";
print"
";
}//for
}//if($lb_valido)
else
{
$msg->message("Error al cargar los datos");
}
}//if ($ls_cod_report=="0802")
//----------------------------------------------------------------------------------------------------------------------
if ($ls_cod_report=="0803")
{
$lb_valido = $iscg_procesos->uf_cargar_cuentas_balancegeneral_ins08($ls_codemp);
if($lb_valido)
{
$msg->message("Los datos fueron cargados");
$rs_cta=$iscg_procesos->uf_select_scg_datastore( $ls_codemp, $ls_cod_report );
$data=$SQL->obtener_datos($rs_cta);
$ds_prorep=new class_datastore();
$ds_prorep->data=$data;
$li_num=$ds_prorep->getRowCount("cod_report");
for($i=1;$i<=$li_num;$i++)
{
$ls_status=$data["status"][$i];
if($ls_status=="S")
{
?>
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| getValue("sc_cuenta",$i)?> |
".$ds_prorep->getValue("denominacion",$i)."";
print"".number_format($ds_prorep->getValue("asignado",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("enero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("febrero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("marzo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("abril",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("mayo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("junio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("julio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("agosto",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("septiembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("octubre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("noviembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("diciembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("saldo_real_ant",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("saldo_apro",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("saldo_mod",$i),2,",",".")." | ";
print"
";
}//for
}//if($lb_valido)
else
{
$msg->message("Error al cargar los datos");
}
}//if ($ls_cod_report=="0803")
//----------------------------------------------------------------------------------------------------------------------
//----------------------------------------------------------------------------------------------------------------------
//----------------------------------------------------------------------------------------------------------------------
if ($ls_cod_report=="0406")
{
$lb_valido = $iscg_procesos->uf_cargar_txt_edoresultado($ls_codemp);
if($lb_valido)
{
$msg->message("Los datos fueron cargados");
$rs_cta=$iscg_procesos->uf_select_scg_datastore( $ls_codemp, $ls_cod_report );
$data=$SQL->obtener_datos($rs_cta);
$ds_prorep=new class_datastore();
$ds_prorep->data=$data;
$li_num=$ds_prorep->getRowCount("cod_report");
for($i=1;$i<=$li_num;$i++)
{
$ls_status=$data["status"][$i];
if($ls_status=="S")
{
?>
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| getValue("sc_cuenta",$i)?> |
".$ds_prorep->getValue("denominacion",$i)."";
print"".number_format($ds_prorep->getValue("asignado",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("enero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("febrero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("marzo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("abril",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("mayo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("junio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("julio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("agosto",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("septiembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("octubre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("noviembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("diciembre",$i),2,",",".")." | ";
print"
";
}//for
}//if($lb_valido)
else
{
$msg->message("Error al cargar los datos");
}
}//if ($ls_cod_report=="0406")
if ($ls_cod_report=="0408")
{
$lb_valido = $iscg_procesos->uf_cargar_txt_balancegeneral($ls_codemp);
if($lb_valido)
{
$msg->message("Los datos fueron cargados");
$rs_cta=$iscg_procesos->uf_select_scg_datastore( $ls_codemp, $ls_cod_report );
$data=$SQL->obtener_datos($rs_cta);
$ds_prorep=new class_datastore();
$ds_prorep->data=$data;
$li_num=$ds_prorep->getRowCount("cod_report");
for($i=1;$i<=$li_num;$i++)
{
$ls_status=$data["status"][$i];
if($ls_status=="S")
{
?>
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| getValue("sc_cuenta",$i)?> |
".$ds_prorep->getValue("denominacion",$i)."";
print"".number_format($ds_prorep->getValue("asignado",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("enero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("febrero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("marzo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("abril",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("mayo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("junio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("julio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("agosto",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("septiembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("octubre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("noviembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("diciembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("saldo_real_ant",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("saldo_apro",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("saldo_mod",$i),2,",",".")." | ";
print"
";
}//for
}//if($lb_valido)
else
{
$msg->message("Error al cargar los datos");
}
}//if ($ls_cod_report=="0408")
if ($ls_cod_report=="0414")
{
$lb_valido = $iscg_procesos->uf_cargar_txt_ctaahorroinversion($ls_codemp);
if($lb_valido)
{
$msg->message("Los datos fueron cargados");
$rs_cta=$iscg_procesos->uf_select_scg_datastore( $ls_codemp, $ls_cod_report );
$data=$SQL->obtener_datos($rs_cta);
$ds_prorep=new class_datastore();
$ds_prorep->data=$data;
$li_num=$ds_prorep->getRowCount("cod_report");
for($i=1;$i<=$li_num;$i++)
{
$ls_status=$data["status"][$i];
if($ls_status=="S")
{
?>
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| getValue("sc_cuenta",$i)?> |
".$ds_prorep->getValue("denominacion",$i)."";
print"".number_format($ds_prorep->getValue("asignado",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("enero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("febrero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("marzo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("abril",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("mayo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("junio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("julio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("agosto",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("septiembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("octubre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("noviembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("diciembre",$i),2,",",".")." | ";
print"
";
}//for
}//if($lb_valido)
else
{
$msg->message("Error al cargar los datos");
}
}//if ($ls_cod_report=="0414")
}//if($li_rtn==0)
if ($li_rtn>0) //tiene registro
{
$rs_cta=$iscg_procesos->uf_select_datastore_mensual( $ls_codemp, $ls_cod_report );
$data=$SQL->obtener_datos($rs_cta);
$ds_prorep=new class_datastore();
$ds_prorep->data=$data;
$li_num=$ds_prorep->getRowCount("asignado");
for($i=1;$i<=$li_num;$i++)
{
$ls_status=$ds_prorep->getValue("status",$i);
if($ls_status=="S")
{
if($ls_cod_report != "0803")
{
?>
| ','getValue("sc_cuenta",$i);?>','','','','getValue("enero",$i);?>');">getValue("sc_cuenta",$i);?> |
| ','getValue("saldo_real_ant",$i);?>','getValue("saldo_apro",$i);?>','getValue("saldo_mod",$i);?>','getValue("sc_cuenta",$i);?>','','','','getValue("denominacion",$i); ?>');">getValue("sc_cuenta",$i);?> |
| ','getValue("sc_cuenta",$i);?>','','','','getValue("enero",$i);?>');">getValue("sc_cuenta",$i);?> |
| ','getValue("saldo_real_ant",$i);?>','getValue("saldo_apro",$i);?>','getValue("saldo_mod",$i);?>','getValue("sc_cuenta",$i);?>','','','','getValue("denominacion",$i); ?>');">getValue("sc_cuenta",$i);?> |
| getValue("sc_cuenta",$i)?> |
".$ds_prorep->getValue("denominacion",$i)."";
print"".number_format($ds_prorep->getValue("asignado",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("enero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("febrero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("marzo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("abril",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("mayo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("junio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("julio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("agosto",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("septiembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("octubre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("noviembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("diciembre",$i),2,",",".")." | ";
if($ls_cod_report == "0803")
{
print"".number_format($ds_prorep->getValue("saldo_real_ant",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("saldo_apro",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("saldo_mod",$i),2,",",".")." | ";
}
print"
";
}//for
}//if ($li_rtn>0)
}//select */
if ($ls_operacion=="DISTRIBUIR")
{
$li_indice=1;
$la_empresa=$_SESSION["la_empresa"];
$ls_formcont=$la_empresa["formcont"];
$ls_codemp = $la_empresa["codemp"];
$ls_cod_report = $_SESSION["ls_cod_report"];
$_SESSION["ld_asignado"]=$ld_asignado;
$ld_asignado=$_SESSION["ld_asignado"];
$_SESSION["ld_saldo_real_ant"]=$ld_saldo_real_ant;
$ld_saldo_real_ant=$_SESSION["ld_saldo_real_ant"];
$_SESSION["ld_saldo_aprobado"]=$ld_saldo_aprobado;
$ld_saldo_aprobado=$_SESSION["ld_saldo_aprobado"];
$_SESSION["ld_saldo_mod"]=$ld_saldo_mod;
$ld_saldo_mod=$_SESSION["ld_saldo_mod"];
//print "$ld_saldo_real_ant
";
$li_lenCta = strlen(trim($ls_cuenta));
//COLOCA FORMATO A LA CUENTA
$li_pos = $fun->uf_posocurrencia( $ls_formcont, "-", $li_indice );
$ls_sub = substr($ls_cuenta,0, $li_pos );
$ls_new_cad = $ls_sub . "-" . substr($ls_cuenta,$li_pos, $li_lenCta );
$li_max_nivel= 1;
for($i=1;$i<=$li_pos;$i++)
{
$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
";
$i=$_POST["fila"];
$ld_asignado=str_replace('.','',$ld_asignado);
$ld_asignado=str_replace(',','.',$ld_asignado);
$ds_prorep->updateRow("asignado",$ld_asignado,$i);
$ld_saldo_real_ant=str_replace('.','',$ld_saldo_real_ant);
$ld_saldo_real_ant=str_replace(',','.',$ld_saldo_real_ant); //print " $ld_saldo_real_ant
";
$ds_prorep->updateRow("saldo_real_ant",$ld_saldo_real_ant,$i);
$ld_saldo_aprobado=str_replace('.','',$ld_saldo_aprobado);
$ld_saldo_aprobado=str_replace(',','.',$ld_saldo_aprobado);
$ds_prorep->updateRow("saldo_apro",$ld_saldo_aprobado,$i);
$ld_saldo_mod=str_replace('.','',$ld_saldo_mod);
$ld_saldo_mod=str_replace(',','.',$ld_saldo_mod);
$ds_prorep->updateRow("saldo_mod",$ld_saldo_mod,$i);
//$ld_saldo_real_ant $ld_saldo_aprobado $ld_saldo_mod
$ls_modrep="1"; //Modalidad Mensual
$ls_distribuir="1";
$total=count($ls_sc_cuenta);
for($li=1;$li<=$total;$li++)
{//echo "AJA 7
";
$pos=$ds_prorep->find("sc_cuenta",$ls_sc_cuenta[$li]);//echo "DESPUES";
$ds_prorep->updateRow("status","I",$pos);
} //echo "AJA 8
";
$ds_prorep->updateRow("modrep",$ls_modrep,$i);
$ds_prorep->updateRow("distribuir",$ls_distribuir,$i);
}
if ($ls_opcion=="M")
{
$ds_prorep->data=$_SESSION["objact"];
$i=$_POST["fila"];
$total=count($ls_sc_cuenta);
for($li=1;$li<=$total;$li++)
{ //echo "PLOOM A";
$pos=$ds_prorep->find("sc_cuenta",$ls_sc_cuenta[$li]);//echo "PLOOM B";
$ds_prorep->updateRow("status","I",$pos);
}
}//fin de opcion ==M
if($ls_opcion=="A")
{
$ds_prorep->data=$_SESSION["objact"];
$ld_saldo_real_ant = $_POST["txtSaldoAnterior"];
$ld_saldo_aprobado = $_POST["txtSaldoAprobado"];
$ld_saldo_mod = $_POST["txtSaldoModificado"];
$ld_saldo_real_ant=str_replace('.','',$ld_saldo_real_ant);
$ld_saldo_real_ant=str_replace(',','.',$ld_saldo_real_ant);
$ld_saldo_aprobado=str_replace('.','',$ld_saldo_aprobado);
$ld_saldo_aprobado=str_replace(',','.',$ld_saldo_aprobado);
$ld_saldo_mod=str_replace('.','',$ld_saldo_mod);
$ld_saldo_mod=str_replace(',','.',$ld_saldo_mod);
$ld_asignado=str_replace('.','',$ld_asignado);
$ld_asignado=str_replace(',','.',$ld_asignado);
$ld_div_asig = round(($ld_asignado/12),2);
$ld_suma_dic=($ld_div_asig*12);
$ld_m12=($ld_suma_dic-$ld_asignado);
if($ld_m12>=0)
{
$ld_diciembre=$ld_div_asig-$ld_m12;
}
else
{
$ld_diciembre=$ld_div_asig+$ld_m12;
}
$ld_total=($ld_div_asig*11)+$ld_diciembre;
$ld_resto=round(($ld_asignado-$ld_total),2);
$ld_diciembre=$ld_diciembre+$ld_resto;
$ls_modrep="1"; //Modalidad Mensual
$ls_distribuir="3";
$i=$_POST["fila"];
/*$ld_saldo_real_ant = $ds_prorep->getValue("saldo_real_ant",$i);
$ld_saldo_aprobado = $ds_prorep->getValue("saldo_apro",$i);
$ld_saldo_mod = $ds_prorep->getValue("saldo_mod",$i);*/
$total=count($ls_sc_cuenta);
for($li=1;$li<=$total;$li++)
{
$pos=$ds_prorep->find("sc_cuenta",$ls_sc_cuenta[$li]);
$ds_prorep->updateRow("status","I",$pos);
$ds_prorep->updateRow("asignado",0,$pos);
$ds_prorep->updateRow("enero",0,$pos);
$ds_prorep->updateRow("febrero",0,$pos);
$ds_prorep->updateRow("marzo",0,$pos);
$ds_prorep->updateRow("abril",0,$pos);
$ds_prorep->updateRow("mayo",0,$pos);
$ds_prorep->updateRow("junio",0,$pos);
$ds_prorep->updateRow("julio",0,$pos);
$ds_prorep->updateRow("agosto",0,$pos);
$ds_prorep->updateRow("septiembre",0,$pos);
$ds_prorep->updateRow("octubre",0,$pos);
$ds_prorep->updateRow("noviembre",0,$pos);
$ds_prorep->updateRow("diciembre",0,$pos);
$ds_prorep->updateRow("saldo_real_ant",0,$pos);
$ds_prorep->updateRow("saldo_apro",0,$pos);
$ds_prorep->updateRow("saldo_mod",0,$pos);
}
$ds_prorep->updateRow("asignado",$ld_asignado,$i);
$ds_prorep->updateRow("enero",$ld_div_asig,$i);
$ds_prorep->updateRow("febrero",$ld_div_asig,$i);
$ds_prorep->updateRow("marzo",$ld_div_asig,$i);
$ds_prorep->updateRow("abril",$ld_div_asig,$i);
$ds_prorep->updateRow("mayo",$ld_div_asig,$i);
$ds_prorep->updateRow("junio",$ld_div_asig,$i);
$ds_prorep->updateRow("julio",$ld_div_asig,$i);
$ds_prorep->updateRow("agosto",$ld_div_asig,$i);
$ds_prorep->updateRow("septiembre",$ld_div_asig,$i);
$ds_prorep->updateRow("octubre",$ld_div_asig,$i);
$ds_prorep->updateRow("noviembre",$ld_div_asig,$i);
$ds_prorep->updateRow("diciembre",$ld_diciembre,$i);
$ds_prorep->updateRow("modrep",$ls_modrep,$i);
$ds_prorep->updateRow("distribuir",$ls_distribuir,$i);
$ds_prorep->updateRow("saldo_real_ant",$ld_saldo_real_ant,$i);
$ds_prorep->updateRow("saldo_apro",$ld_saldo_aprobado,$i);
$ds_prorep->updateRow("saldo_mod",$ld_saldo_mod,$i);
$ls_next_cta = $int_scg->uf_scg_next_cuenta_nivel($ls_cuenta);
$li_nivel_cta= $int_scg->uf_scg_obtener_nivel($ls_next_cta);//Obtiene nivel de la cta
$li_totrows=$ds_prorep->getRowCount("sc_cuenta");
$ls_cta_ceros = $int_scg->uf_scg_sin_ceros($ls_cuenta);
$ld_total_asignado=0;
$ld_total_asig=0;
$ld_total_diciembre=0;
$ld_total_saldo_real_ant = 0;
$ld_total_saldo_aprobado = 0;
$ld_total_saldo_mod = 0;
while($li_nivel_cta>1 && !empty($ls_next_cta))
{
$ld_total_asignado=0;
$ld_total_asig=0;
$ld_total_diciembre=0;
$ld_total_saldo_real_ant = 0;
$ld_total_saldo_aprobado = 0;
$ld_total_saldo_mod = 0;
$ls_cta_aux=$ls_next_cta;
$ls_cta_ceros = $int_scg->uf_scg_sin_ceros($ls_next_cta);
$pos=$ds_prorep->find("sc_cuenta",$ls_next_cta);
$li_len=strlen($ls_cta_ceros);
$la_sc_cuenta = $iscg_procesos->uf_disable_cta_inferior( $ls_cta_ceros, $ls_next_cta, $ls_cod_report);
$li_totrows=count($la_sc_cuenta);
for($li_s=1;$li_s<=$li_totrows;$li_s++)
{
$li_posicion=$ds_prorep->find("sc_cuenta",$la_sc_cuenta[$li_s]);
if($li_posicion>0)
{
$li_new_nivel=$li_nivel_cta+1;
$li_nivel_aux = $int_scg->uf_scg_obtener_nivel($la_sc_cuenta[$li_s]);//Obtiene nivel de la cta
if($li_nivel_aux==$li_new_nivel)
{
$ld_total_asignado=$ld_total_asignado+$ds_prorep->getValue("asignado",$li_posicion);
$ld_total_asig=$ld_total_asig+$ds_prorep->getValue("enero",$li_posicion);
$ld_total_diciembre=$ld_total_diciembre+$ds_prorep->getValue("diciembre",$li_posicion);
$ld_total_saldo_real_ant = $ld_total_saldo_real_ant + $ds_prorep->getValue("saldo_real_ant",$li_posicion);
$ld_total_saldo_aprobado = $ld_total_saldo_aprobado + $ds_prorep->getValue("saldo_apro",$li_posicion);
$ld_total_saldo_mod = $ld_total_saldo_mod + $ds_prorep->getValue("saldo_mod",$li_posicion);
}
}
}
$ds_prorep->updateRow("asignado",$ld_total_asignado,$pos);
$ds_prorep->updateRow("enero",$ld_total_asig,$pos);
$ds_prorep->updateRow("febrero",$ld_total_asig,$pos);
$ds_prorep->updateRow("marzo",$ld_total_asig,$pos);
$ds_prorep->updateRow("abril",$ld_total_asig,$pos);
$ds_prorep->updateRow("mayo",$ld_total_asig,$pos);
$ds_prorep->updateRow("junio",$ld_total_asig,$pos);
$ds_prorep->updateRow("julio",$ld_total_asig,$pos);
$ds_prorep->updateRow("agosto",$ld_total_asig,$pos);
$ds_prorep->updateRow("septiembre",$ld_total_asig,$pos);
$ds_prorep->updateRow("octubre",$ld_total_asig,$pos);
$ds_prorep->updateRow("noviembre",$ld_total_asig,$pos);
$ds_prorep->updateRow("diciembre",$ld_total_diciembre,$pos);
if($ls_cod_report == "0803")
{
$ds_prorep->updateRow("saldo_real_ant",$ld_total_saldo_real_ant,$pos);
$ds_prorep->updateRow("saldo_apro",$ld_total_saldo_aprobado,$pos);
$ds_prorep->updateRow("saldo_mod",$ld_total_saldo_mod,$pos);
}
if($li_nivel_cta==1)
{
break;
}
$ls_aux = $int_scg->uf_scg_next_cuenta_nivel($ls_next_cta);
$ls_next_cta=$ls_aux;
$li_nivel_cta = $int_scg->uf_scg_obtener_nivel($ls_next_cta);//Obtiene nivel de la cta
}
}//fin del else $ls_opcion="A"
$li_num=$ds_prorep->getRowCount("cod_report");
for($i=1;$i<=$li_num;$i++)
{
$ls_status=$ds_prorep->getValue("status",$i);
if($ls_status=="S")
{
if($ls_cod_report != "0803")
{
?>
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| ','getValue("saldo_real_ant",$i);?>','getValue("saldo_apro",$i);?>','getValue("saldo_mod",$i);?>','getValue("sc_cuenta",$i);?>','','','','getValue("denominacion",$i); ?>');">getValue("sc_cuenta",$i);?> |
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| ','getValue("saldo_real_ant",$i);?>','getValue("saldo_apro",$i);?>','getValue("saldo_mod",$i);?>','getValue("sc_cuenta",$i);?>','','','','getValue("denominacion",$i); ?>');">getValue("sc_cuenta",$i);?> |
| getValue("sc_cuenta",$i)?> |
".$ds_prorep->getValue("denominacion",$i)."";
print"".number_format($ds_prorep->getValue("asignado",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("enero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("febrero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("marzo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("abril",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("mayo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("junio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("julio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("agosto",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("septiembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("octubre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("noviembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("diciembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("saldo_real_ant",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("saldo_apro",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("saldo_mod",$i),2,",",".")." | ";
print"
";
}//for
}//if ($ls_operacion=="AUTODISTRIBUIR")
if($ls_operacion=="GUARDAR")
{
$li_rows=0; $li_count=-2; $li_acum_insert=0; $li_acum_update=0; $li_rtn_ins=0; $li_rtn_upd=0;
$ls_cod_report=""; $ls_sc_cuenta="";
$la_empresa=$_SESSION["la_empresa"];
$ls_codemp = $la_empresa["codemp"];
$ds_prorep->data=$_SESSION["objact"];
$li_num=$ds_prorep->getRowCount("cod_report");
for ($i=1; $i<= $li_num; $i++)
{
$la_datos[0] = $ds_prorep->getValue("cod_report",$i); //cod_report
$la_datos[1] = $ds_prorep->getValue("sc_cuenta",$i); //sc_cuenta
$la_datos[2] = $ds_prorep->getValue("denominacion",$i); //denominacion
$la_datos[3] = $ds_prorep->getValue("status",$i); //status
$la_datos[4] = $ds_prorep->getValue("asignado",$i); //asignado
$la_datos[5] = $ds_prorep->getValue("distribuir",$i); //distribuir
//meses
$la_datos[6] = $ds_prorep->getValue("enero",$i);
$la_datos[7] = $ds_prorep->getValue("febrero",$i);
$la_datos[8] = $ds_prorep->getValue("marzo",$i);
$la_datos[9] = $ds_prorep->getValue("abril",$i);
$la_datos[10] = $ds_prorep->getValue("mayo",$i);
$la_datos[11] = $ds_prorep->getValue("junio",$i);
$la_datos[12] = $ds_prorep->getValue("julio",$i);
$la_datos[13] = $ds_prorep->getValue("agosto",$i);
$la_datos[14] = $ds_prorep->getValue("septiembre",$i);
$la_datos[15] = $ds_prorep->getValue("octubre",$i);
$la_datos[16] = $ds_prorep->getValue("noviembre",$i);
$la_datos[17] = $ds_prorep->getValue("diciembre",$i);
$la_datos[18] = $ds_prorep->getValue("nivel",$i);
$la_datos[19] = $ds_prorep->getValue("referencia",$i);
$la_datos[20] = $ds_prorep->getValue("no_fila",$i);
$la_datos[21] = $ds_prorep->getValue("tipo",$i);
$la_datos[22] = $ds_prorep->getValue("cta_res",$i);
$la_datos[23] = $ds_prorep->getValue("modrep",$i);
$la_datos[24] = $ds_prorep->getValue("saldo_real_ant",$i);
$la_datos[25] = $ds_prorep->getValue("saldo_apro",$i);
$la_datos[26] = $ds_prorep->getValue("saldo_mod",$i);
$ls_cod_report = $la_datos[0];
$ls_sc_cuenta = $la_datos[1];
$li_count = $iscg_procesos->uf_count_scg_plantillacuentareporte( $ls_codemp, $ls_cod_report, $ls_sc_cuenta );
if ($li_count==0)
{
$li_rtn_ins = $iscg_procesos->uf_insert_scg_plantillacuentareporte( $la_datos );
if ($li_rtn_ins == 0)
{
$msg->message("Error al insertar");
}
else
{
$li_acum_insert = $li_acum_insert + $li_rtn_ins;
}
}
if ($li_count==1)
{
$lb_valido = $iscg_procesos->uf_update_scg_plantillacuentareporte($la_datos);
}
}//for
//si ejecuto todos los registros realiza las transacciones de commit o rollback
if($lb_valido)
{
///////////////////////////////// SEGURIDAD /////////////////////////////
$ls_evento="UPDATE";
$ls_descripcion =" Actualizo la Programacion de Reportes ";
$ls_variable= $io_seguridad->uf_sss_insert_eventos_ventana($la_seguridad["empresa"],
$la_seguridad["sistema"],$ls_evento,$la_seguridad["logusr"],
$la_seguridad["ventanas"],$ls_descripcion);
///////////////////////////////// SEGURIDAD /////////////////////////////
$lb_valido = $iscg_procesos->uf_sql_transaction(true);
if ($lb_valido)
{
$msg->message("Los datos han sido guardados con éxito");
}
else
{
$msg->message("Error en la transacción");
}
}//if
else
{
$lb_valido = $iscg_procesos->uf_sql_transaction(false);
$msg->message("Error en la transacción");
}
$la_empresa = $_SESSION["la_empresa"];
$ls_codemp = $la_empresa["codemp"];
$ls_cod_report=$_SESSION["ls_cod_report"];
$rs_cta=$iscg_procesos->uf_select_datastore_mensual( $ls_codemp, $ls_cod_report );
$data=$SQL->obtener_datos($rs_cta);
$ds_prorep=new class_datastore();
$ds_prorep->data=$data;
$li_num=$ds_prorep->getRowCount("asignado");
for($i=1;$i<=$li_num;$i++)
{
$ls_status=$ds_prorep->getValue("status",$i);
if($ls_status=="S")
{
?>
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| ','getValue("saldo_real_ant",$i);?>','getValue("saldo_apro",$i);?>','getValue("saldo_mod",$i);?>','getValue("sc_cuenta",$i);?>','','','','getValue("denominacion",$i); ?>');">getValue("sc_cuenta",$i);?> |
| getValue("sc_cuenta",$i)?> |
".$ds_prorep->getValue("denominacion",$i)."";
print"".number_format($ds_prorep->getValue("asignado",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("enero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("febrero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("marzo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("abril",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("mayo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("junio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("julio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("agosto",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("septiembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("octubre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("noviembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("diciembre",$i),2,",",".")." | ";
if($ls_cod_report == "0803")
{
print"".number_format($ds_prorep->getValue("saldo_real_ant",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("saldo_apro",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("saldo_mod",$i),2,",",".")." | ";
}
print"
";
}//for
}//fin de ue_guardar
if ($ls_operacion=="")
{
$fun->uf_limpiar_sesion();
$ls_cod_report="0408";
$_SESSION["ls_cod_report"]=$ls_cod_report;
$la_empresa = $_SESSION["la_empresa"];
$ls_codemp = $la_empresa["codemp"];
$lb_valido=$iscg_procesos->uf_select_reporte($ls_codemp,$ai_cuantos,$ls_cod_report);
if(($lb_valido)&&($ai_cuantos<=0))
{
$lb_valido = $iscg_procesos->uf_cargar_txt_balancegeneral($ls_codemp);
if($lb_valido)
{
$rs_cta=$iscg_procesos->uf_select_scg_datastore( $ls_codemp, $ls_cod_report );
$data=$SQL->obtener_datos($rs_cta);
$ds_prorep=new class_datastore();
$ds_prorep->data=$data;
$li_num=$ds_prorep->getRowCount("cod_report");
for($i=1;$i<=$li_num;$i++)
{
$ls_status=$data["status"][$i];
if($ls_status=="S")
{
?>
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| getValue("sc_cuenta",$i)?> |
".$ds_prorep->getValue("denominacion",$i)."";
print"".number_format($ds_prorep->getValue("asignado",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("enero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("febrero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("marzo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("abril",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("mayo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("junio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("julio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("agosto",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("septiembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("octubre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("noviembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("diciembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("saldo_real_ant",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("saldo_apro",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("saldo_mod",$i),2,",",".")." | ";
print"
";
}//for
}
}
elseif(($lb_valido)&&($ai_cuantos>0))
{
$rs_cta=$iscg_procesos->uf_select_datastore_mensual( $ls_codemp, $ls_cod_report );
$data=$SQL->obtener_datos($rs_cta);
$ds_prorep=new class_datastore();
$ds_prorep->data=$data;
$li_num=$ds_prorep->getRowCount("cod_report");
for($i=1;$i<=$li_num;$i++)
{
$ls_status=$data["status"][$i];
if($ls_status=="S")
{
?>
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| getValue("sc_cuenta",$i)?> |
".$ds_prorep->getValue("denominacion",$i)."";
print"".number_format($ds_prorep->getValue("asignado",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("enero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("febrero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("marzo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("abril",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("mayo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("junio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("julio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("agosto",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("septiembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("octubre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("noviembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("diciembre",$i),2,",",".")." | ";
print"
";
}//for
}//else
}//if (ls_operacion=="" )
if($ls_operacion=="RECARGAR")
{
$la_empresa = $_SESSION["la_empresa"];
$ls_codemp = $la_empresa["codemp"];
$li_rtn=0 ;
$ls_cod_report="";
$lb_valido=true;
$ls_cod_report=$_POST["select"];
$lb_valido = $iscg_procesos->delete_scg_pc_reporte($ls_cod_report);
if ($lb_valido)
{
if ($ls_cod_report=="0405")
{
$lb_valido = $iscg_procesos->uf_cargar_txt_inversiones($ls_codemp);
if($lb_valido)
{
$msg->message("Los datos fueron cargados");
$rs_cta=$iscg_procesos->uf_select_scg_datastore( $ls_codemp, $ls_cod_report );
$data=$SQL->obtener_datos($rs_cta);
$ds_prorep=new class_datastore();
$ds_prorep->data=$data;
$li_num=$ds_prorep->getRowCount("cod_report");
for($i=1;$i<=$li_num;$i++)
{
$ls_status=$data["status"][$i];
if($ls_status=="S")
{
?>
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| getValue("sc_cuenta",$i)?> |
".$ds_prorep->getValue("denominacion",$i)."";
print"".number_format($ds_prorep->getValue("asignado",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("enero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("febrero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("marzo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("abril",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("mayo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("junio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("julio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("agosto",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("septiembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("octubre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("noviembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("diciembre",$i),2,",",".")." | ";
print"
";
}//for
}//if($lb_valido)
else
{
$msg->message("Error al cargar los datos");
}
}//if($ls_cod_report=="0405")
if ($ls_cod_report=="0714")
{
$lb_valido = $iscg_procesos->uf_cargar_txt_inversiones_0714($ls_codemp);
if($lb_valido)
{
$msg->message("Los datos fueron cargados");
$rs_cta=$iscg_procesos->uf_select_scg_datastore( $ls_codemp, $ls_cod_report );
$data=$SQL->obtener_datos($rs_cta);
$ds_prorep=new class_datastore();
$ds_prorep->data=$data;
$li_num=$ds_prorep->getRowCount("cod_report");
for($i=1;$i<=$li_num;$i++)
{
$ls_status=$data["status"][$i];
if($ls_status=="S")
{
?>
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| getValue("sc_cuenta",$i)?> |
".$ds_prorep->getValue("denominacion",$i)."";
print"".number_format($ds_prorep->getValue("asignado",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("enero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("febrero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("marzo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("abril",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("mayo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("junio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("julio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("agosto",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("septiembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("octubre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("noviembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("diciembre",$i),2,",",".")." | ";
print"
";
}//for
}//if($lb_valido)
else
{
$msg->message("Error al cargar los datos");
}
}//if($ls_cod_report=="0714")
if ($ls_cod_report=="0406")
{
$lb_valido = $iscg_procesos->uf_cargar_txt_edoresultado($ls_codemp);
if($lb_valido)
{
$msg->message("Los datos fueron cargados");
$rs_cta=$iscg_procesos->uf_select_scg_datastore( $ls_codemp, $ls_cod_report );
$data=$SQL->obtener_datos($rs_cta);
$ds_prorep=new class_datastore();
$ds_prorep->data=$data;
$li_num=$ds_prorep->getRowCount("cod_report");
for($i=1;$i<=$li_num;$i++)
{
$ls_status=$data["status"][$i];
if($ls_status=="S")
{
?>
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| getValue("sc_cuenta",$i)?> |
".$ds_prorep->getValue("denominacion",$i)."";
print"".number_format($ds_prorep->getValue("asignado",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("enero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("febrero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("marzo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("abril",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("mayo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("junio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("julio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("agosto",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("septiembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("octubre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("noviembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("diciembre",$i),2,",",".")." | ";
print"
";
}//for
}//if($lb_valido)
else
{
$msg->message("Error al cargar los datos");
}
}//if ($ls_cod_report=="0406")
if ($ls_cod_report=="0408")
{
$lb_valido = $iscg_procesos->uf_cargar_txt_balancegeneral($ls_codemp);
if($lb_valido)
{
$msg->message("Los datos fueron cargados");
$rs_cta=$iscg_procesos->uf_select_scg_datastore( $ls_codemp, $ls_cod_report );
$data=$SQL->obtener_datos($rs_cta);
$ds_prorep=new class_datastore();
$ds_prorep->data=$data;
$li_num=$ds_prorep->getRowCount("cod_report");
for($i=1;$i<=$li_num;$i++)
{
$ls_status=$data["status"][$i];
if($ls_status=="S")
{
?>
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| getValue("sc_cuenta",$i)?> |
".$ds_prorep->getValue("denominacion",$i)."";
print"".number_format($ds_prorep->getValue("asignado",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("enero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("febrero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("marzo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("abril",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("mayo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("junio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("julio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("agosto",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("septiembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("octubre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("noviembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("diciembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("saldo_real_ant",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("saldo_apro",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("saldo_mod",$i),2,",",".")." | ";
print"
";
}//for
}//if($lb_valido)
else
{
$msg->message("Error al cargar los datos");
}
}//if ($ls_cod_report=="0408")
if ($ls_cod_report=="0803")
{
$lb_valido = $iscg_procesos->uf_cargar_cuentas_balancegeneral_ins08($ls_codemp);
if($lb_valido)
{
$msg->message("Los datos fueron cargados");
$rs_cta=$iscg_procesos->uf_select_scg_datastore( $ls_codemp, $ls_cod_report );
$data=$SQL->obtener_datos($rs_cta);
$ds_prorep=new class_datastore();
$ds_prorep->data=$data;
$li_num=$ds_prorep->getRowCount("cod_report");
for($i=1;$i<=$li_num;$i++)
{
$ls_status=$data["status"][$i];
if($ls_status=="S")
{
?>
| ','getValue("saldo_real_ant",$i);?>','getValue("saldo_apro",$i);?>','getValue("saldo_mod",$i);?>','getValue("sc_cuenta",$i);?>','','','','getValue("denominacion",$i); ?>');">getValue("sc_cuenta",$i);?> |
| ','getValue("saldo_real_ant",$i);?>','getValue("saldo_apro",$i);?>','getValue("saldo_mod",$i);?>','getValue("sc_cuenta",$i);?>','','','','getValue("denominacion",$i); ?>');">getValue("sc_cuenta",$i);?> |
| getValue("sc_cuenta",$i)?> |
".$ds_prorep->getValue("denominacion",$i)."";
print"".number_format($ds_prorep->getValue("asignado",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("enero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("febrero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("marzo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("abril",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("mayo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("junio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("julio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("agosto",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("septiembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("octubre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("noviembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("diciembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("saldo_real_ant",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("saldo_apro",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("saldo_mod",$i),2,",",".")." | ";
print"
";
}//for
}//if($lb_valido)
else
{
$msg->message("Error al cargar los datos");
}
}//if ($ls_cod_report=="0408")
if ($ls_cod_report=="0414")
{
$lb_valido = $iscg_procesos->uf_cargar_txt_ctaahorroinversion($ls_codemp);
if($lb_valido)
{
$msg->message("Los datos fueron cargados");
$rs_cta=$iscg_procesos->uf_select_scg_datastore( $ls_codemp, $ls_cod_report );
$data=$SQL->obtener_datos($rs_cta);
$ds_prorep=new class_datastore();
$ds_prorep->data=$data;
$li_num=$ds_prorep->getRowCount("cod_report");
for($i=1;$i<=$li_num;$i++)
{
$ls_status=$data["status"][$i];
if($ls_status=="S")
{
?>
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| ','getValue("sc_cuenta",$i);?>','','','');">getValue("sc_cuenta",$i);?> |
| getValue("sc_cuenta",$i)?> |
".$ds_prorep->getValue("denominacion",$i)."";
print"".number_format($ds_prorep->getValue("asignado",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("enero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("febrero",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("marzo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("abril",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("mayo",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("junio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("julio",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("agosto",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("septiembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("octubre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("noviembre",$i),2,",",".")." | ";
print"".number_format($ds_prorep->getValue("diciembre",$i),2,",",".")." | ";
print"
";
}//for
}//if($lb_valido)
else
{
$msg->message("Error al cargar los datos");
}
}//if ($ls_cod_report=="0414")
}//if($lb_valido)
}//fin if($ls_operacion=="RECARGAR")
?>
