";
}
}
$li_filascuentas=$li_row;
/* $la_objectcuentas[$li_filascuentas][1]="".
"";
$la_objectcuentas[$li_filascuentas][2]="";
$la_objectcuentas[$li_filascuentas][3]="";
$la_objectcuentas[$li_filascuentas][4]="";
$la_objectcuentas[$li_filasfuentes][5]="";
*/ }
/* if ($ls_operacion != "ue_cargarcargo" && $ls_operacion != "ue_removercargo")
{
$li_filascargos=$_POST["filascargos"];
for($li_i=1;$li_i<$li_filascargos;$li_i++)
{
$ls_codigo = $_POST["txtcodcar".$li_i];
$ls_nombre = $_POST["txtnomcar".$li_i];
$ls_moncue = $_POST["txtmoncar".$li_i];
$ls_formula = $_POST["formula".$li_i];
$ls_prog = $_POST["prog".$li_i];
$ls_spgcuenta = $_POST["spgcuenta".$li_i];
$la_objectcargos[$li_i][1]="";
$la_objectcargos[$li_i][2]="";
$la_objectcargos[$li_i][3]="";
$la_objectcargos[$li_i][4]="";
}
$la_objectcargos[$li_filascargos][1]="";
$la_objectcargos[$li_filascargos][2]="";
$la_objectcargos[$li_filascargos][3]="";
$la_objectcargos[$li_filascargos][4]="";
}*/
}
/*******************************************************************************************************************************************************/
/************************************************ INICIALIZA LAS VARIABLES SI NO HAY SUBMIT *******************************************************************************************************/
else
{
$ls_formula="";
$ls_opemostrar="";
$ls_operacion="";
$ls_codasi="";
$ls_ptocueasi="";
$ls_codobrasi="";
$ls_nomobrasi="";
$ls_codproasi="";
$ls_tipconpro="";
$ls_nomproasi="";
$ls_codinsasi="";
$ls_nominsasi="";
$ls_fecasi="";
$ls_monparasi="0,00";
$ls_basimpasi="0,00";
$ls_montotasi="0,00";
$ls_obsasi="";
$ls_estobr="";
$ls_monobr="";
$ls_monasi="";
$ls_resmonasi="";
$ls_estadoasi="";
$ls_chk="";
$li_filaspartidas=1;
$la_objectpartidas[$li_filaspartidas][1]="";
$la_objectpartidas[$li_filaspartidas][2]="";
$la_objectpartidas[$li_filaspartidas][3]="";
$la_objectpartidas[$li_filaspartidas][4]="";
$la_objectpartidas[$li_filaspartidas][5]="";
$la_objectpartidas[$li_filaspartidas][6]="";
$la_objectpartidas[$li_filaspartidas][7]="";
$la_objectpartidas[$li_filaspartidas][8]="";
$la_objectpartidas[$li_filaspartidas][9]="";
$li_filascuentas=1;
$la_objectcuentas[1][1]="";
$la_objectcuentas[1][2]="";
$la_objectcuentas[1][3]="";
$la_objectcuentas[1][4]="";
$la_objectcuentas[1][5]="";
$li_filascargos=1;
$la_objectcargos[1][1]="";
$la_objectcargos[1][2]="";
$la_objectcargos[1][3]="";
$la_objectcargos[1][4]="";
}
/***************************************************************************************************************************************************************************/
/***************************************************************************************************************************************************************************/
if($ls_operacion=="ue_actulizarmontoasi")
{
require_once("../shared/class_folder/class_funciones_db.php");
require_once ("../shared/class_folder/sigesp_include.php");
$io_include=new sigesp_include();
$io_connect=$io_include->uf_conectar();
$io_funcdb=new class_funciones_db($io_connect);
$la_empresa=$_SESSION["la_empresa"];
require_once("../shared/class_folder/sigesp_c_generar_consecutivo.php");
$io_keygen= new sigesp_c_generar_consecutivo();
$ls_codasi= $io_keygen->uf_generar_numero_nuevo("SOB","sob_asignacion","codasi","SOBASI",15,"","","");
unset($io_keygen);
$ls_codobr=$_POST["txtcodobrasi"];
$io_asignacion->uf_select_obra($ls_codobr,$la_obra);
$io_asignacion->uf_select_montoasignado($ls_codobr,$ls_monasi);
$ls_monobr=$la_obra["monto"][1];
if($ls_monobr==$ls_monasi)
{
$io_msg->message("La Obra seleccionada ya fue asignada en su totalidad!!");
}
if (!empty ($ls_ptocueasi))
{
$ls_readonly="readonly";
}
$lb_validop=$io_asignacion->uf_select_partidasobra($ls_codobrasi,$la_partidas,$li_totalfilas);
if($lb_validop)
{
$io_datastore->data=$la_partidas;
$li_filaspartidas=$io_datastore->getRowCount("codpar");
for($li_i=1;$li_i<=$li_filaspartidas;$li_i++)
{
$ls_codigo=$io_datastore->getValue("codpar",$li_i);
$ls_nombre=$io_datastore->getValue("nompar",$li_i);
$ls_unidad=$io_datastore->getValue("nomuni",$li_i);
$ls_preuni=$io_datastore->getValue("prepar",$li_i);
$ls_canttot=$io_datastore->getValue("canxeje",$li_i);
$ls_canpareje=$io_datastore->getValue("canparasi",$li_i);
$la_objectpartidas[$li_i][1]="";
$la_objectpartidas[$li_i][2]="";
$la_objectpartidas[$li_i][3]="";
$la_objectpartidas[$li_i][4]="";
$la_objectpartidas[$li_i][5]="";
$la_objectpartidas[$li_i][6]="";
$la_objectpartidas[$li_i][7]="";
$la_objectpartidas[$li_i][8]="";
$la_objectpartidas[$li_i][9]="";
if($ls_canttot==0)
{
$la_objectpartidas[$li_i][1]="";
$la_objectpartidas[$li_i][2]="";
$la_objectpartidas[$li_i][3]="";
$la_objectpartidas[$li_i][4]="";
$la_objectpartidas[$li_i][5]="";
$la_objectpartidas[$li_i][6]="";
$la_objectpartidas[$li_i][7]="";
$la_objectpartidas[$li_i][8]="";
$la_objectpartidas[$li_i][9]="";
}
}
$li_filaspartidas=$li_filaspartidas+1;
$la_objectpartidas[$li_filaspartidas][1]="";
$la_objectpartidas[$li_filaspartidas][2]="";
$la_objectpartidas[$li_filaspartidas][3]="";
$la_objectpartidas[$li_filaspartidas][4]="";
$la_objectpartidas[$li_filaspartidas][5]="";
$la_objectpartidas[$li_filaspartidas][6]="";
$la_objectpartidas[$li_filaspartidas][7]="";
$la_objectpartidas[$li_filaspartidas][8]="";
$la_objectpartidas[$li_filaspartidas][9]="";
$li_filascuentas=1;
$la_objectcuentas[1][1]="";
$la_objectcuentas[1][2]="";
$la_objectcuentas[1][3]="";
$la_objectcuentas[1][4]="";
$la_objectcuentas[1][5]="";
}
if (array_key_exists("cargos",$_SESSION))
{
unset($_SESSION["cargos"]);
}
}
/***************************************************************************************************************************************************************************/
/*elseif($ls_operacion="ue_verificarexistencia")
{
$lb_valido=$io_contrato->uf_select_contrato ($ls_codcon,$la_data);
if($lb_valido)
{
if(count($la_data)>0)
{
$io_msg->message("El Código del Contrato ya existe!!!");
$ls_codcon="";
}
}
}*/
/************************************************ PREPARANDO INSERCION DE NUEVO REGISTRO ****************************************************************************/
elseif($ls_operacion=="ue_nuevo1")
{
require_once("../shared/class_folder/class_funciones_db.php");
require_once ("../shared/class_folder/sigesp_include.php");
$io_include=new sigesp_include();
$io_connect=$io_include->uf_conectar();
$io_funcdb=new class_funciones_db($io_connect);
$la_empresa=$_SESSION["la_empresa"];
require_once("../shared/class_folder/sigesp_c_generar_consecutivo.php");
$io_keygen= new sigesp_c_generar_consecutivo();
$ls_codasi= $io_keygen->uf_generar_numero_nuevo("SOB","sob_asignacion","codasi","SOBASI",15,"","","");
unset($io_keygen);
// $ls_codasi=$io_funcdb->uf_generar_codigo(true,$la_empresa["codemp"],"sob_asignacion","codasi",6);
$ls_ptocueasi="";
$ls_codproasi="";
$ls_tipconpro="";
$ls_nomproasi="";
$ls_codinsasi="";
$ls_nominsasi="";
$ls_fecasi="";
$ls_obsasi="";
$ls_estadoasi="EMITIDO";
$li_filascuentas=1;
$la_objectcuentas[1][1]="";
$la_objectcuentas[1][2]="";
$la_objectcuentas[1][3]="";
$la_objectcuentas[1][4]="".
"";
$la_objectcuentas[$li_i][2]="";
$la_objectcuentas[$li_i][3]="";
$la_objectcuentas[$li_i][4]="";
$la_objectcuentas[$li_i][5]="";
}
$la_objectcuentas[$li_filascuentas][1]="";
$la_objectcuentas[$li_filascuentas][2]="";
$la_objectcuentas[$li_filascuentas][3]="";
$la_objectcuentas[$li_filascuentas][4]="";
$la_objectcuentas[$li_filascuentas][5]="";
$li_filascargos=$_POST["filascargos"];
$li_filascargos=$li_filascargos+1;
for($li_i=1;$li_i<$li_filascargos;$li_i++)
{
$ls_codigo=$_POST["txtcodcar".$li_i];
$ls_nombre=$_POST["txtnomcar".$li_i];
$ld_monto=$_POST["txtmoncar".$li_i];
$ls_formula=$_POST["formula".$li_i];
$ls_prog=$_POST["prog".$li_i];
$ls_spgcuenta=$_POST["spgcuenta".$li_i];
$la_objectcargos[$li_i][1]="";
$la_objectcargos[$li_i][2]="";
$la_objectcargos[$li_i][3]="";
$la_objectcargos[$li_i][4]="";
}
$la_objectcargos[$li_filascargos][1]="";
$la_objectcargos[$li_filascargos][2]="";
$la_objectcargos[$li_filascargos][3]="";
$la_objectcargos[$li_filascargos][4]="";
}
/***************************************************************************************************************************************************************************/
/*******************************************INSERTAR CAMPO EN GRID CUENTAS********************************************************************************************************************************/
elseif($ls_operacion=="ue_cargarcuenta")
{
$li_filascuentas=$_POST["filascuentas"];
$li_filascuentas=$li_filascuentas+1;
for($li_i=1;$li_i<$li_filascuentas;$li_i++)
{
$ls_codigo=$_POST["txtcodcue".$li_i];
$ls_codest1=$_POST["codest1".$li_i];
$ls_codest2=$_POST["codest2".$li_i];
$ls_codest3=$_POST["codest3".$li_i];
$ls_codest4=$_POST["codest4".$li_i];
$ls_codest5=$_POST["codest5".$li_i];
$ls_disponible=$_POST["disponible".$li_i];
$ls_nombre=$_POST["txtnomcue".$li_i];
$ls_moncar=$_POST["txtmoncue".$li_i];
$ls_estcla=$_POST["txtestcla".$li_i];
$la_objectcuentas[$li_i][1]="".
"";
$la_objectcuentas[$li_i][2]="";
$la_objectcuentas[$li_i][3]="";
$la_objectcuentas[$li_i][4]="";
$la_objectcuentas[$li_i][5]="";
}
$la_objectcuentas[$li_filascuentas][1]="";
$la_objectcuentas[$li_filascuentas][2]="";
$la_objectcuentas[$li_filascuentas][3]="";
$la_objectcuentas[$li_filascuentas][4]="";
$la_objectcuentas[$li_filascuentas][5]="";
}
/***************************************************************************************************************************************************************************/
/***************************************REMOVER CAMPO EN GRID CUENTAS************************************************************************************************************************************/
elseif($ls_operacion=="ue_removercuenta")
{
$li_filascuentas=$_POST["filascuentas"];
$li_filascuentas=$li_filascuentas-1;
$li_removercuenta=$_POST["hidremovercuenta"];
$li_temp=0;
for($li_i=1;$li_i<=$li_filascuentas;$li_i++)
{
if($li_i!=$li_removercuenta)
{
$li_temp=$li_temp+1;
$ls_codigo = $_POST["txtcodcue".$li_i];
$ls_codest1 = $_POST["codest1".$li_i];
$ls_codest2 = $_POST["codest2".$li_i];
$ls_codest3 = $_POST["codest3".$li_i];
$ls_codest4 = $_POST["codest4".$li_i];
$ls_codest5 = $_POST["codest5".$li_i];
$ls_disponible = $_POST["disponible".$li_i];
$ls_nombre = $_POST["txtnomcue".$li_i];
$ls_moncar = $_POST["txtmoncue".$li_i];
$ls_estcla = $_POST["txtestcla".$li_i];
$ls_estcar = $_POST["estcar".$li_i];
//$ls_prog = $_POST["prog".$li_temp];
//$ls_spgcuenta = $_POST["spgcuenta".$li_temp];
$la_objectcuentas[$li_temp][1]="".
"";
$la_objectcuentas[$li_temp][2]="";
$la_objectcuentas[$li_temp][3]="";
$la_objectcuentas[$li_temp][4]="";
if($ls_estcar!="C")
{
$la_objectcuentas[$li_temp][5]="";
}
else
{
$la_objectcuentas[$li_temp][5]="";
}
}
}
$la_objectcuentas[$li_filascuentas][1]="";
$la_objectcuentas[$li_filascuentas][2]="";
$la_objectcuentas[$li_filascuentas][3]="";
$la_objectcuentas[$li_filascuentas][4]="";
$la_objectcuentas[$li_filascuentas][5]="";
}
/***************************************************************************************************************************************************************************/
/*************************************************INSERTAR CAMPO EN GRID CARGOS**************************************************************************************************************************/
elseif($ls_operacion=="ue_cargarcargo")
{
$lb_valido =false;
$ls_baseimp =$_POST["txtbasimpasi"];
$ls_montpar =$_POST["txtmonparasi"];
$ld_baseimpo=$io_funcsob->uf_convertir_cadenanumero($ls_baseimp);
$ld_montopar=$io_funcsob->uf_convertir_cadenanumero($ls_montpar);
$ld_montotasi=0;
/////////////////////////////////////////////////////CARLOS////////////////////////////////////////////////////////////////////////
$li_filasfuentes=$_POST["filascuentas"];
for($li_i=1;$li_i<$li_filasfuentes;$li_i++)
{
$ls_codigo=$_POST["txtcodcue".$li_i];
$ls_codest1=$_POST["codest1".$li_i];
$ls_codest2=$_POST["codest2".$li_i];
$ls_codest3=$_POST["codest3".$li_i];
$ls_codest4=$_POST["codest4".$li_i];
$ls_codest5=$_POST["codest5".$li_i];
$ls_disponible=$_POST["disponible".$li_i];
$ls_nombre=$_POST["txtnomcue".$li_i];
$ls_moncar=$_POST["txtmoncue".$li_i];
$ls_estcla=$_POST["txtestcla".$li_i];
$ls_estcar=$_POST["txtestcar".$li_i];
$la_objectcuentas[$li_i][1]="".
"";
$la_objectcuentas[$li_i][2]="";
$la_objectcuentas[$li_i][3]="";
$la_objectcuentas[$li_i][4]="";
$la_objectcuentas[$li_i][5]="";
}
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
$li_filascargos=$_POST["filascargos"];
$li_filascargos=$li_filascargos+1;
for($li_i=1;$li_i<$li_filascargos;$li_i++)
{
$ls_codigo=$_POST["txtcodcar".$li_i];
$ls_nombre=$_POST["txtnomcar".$li_i];
$ls_formula=$_POST["formula".$li_i];
$ls_prog=$_POST["prog".$li_i];
$ls_spgcuenta=$_POST["spgcuenta".$li_i];
$ld_result=$io_evalform->uf_evaluar($ls_formula,$ld_baseimpo,$lb_valido);
$ld_montotasi=$ld_montotasi+$ld_result;
$la_objectcargos[$li_i][1]="";
$la_objectcargos[$li_i][2]="";
$la_objectcargos[$li_i][3]="";
$la_objectcargos[$li_i][4]="";
}
$la_objectcargos[$li_filascargos][1]="";
$la_objectcargos[$li_filascargos][2]="";
$la_objectcargos[$li_filascargos][3]="";
$la_objectcargos[$li_filascargos][4]="";
//////////////////////////////////////////////////////////CARLOS/////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
$ld_subtotal=$ld_montopar-$ld_baseimpo;
$ld_resultado=$ld_baseimpo+$ld_montotasi+$ld_subtotal;
$ls_montotasi=$io_funcsob->uf_convertir_numerocadena($ld_resultado);
}
/***************************************************************************************************************************************************************************/
/*******************************************************REMOVER CAMPO EN GRID CARGOS********************************************************************************************************************/
elseif($ls_operacion=="ue_removercargo")
{
$lb_valido=false;
$ls_baseimp=$_POST["txtbasimpasi"];
$ls_montpar=$_POST["txtmonparasi"];
$ld_baseimpo=$io_funcsob->uf_convertir_cadenanumero($ls_baseimp);
$ld_montopar=$io_funcsob->uf_convertir_cadenanumero($ls_montpar);
$ld_montotasi=0;
$li_filascargos=$_POST["filascargos"];
$li_filascargos=$li_filascargos-1;
$li_removercargo=$_POST["hidremovercargo"];
$li_temp=0;
for($li_i=1;$li_i<=$li_filascargos;$li_i++)
{
if($li_i!=$li_removercargo)
{
$li_temp=$li_temp+1;
$ls_codigo=$_POST["txtcodcar".$li_temp];
$ls_nombre=$_POST["txtnomcar".$li_temp];
$ls_monto=$_POST["txtmoncar".$li_temp];
$ls_formula=$_POST["formula".$li_temp];
$ls_prog=$_POST["prog".$li_temp];
$ls_spgcuenta=$_POST["spgcuenta".$li_temp];
$la_objectcargos[$li_temp][1]="";
$la_objectcargos[$li_temp][2]="";
$la_objectcargos[$li_temp][3]="";
$la_objectcargos[$li_temp][4]="";
$ld_result=$io_evalform->uf_evaluar($ls_formula,$ld_baseimpo,$lb_valido);
$ld_montotasi=$ld_montotasi+$ld_result;
}
}
$la_objectcargos[$li_filascargos][1]="";
$la_objectcargos[$li_filascargos][2]="";
$la_objectcargos[$li_filascargos][3]="";
$la_objectcargos[$li_filascargos][4]="";
$ld_subtotal=$ld_montopar-$ld_baseimpo;
$ld_resultado=$ld_baseimpo+$ld_montotasi+$ld_subtotal;
$ls_montotasi=$io_funcsob->uf_convertir_numerocadena($ld_resultado);
}
/***************************************************************************************************************************************************************************/
/*******************************************INSERCION DE REGISTRO EN BD*******************************************************************************************************************************/
elseif($ls_operacion=="ue_guardar")
{
$ld_date=$io_function->uf_convertirdatetobd($ls_fecasi);
$ls_chk=$_POST["hidstatus"];
$io_asignacion->io_sql->begin_transaction();
$ls_codasiaux=$ls_codasi;
$_SESSION["fechacomprobante"]=$ld_date;
$lb_valido=$io_asignacion->uf_guardar_asignacion($ls_codasi,$ls_codobrasi,$ls_codproasi,$ls_codinsasi,$ls_ptocueasi,$ld_date,$ls_obsasi,$ls_monparasi,$ls_basimpasi,$ls_montotasi,$la_seguridad,$ls_chk);
if($lb_valido)
{
/************ GUARDANDO PARTIDAS ***********/
$li_partidas=1;
$la_partidas["codpar"][1]="";
$la_partidas["canteje"][1]="";
$la_partidas["cant"][1]="";
$la_partidas["preref"][1]="";
$la_partidas["pre"][1]="";
for ($li_i=1;$li_i<$li_filaspartidas;$li_i++)
{
if(!empty($_POST["flagpar".$li_i]))
{
$la_partidas["codpar"][$li_partidas]=$_POST["txtcodpar".$li_i];
$la_partidas["canteje"][$li_partidas]=$_POST["canpareje".$li_i];
$la_partidas["cant"][$li_partidas]=$_POST["txtcantpar".$li_i];
$la_partidas["preref"][$li_partidas]=$_POST["txtpreuni".$li_i];
$la_partidas["pre"][$li_partidas]=$_POST["txtpreunimod".$li_i];
$li_partidas++;
}
}
$lb_valido=$io_asignacion->uf_update_dtpartidas($ls_codasi,$ls_codobrasi,$la_partidas,$li_partidas,$la_seguridad);
/***********************************************/
/************ GUARDANDO CARGOS **************/
$la_cargos["codcar"][1]="";
$la_cargos["moncar"][1]="";
$la_cargos["formula"][1]="";
$la_cargos["codestpro"][1]="";
$la_cargos["spgcuenta"][1]="";
$li_filascargos=0;
if (array_key_exists("cargos",$_SESSION))
{
$la_sesscar=$_SESSION["cargos"];
$li_filascargos=count($la_sesscar["codcar"]);
for ($li_i=1;$li_i<=$li_filascargos;$li_i++)
{
$la_cargos["codcar"][$li_i] = $la_sesscar["codcar"][$li_i];
$la_cargos["moncar"][$li_i] = $la_sesscar["monimp"][$li_i];
$la_cargos["basimp"][$li_i] = $la_sesscar["baseimp"][$li_i];
$la_cargos["formula"][$li_i] = $la_sesscar["formula"][$li_i];
$la_cargos["codestpro"][$li_i] = $la_sesscar["codestpro"][$li_i];
$la_cargos["estcla"][$li_i] = $la_sesscar["estcla"][$li_i];
$la_cargos["spgcuenta"][$li_i] = $la_sesscar["spgcuenta"][$li_i];
}
$li_filascargos=$li_filascargos+1;
}
if($lb_valido)
{
$lb_valido=$io_asignacion->uf_update_dtcargos($ls_codasi,$ls_basimpasi,$la_cargos,$li_filascargos,$la_seguridad);
}
/***********************************************/
/************ GUARDANDO CUENTAS **************/
$la_cuentas["codcue"][1]="";
$la_cuentas["codest1"][1]="";
$la_cuentas["codest2"][1]="";
$la_cuentas["codest3"][1]="";
$la_cuentas["codest4"][1]="";
$la_cuentas["codest5"][1]="";
$la_cuentas["estcla"][1]="";
$la_cuentas["moncue"][1]="";
$li_filascuentas=$io_fun_sob->uf_obtenervalor("filascuentas",0);
for ($li_i=1;$li_i<$li_filascuentas;$li_i++)
{
$la_cuentas["codcue"][$li_i]=$_POST["txtnomcue".$li_i];
$la_cuentas["codest1"][$li_i]=str_pad($_POST["codest1".$li_i],25,'0',STR_PAD_LEFT);
$la_cuentas["codest2"][$li_i]=str_pad($_POST["codest2".$li_i],25,'0',STR_PAD_LEFT);
$la_cuentas["codest3"][$li_i]=str_pad($_POST["codest3".$li_i],25,'0',STR_PAD_LEFT);
$la_cuentas["codest4"][$li_i]=str_pad($_POST["codest4".$li_i],25,'0',STR_PAD_LEFT);
$la_cuentas["codest5"][$li_i]=str_pad($_POST["codest5".$li_i],25,'0',STR_PAD_LEFT);
$la_cuentas["estcla"][$li_i]=$_POST["txtestcla".$li_i];
$la_cuentas["moncue"][$li_i]=$_POST["txtmoncue".$li_i];
//print "ESTRUC->".$la_cuentas["codest1"][$li_i]." - ".$la_cuentas["codest2"][$li_i]." - ".$la_cuentas["codest3"][$li_i]."";
}
else
{
$la_objectcuentas[$li_row][5]="";
}
}
$li_totrowspg=$li_i+1;
$la_objectcuentas[$li_filascuentas][1]="".
"";
$la_objectcuentas[$li_filascuentas][2]="";
$la_objectcuentas[$li_filascuentas][3]="";
$la_objectcuentas[$li_filascuentas][4]="";
$la_objectcuentas[$li_filascuentas][5]="";
if($lb_valido)
{
$lb_valido=$io_asignacion->uf_update_dtcuentas($ls_codasi,$la_cuentas,$li_filascuentas,$la_seguridad);
}
if($lb_valido)
{
$lb_ok=$io_asignacion->uf_validar_cuentas($la_cuentas);
}
/***********************************************/
if($lb_valido)
{
$lb_valido=$io_asignacion->uf_update_estadoobra($ls_codobrasi,2);
}
if($lb_valido)
{
if($ls_codasiaux!=$ls_codasi)
{$io_msg->message("Se le asigno un nuevo numero de asignación ".$ls_codasi );}
$io_msg->message("Operación Ejecutada Exitosamente");
$io_asignacion->io_sql->commit();
$ls_chk="C";
// uf_limpiar();
}
else
{
$io_msg->message("No se proceso la operación");
$io_asignacion->io_sql->rollback();
}
/*print "";*/
}
}
/***************************************************************************************************************************************************************************/
/*******************************************ANULAR UNA ASIGNACION*******************************************************************************************************************************/
elseif($ls_operacion=="ue_anular")
{
$io_asignacion->uf_select_estado($ls_codasi,$ls_estasi);
if(($ls_estasi==1)||($ls_estasi==6))
{
// $lb_ultimoregistro=$io_asignacion->uf_verificar_solicitudeliminar($ls_codasi);
// if($lb_ultimoregistro)
// {
$io_asignacion->io_sql->begin_transaction();
$lb_valido=$io_asignacion->uf_delete_partidas($ls_codasi,$ls_codobrasi,$la_seguridad);
if($lb_valido)
{
$lb_valido=$io_asignacion->uf_delete_cargos($ls_codasi,$la_seguridad);
if($lb_valido)
{
$lb_valido=$io_asignacion->uf_delete_cuentas($ls_codasi,$la_seguridad);
if($lb_valido)
{
$lb_valido=$io_asignacion->uf_delete_asignacion($ls_codasi,$la_seguridad);
if($lb_valido)
{
for ($li_i=1;$li_i<$li_filaspartidas;$li_i++)
{
if(!empty($_POST["flagpar".$li_i]))
{
$ls_codparG=$_POST["txtcodpar".$li_i];
$ls_canejeG=$_POST["canpareje".$li_i];
$ls_canparG=$_POST["txtcantpar".$li_i];
$lb_valido=$io_asignacion->uf_update_actcantidad($ls_codobrasi,$ls_codparG,$ls_canparG,$ls_canejeG,$la_seguridad);
}
if(!$lb_valido)
{
break;
}
}
}
}
}
}
if($lb_valido)
{
$lb_valido=$io_asignacion->uf_update_estadoobra($ls_codobrasi,1);
}
if($lb_valido)
{
$io_msg->message("Registro Eliminado Exitosamente");
$io_asignacion->io_sql->commit();
}
else
{
$io_msg->message("No se proceso la Eliminacion");
$io_asignacion->io_sql->rollback();
}
// }
// else
// {
// $io_msg->message("Esta Asignacion no puede ser Eliminada!!");
/* $io_asignacion->io_sql->begin_transaction();
$lb_valido=$io_asignacion->uf_update_estado($ls_codasi,3,$la_seguridad);
if($lb_valido)
{
for ($li_i=1;$li_i<$li_filaspartidas;$li_i++)
{
if(!empty($_POST["flagpar".$li_i]))
{
$ls_codparG=$_POST["txtcodpar".$li_i];
$ls_canejeG=$_POST["canpareje".$li_i];
$ls_canparG=$_POST["txtcantpar".$li_i];
$lb_valido=$io_asignacion->uf_update_actcantidad($ls_codobrasi,$ls_codparG,$ls_canparG,$ls_canejeG,$la_seguridad);
}
if(!$lb_valido)
{
break;
}
}
if($lb_valido)
{
$io_msg->message("Registro Anulado Exitosamente");
$io_asignacion->io_sql->commit();
}
else
{
$io_msg->message("No se proceso la Anulacion");
$io_asignacion->io_sql->rollback();
}
}*/
// }
}
else
{
$io_msg->message("Esta Asignacion no puede ser Eliminada!!");
}
print "";
}
/***************************************************************************************************************************************************************************/
/*******************************************CARGAR DATOS DE UNA ASIGNACION*******************************************************************************************************************************/
elseif($ls_operacion=="ue_cargarasignacion")
{
$ls_codasi=$_POST["txtcodasi"];
$ls_est=$_POST["txtestasi"];
$ls_estadoasi=$io_funcsob->uf_convertir_numeroestado($ls_est);
$io_asignacion->uf_buscar_inspector($ls_codasi,$ls_nominsasi);
/*************************CARGANDO PARTIDAS***********************/
$lb_validop=$io_asignacion->uf_select_allpartidas($ls_codobrasi,$ls_codasi,$la_partidas,$ai_rows);
if($lb_validop)
{
$io_datastore->data=$la_partidas;
$li_filaspartidas=$io_datastore->getRowCount("codpar");
if (!empty ($ls_ptocueasi))
{
$ls_readonly="readonly";
}
for($li_i=1;$li_i<=$li_filaspartidas;$li_i++)
{
$ls_codigo=$io_datastore->getValue("codpar",$li_i);
$ls_codigoasi=$io_datastore->getValue("codasi",$li_i);
$ls_canpareje=$io_datastore->getValue("canparasi",$li_i);
$ls_nombre=$io_datastore->getValue("nompar",$li_i);
$ls_unidad=$io_datastore->getValue("nomuni",$li_i);
$ls_preuni=$io_datastore->getValue("prepar",$li_i);
$ls_preunimod=$io_datastore->getValue("preparasi",$li_i);
$ls_canttot=$io_datastore->getValue("canttot",$li_i);
$ls_cantpar=$io_datastore->getValue("canparobrasi",$li_i);
$ld_total=$ls_cantpar*$ls_preunimod;
$ld_cant=$ls_canttot+$ls_cantpar;
if(($ls_cantpar!=0))
{
$la_objectpartidas[$li_i][1]="";
}
else
{
$la_objectpartidas[$li_i][1]="";
}
$la_objectpartidas[$li_i][2]="";
$la_objectpartidas[$li_i][3]="";
$la_objectpartidas[$li_i][4]="";
$la_objectpartidas[$li_i][5]="";
$la_objectpartidas[$li_i][6]="";
$la_objectpartidas[$li_i][7]="";
$la_objectpartidas[$li_i][8]="";
$la_objectpartidas[$li_i][9]="";
if($ld_cant==0)
{
$la_objectpartidas[$li_i][1]="";
$la_objectpartidas[$li_i][2]="";
$la_objectpartidas[$li_i][3]="";
$la_objectpartidas[$li_i][4]="";
$la_objectpartidas[$li_i][5]="";
$la_objectpartidas[$li_i][6]="";
$la_objectpartidas[$li_i][7]="";
$la_objectpartidas[$li_i][8]="";
$la_objectpartidas[$li_i][9]="";
}
}
$li_filaspartidas=$li_filaspartidas+1;
$la_objectpartidas[$li_filaspartidas][1]="";
$la_objectpartidas[$li_filaspartidas][2]="";
$la_objectpartidas[$li_filaspartidas][3]="";
$la_objectpartidas[$li_filaspartidas][4]="";
$la_objectpartidas[$li_filaspartidas][5]="";
$la_objectpartidas[$li_filaspartidas][6]="";
$la_objectpartidas[$li_filaspartidas][7]="";
$la_objectpartidas[$li_filaspartidas][8]="";
$la_objectpartidas[$li_filaspartidas][9]="";
}
/*************************CARGANDO CUENTAS**********************/
$lb_validoc=$io_asignacion->uf_select_cuentas($ls_codasi,$la_cuentas,$li_totalfilas);
if($lb_validoc)
{
$io_datastore->data=$la_cuentas;
$li_filascuentas=$io_datastore->getRowCount("spg_cuenta");
$lb_valido=$io_fun_sob->uf_loadmodalidad($li_len1,$li_len2,$li_len3,$li_len4,$li_len5,$ls_titulo);
for($li_i=1;$li_i<=$li_filascuentas;$li_i++)
{
$ls_codest1=$io_funcsob->uf_convertir_cadenanumero($io_datastore->getValue("codestpro1",$li_i));
$ls_codest2=$io_funcsob->uf_convertir_cadenanumero($io_datastore->getValue("codestpro2",$li_i));
$ls_codest3=$io_funcsob->uf_convertir_cadenanumero($io_datastore->getValue("codestpro3",$li_i));
$ls_codest4=$io_funcsob->uf_convertir_cadenanumero($io_datastore->getValue("codestpro4",$li_i));
$ls_codest5=$io_funcsob->uf_convertir_cadenanumero($io_datastore->getValue("codestpro5",$li_i));
$ls_estcla=$io_funcsob->uf_convertir_cadenanumero($io_datastore->getValue("estcla",$li_i));
switch($ls_estcla)
{
case "A":
$ls_estcla=utf8_encode("ACCION");
break;
case "P":
$ls_estcla=utf8_encode("PROYECTO");
break;
}
$ls_codigo=substr($ls_codest1,(strlen($ls_codest1)-$li_len1),$li_len1).substr($ls_codest2,(strlen($ls_codest2)-$li_len2),$li_len2).substr($ls_codest3,(strlen($ls_codest3)-$li_len3),$li_len3).substr($ls_codest4,(strlen($ls_codest4)-$li_len4),$li_len4).substr($ls_codest5,(strlen($ls_codest5)-$li_len5),$li_len5);
$ls_nombre=$io_datastore->getValue("spg_cuenta",$li_i);
$ls_moncar=$io_datastore->getValue("monto",$li_i);
$ls_disponible=$io_datastore->getValue("disponible",$li_i);
$ls_cargo=$io_asignacion->uf_verificarcuenta_cargos($ls_codasi,$ls_nombre,$ls_codest1.$ls_codest2.$ls_codest3.$ls_codest4.$ls_codest5,$ls_estcla);
$la_objectcuentas[$li_i][1]="".
"";
$la_objectcuentas[$li_i][2]="";
$la_objectcuentas[$li_i][3]="";
$la_objectcuentas[$li_i][4]="";
$la_objectcuentas[$li_i][5]=" |
||||
|
||||
     |