else
{
$io_msg->message("La Asignacion asociada debe estar contabilizada");
}
}
/*******************************************BUSCAR DATOS DE CONTRATO*********************************************************************/
elseif($ls_operacion=="ue_datcontrato")
{
$ls_codcon=$_POST["txtcodcon"];
$io_valuacion->uf_select_contrato($ls_codcon,&$la_contrato);
$io_valuacion->uf_select_anticipos($ls_codcon,&$ls_totant);
$io_valuacion->uf_select_variaciones($ls_codcon,&$ld_aum,1);
$io_valuacion->uf_select_variaciones($ls_codcon,&$ld_dis,2);
$ls_desobr=$la_contrato["desobr"][1];
$ls_puncue=$la_contrato["codasi"][1];
$ls_estcon=$io_funcsob->uf_convertir_numeroestado ($la_contrato["estcon"][1]);
$ls_moncon=$la_contrato["monto"][1];
$ls_feccon=$io_function->uf_convertirfecmostrar($la_contrato["feccon"][1]);
$ls_totcon=$la_contrato["monto"][1]+$ld_aum+$ld_dis;
$lb_validop=$io_valuacion->uf_select_partidasasignadas($ls_codcon,&$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("prerefparasi",$li_i);
$ls_civsup="";
$ls_civinsact="";
}
}
elseif($ls_operacion=="ue_cargarcontrato")
{
$lb_valido=$io_contrato->uf_select_contrato($ls_codcon,$la_data);
if($lb_valido)
{
$ls_fecinicon=$io_function->uf_convertirfecmostrar($la_data["fecinicon"][1]);
$ls_placon=$io_funsob->uf_convertir_decimalentero($la_data["placon"][1]);
$ls_placonuni=$la_data["nomuni"][1];
$ls_contasi=$la_data["nompro"][1];
$ls_moncon=$io_funsob->uf_convertir_numerocadena($la_data["monto"][1]);
$ls_estcon=$io_funsob->uf_convertir_numeroestado($la_data["estcon"][1]);
$ls_codobr=$la_data["codobr"][1];
$ls_codcon=$la_data["codcon"][1];
$lb_valido=$io_obra->uf_select_obra($ls_codobr,$la_data);
if($lb_valido)
{
$ls_desobr=$la_data["desobr"][1];
$ls_estobr=$la_data["desest"][1];
$ls_munobr=$la_data["denmun"][1];
$ls_comobr=$la_data["nomcom"][1];
$ls_parobr=$la_data["denpar"][1];
$ls_dirobr=$la_data["dirobr"][1];
}
}
}
elseif($ls_operacion=="ue_guardar")
print "<td><a href=javascript:ue_ordenar('c.codasi','BUSCAR');><font color=#FFFFFF>Cod. Asig</font></a></td>";
print "<td><a href=javascript:ue_ordenar('o.codobr','BUSCAR');><font color=#FFFFFF>Cod. Obra</font></a></td>";
print "<td><a href=javascript:ue_ordenar('o.desobr','BUSCAR');><font color=#FFFFFF>Descripción Obra</font></a></td>";
print "<td><a href=javascript:ue_ordenar('c.feccon','BUSCAR');><font color=#FFFFFF>Fecha Creación Cont.</font></a></td>";
print "<td><a href=javascript:ue_ordenar('c.fecinicon','BUSCAR');><font color=#FFFFFF>Fecha Inicio Cont.</font></a></td>";
print "<td><a href=javascript:ue_ordenar('c.estcon','BUSCAR');><font color=#FFFFFF>Estado</font></a></td>";
print "<td><font color=#FFFFFF>Contabilizado</font></td>";
print "</tr>";
print "<br>";
for($li_z=1;$li_z<=$li_totrow;$li_z++)
{
print "<tr class=celdas-blancas align=center>";
$ls_codigo=$data["codcon"][$li_z];
$ls_desobr=$data["desobr"][$li_z];
$ls_estado=$io_funobr->uf_convertir_numeroestado($data["estcon"][$li_z]);
$ls_codest=$data["estcon"][$li_z];
$ls_codobr=$data["codobr"][$li_z];
$ld_monto=$data["monto"][$li_z];
$ls_placon=$data["placon"][$li_z];
$ls_placonuni=$data["placonuni"][$li_z];
$ls_mulcon=$data["mulcon"][$li_z];
$ls_tiemulcon=$data["tiemulcon"][$li_z];
$ls_mulreuni=$data["mulreuni"][$li_z];
$ls_lapgarcon=$data["lapgarcon"][$li_z];
$ls_lapgaruni=$data["lapgaruni"][$li_z];
$ls_codtco=$data["codtco"][$li_z];
$ls_monmaxcon=$data["monmaxcon"][$li_z];
$ls_pormaxcon=$data["pormaxcon"][$li_z];
$ls_obscon=$data["obscon"][$li_z];
$ls_porejefiscon=$data["porejefiscon"][$li_z];
else
{
$io_msg->message("Esta Asignacion no puede ser Anulada!!");
}
print "<script language=javascript>";
print "location.href=location";
print "</script>";
}
/***************************************************************************************************************************************************************************/
/*******************************************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_codpro=$data["codpro"][$li_z];
$ls_codtob=$data["codtob"][$li_z];
$ls_dirobr=$data["dirobr"][$li_z];
$ls_obsobr=$data["obsobr"][$li_z];
$ls_resobr=$data["resobr"][$li_z];
$ld_monto=$data["monto"][$li_z];
$ls_feccreobr=$io_funcion->uf_convertirfecmostrar($data["feccreobr"][$li_z]);
$ls_nompro=$data["nompro"][$li_z];
$ls_fechainicio=$io_funcion->uf_convertirfecmostrar($data["feciniobr"][$li_z]);
$ls_fechafin=$io_funcion->uf_convertirfecmostrar($data["fecfinobr"][$li_z]);
$ls_nomten=$data["nomten"][$li_z];
$ls_nomtipest=$data["nomtipest"][$li_z];
$ls_nomsiscon=$data["nomsiscon"][$li_z];
$ls_nomtob=$data["nomtob"][$li_z];
$ls_codigopais=$data["codpai"][$li_z];
$ls_status=$io_funsob->uf_convertir_numeroestado($data["staobr"][$li_z]);
print "<td align=center><a href=\"javascript: aceptar('$ls_codigo','$ls_descripcion','$ls_estado','$ls_codest','$ls_codten',
'$ls_codtipest','$ls_codpai','$ls_codmun','$ls_codpar','$ls_codcom','$ls_codsiscon','$ls_codpro','$ls_codtob',
'$ls_dirobr','$ls_obsobr','$ls_resobr','$ld_monto','$ls_feccreobr','$ls_nompro','$ls_fechainicio',
'$ls_fechafin','$ls_nomten','$ls_nomtipest','$ls_nomsiscon','$ls_nomtob','$ls_status','$ls_codigopais');\">".$ls_codigo."</a></td>";
print "<td align=left>".$ls_descripcion."</td>";
print "<td align=center>".$ls_nompro."</td>";
print "<td align=center>".$ls_estado."</td>";
print "<td align=center>".$ls_fechainicio."</td>";
print "<td align=center>".$ls_fechafin."</td>";
print "<td align=center>".$ls_status."</td>";
print "</tr>";
}
print "</table>";
}
else
$io_mensaje->error_modificar();
$io_msg->message("en retenciones");
$io_anticipo->io_sql->rollback();
}
elseif($lb_valido===true)
{
$io_mensaje->modificar();
$io_anticipo->io_sql->commit();
}
}
else
{
if($ls_estspgscg==0)
{
$ls_estado=$io_funsob->uf_convertir_numeroestado($li_estado);
$io_msg->message("El registro no puede ser modificado, su estado es $ls_estado");
}
else
{
$io_msg->message("El registro no puede ser modificado, ya esta Comprometido");
}
}
}
}
else
{
$io_msg->message("El anticipo no existe");
}
}
$ls_documento=$_POST["cmbdocumento"];
$ls_operacion=$_POST["operacion"];
$ls_orden=$_POST["orden"];
$ls_campo=$_POST["campo"];
if($ls_documento=="CONTRATO" && $ls_operacion=="")
{
if($ls_campo=="") $ls_campo="c.codcon";
$lb_valido=$io_contabilizacion->uf_select_contrato($ls_campo,$ls_orden,$la_contratos,$li_filas);
for($li_i=1;$li_i<=$li_filas;$li_i++)
{
$ls_codcon=$la_contratos["codcon"][$li_i];
$ls_desobr=$la_contratos["desobr"][$li_i];
$ls_feccon=$io_fun->uf_convertirfecmostrar($la_contratos["feccon"][$li_i]);
$ls_monto=$io_funsob->uf_convertir_numerocadena($la_contratos["monto"][$li_i]);
$ls_estcon=$io_funsob->uf_convertir_numeroestado ($la_contratos["estcon"][$li_i]);
$la_object[$li_i][1]="<input type=checkbox name=chkb".$li_i." value=1 class=sin-borde>";
$la_object[$li_i][2]="<input name=txtcodcon".$li_i." type=text id=txtcodcon".$li_i." class=sin-borde style= text-align:center value='".$ls_codcon."' size=5 readonly>";
$la_object[$li_i][3]="<textarea name=txtdesobr".$li_i."id=txtdesobr".$li_i." class=sin-borde cols=50 rows=2 text-align:center>".$ls_desobr."</textarea>";
$la_object[$li_i][4]="<input name=txtfeccon".$li_i." type=text id=txtfeccon".$li_i." class=sin-borde style= text-align:center value='".$ls_feccon."' size=8 readonly>";
$la_object[$li_i][5]="<input name=txtmonto".$li_i." type=text id=txtmonto".$li_i." class=sin-borde style= text-align:center value='".$ls_monto."' size=15 readonly>";
$la_object[$li_i][6]="<input name=txtestcon".$li_i." type=text id=txtestcon".$li_i." class=sin-borde style= text-align:center value='".$ls_estcon."' size=13 readonly>";
}
}
elseif(($ls_documento=="AUMENTO" || $ls_documento=="DISMINUCION") && $ls_operacion=="")
{
if($ls_campo=="") $ls_campo="v.numvar";
if($ls_documento=="AUMENTO")
$lb_valido=$io_contabilizacion->uf_select_variacion($ls_campo,$ls_orden,1,$la_variacion,$li_filas);
else
$lb_valido=$io_contabilizacion->uf_select_variacion($ls_campo,$ls_orden,2,$la_variacion,$li_filas);
print "</tr>";
print "<br>";
for($li_z=1;$li_z<=$li_totrow;$li_z++)
{
print "<tr class=celdas-blancas align=center>";
$ls_codasi=$data["codasi"][$li_z];
$ls_codobr=$data["codobr"][$li_z];
$ls_codpro=$data["cod_pro"][$li_z];
$ls_codproins=$data["cod_pro_ins"][$li_z];
$ld_puncue=$data["puncueasi"][$li_z];
$ls_obsasi=$data["obsasi"][$li_z];
$ls_monparasi=$data["monparasi"][$li_z];
$ls_basimpasi=$data["basimpasi"][$li_z];
$ls_montotasi=$data["montotasi"][$li_z];
$ls_estasi=$data["estasi"][$li_z];
$ls_nomestasi=$io_funobr->uf_convertir_numeroestado($ls_estasi);
$ls_desobr=$data["desobr"][$li_z];
$ls_nompro=$data["nompro"][$li_z];
$ls_fecasi=$io_funcion->uf_convertirfecmostrar($data["fecasi"][$li_z]);
switch($ls_origen)
{
case"DC":
print "<td><a href=\"javascript: aceptar_dc('$ls_codasi','$ls_codobr','$ls_codpro','$ls_codproins','$ld_puncue','$ls_obsasi',
'$ls_monparasi','$ls_basimpasi','$ls_montotasi','$ls_estasi','$ls_desobr','$ls_nompro','$ls_fecasi');\">".$ls_codasi."</a></td>";
print "<td>".$ls_codobr."</td>";
print "<td align=left>".$ls_desobr."</td>";
print "<td>".$ls_fecasi."</td>";
print "<td>".$ls_codpro."</td>";
print "<td align=left>".$ls_nompro."</td>";
if (($ls_nomestasi=="EMITIDO")||($ls_nomestasi=="MODIFICADO"))
{
print "<table width=650 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>";
print "<tr class=titulo-celda>";
print "<td><a href=javascript:ue_ordenar('a.tipact','BUSCAR');><font color=#FFFFFF>Tipo Acta</font></a></td>";
print "<td><a href=javascript:ue_ordenar('a.codcon','BUSCAR');><font color=#FFFFFF>Cód. Contrato</font></a></td>";
print "<td><a href=javascript:ue_ordenar('o.desobr','BUSCAR');><font color=#FFFFFF>Descripción de la Obra</font></a></td>";
print "<td><a href=javascript:ue_ordenar('ag.cod_pro_ins','BUSCAR');><font color=#FFFFFF>Inspector</font></a></td>";
print "<td><a href=javascript:ue_ordenar('a.cedresact','BUSCAR');><font color=#FFFFFF>Residente</font></a></td>";
print "<td><a href=javascript:ue_ordenar('a.estact','BUSCAR');><font color=#FFFFFF>Est. del Acta</font></a></td>";
print "</tr>";
for($li_z=1;$li_z<=$li_totrow;$li_z++)
{//11
print "<tr class=celdas-blancas align=center>";
$ls_codact=$data["codact"][$li_z];
$ls_codcon=$data["codcon"][$li_z];
$ls_desobr=$data["desobr"][$li_z];
$ls_estact=$io_funsob->uf_convertir_numeroestado($data["estact"][$li_z]);
$ls_fecact=$io_funcion->uf_convertirfecmostrar($data["fecact"][$li_z]);
if($data["feciniact"][$li_z]!="")
$ls_feciniact=$io_funcion->uf_convertirfecmostrar($data["feciniact"][$li_z]);
else
$ls_feciniact="";
if($data["fecfinact"][$li_z]!="")
$ls_fecfinact=$io_funcion->uf_convertirfecmostrar($data["fecfinact"][$li_z]);
else
$ls_fecfinact="";
if($data["fecrecact"][$li_z]!="")
$ls_fecrecact=$io_funcion->uf_convertirfecmostrar($data["fecrecact"][$li_z]);
else
$ls_fecrecact="";
$ls_cedinsact=$data["cedinsact"][$li_z];
$ls_cedresact=$data["cedresact"][$li_z];
else{$ls_hidprefijo="";}
if (array_key_exists("hidfecasi",$_POST)){$ls_fecasiaux=$_POST["hidfecasi"]; }
else{$ls_fecasiaux="";}
if (array_key_exists("hidstatus",$_POST)){$ls_hidstatus=$_POST["hidstatus"]; }
else{$ls_hidstatus="";}
////////////////////////////////Operaciones de Actualizacion//////////////////////////////////////
if($ls_operacion=="ue_nuevo")//Abre una ficha de obra nueva
{
$io_asignacion->uf_select_estado($ls_codasi,$ls_estasi);
if($ls_estasi!=1 && $ls_estasi!=5 && $ls_estasi!=6)
{
$ls_estado=$io_funnum->uf_convertir_numeroestado($ls_estasi);
$io_msg->message("Debe seleccionar una nueva Asignación, ya que su estado es $ls_estado");
$ls_codasi="";
$ls_codcon="";
$ls_estado="";
$ls_feccon ="";
$ls_monto="";
$ls_monmaxcon="";
}
else
{
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_data["cod_pro"][$li_j]=$la_dataproveedor["nompro"][1];
}
}
if($lb_codproins)
{
$ls_codinsp=$la_data["cod_pro_ins"][$li_j];
$lb_valido=$io_proveedores->uf_select_proveedor ($ls_codinsp,$la_dataproveedor);
if($lb_valido)
{
$la_data["cod_pro_ins"][$li_j]=$la_dataproveedor["nompro"][1];
}
}
if($lb_estcon)
{
$la_data["estcon"][$li_j]=$io_funsob->uf_convertir_numeroestado($la_data["estcon"][$li_j]);
}
$la_data["codcon"][$li_j]=$la_data["precon"][$li_j].$la_data["codcon"][$li_j];
if($lb_feccreobr)
{
$la_data["feccreobr"][$li_j]=$io_funcion->uf_convertirfecmostrar($la_data["feccreobr"][$li_j]);
}
if($lb_feciniobr)
{
$la_data["feciniobr"][$li_j]=$io_funcion->uf_convertirfecmostrar($la_data["feciniobr"][$li_j]);
}
if($lb_fecfinobr)
{
$la_data["fecfinobr"][$li_j]=$io_funcion->uf_convertirfecmostrar($la_data["fecfinobr"][$li_j]);
print "<td><a href=javascript:ue_ordenar('a.fecant','BUSCAR');><font color=#FFFFFF>Fecha Ant.</font></a></td>";
print "<td><a href=javascript:ue_ordenar('a.estant','BUSCAR');><font color=#FFFFFF>Estado</font></a></td>";
print "<td><font color=#FFFFFF>Contabilización</font></td>";
print "</tr>";
print "<br>";
while($row=$io_sql->fetch_row($rs_data))
{
//$data=$io_sql->obtener_datos($rs_data);
//$io_datastore->data=$data;
//$li_totrow=$io_datastore->getRowCount("codcon");
//for($li_z=1;$li_z<=$li_totrow;$li_z++)
//{
print "<tr class=celdas-blancas align=center>";
$ls_codcon=$row["codcon"];
$ls_desobr=$row["desobr"];
$ls_estado=$io_funobr->uf_convertir_numeroestado($row["estant"]);
$ls_codest=$row["estant"];
$ls_codobr=$row["codobr"];
$ld_monto=$row["monto"];
$ls_codant=$row["codant"];
$ls_fecintant=$io_funcion->uf_convertirfecmostrar($row["fecintant"]);
$ld_porant=$row["porant"];
$ls_conant=$row["conant"];
$ld_montotant=$row["montotant"];
$ls_cuenta=$row["cuenta"];
$ls_estspgscg=$row["estspgscg"];
$ld_montocontrato=$row["montocontrato"];
$ls_fecant=$io_funcion->uf_convertirfecmostrar($row["fecant"]);
$ls_estgenrd=$row["estgenrd"];
print "<td><a href=\"javascript: aceptar('$ls_codcon','$ls_desobr','$ls_estado','$ls_codest','$ls_codobr','$ld_monto',
'$ls_codant','$ls_fecintant','$ld_porant','$ls_conant','$ld_montotant','$ls_cuenta','$ls_fecant','$ld_montocontrato','$ls_estgenrd');\">".$ls_codant."</a></td>";
$ls_orden=$_POST["orden"];
$ls_campo=$_POST["campo"];
if($ls_documento=="VALUACION" && $ls_operacion=="")
{
if($ls_campo=="") $ls_campobusqueda="v.codval";
else $ls_campobusqueda=$ls_campo;
$lb_valido=$io_recepcion->uf_select_valuacion($ls_campobusqueda,$ls_orden,$la_valuaciones,$li_filas);
for($li_i=1;$li_i<=$li_filas;$li_i++)
{
$ls_codcon=$la_valuaciones["codcon"][$li_i];
$ls_codval=$la_valuaciones["codval"][$li_i];
$ls_desobr=$la_valuaciones["desobr"][$li_i];
$ls_fecval=$io_fun->uf_convertirfecmostrar($la_valuaciones["fecha"][$li_i]);
$ls_monto=$io_funsob->uf_convertir_numerocadena($la_valuaciones["montotval"][$li_i]);
$ls_estval=$io_funsob->uf_convertir_numeroestado ($la_valuaciones["estval"][$li_i]);
$la_object[$li_i][1]="<input type=checkbox name=chkb".$li_i." value=1 class=sin-borde>";
$la_object[$li_i][2]="<input name=txtcodval".$li_i." type=text id=txtcodval".$li_i." class=sin-borde style= text-align:center value='".$ls_codval."' size=5 readonly>";
$la_object[$li_i][3]="<input name=txtcodcon".$li_i." type=text id=txtcodcon".$li_i." class=sin-borde style= text-align:center value='".$ls_codcon."' size=5 readonly>";
$la_object[$li_i][4]="<textarea name=txtdesobr".$li_i."id=txtdesobr".$li_i." class=sin-borde cols=50 rows=2 text-align:center>".$ls_desobr."</textarea>";
$la_object[$li_i][5]="<input name=txtfecval".$li_i." type=text id=txtfecval".$li_i." class=sin-borde style= text-align:center value='".$ls_fecval."' size=8 readonly>";
$la_object[$li_i][6]="<input name=txtmonto".$li_i." type=text id=txtmonto".$li_i." class=sin-borde style= text-align:center value='".$ls_monto."' size=15 readonly>";
$la_object[$li_i][7]="<input name=txtestval".$li_i." type=text id=txtestval".$li_i." class=sin-borde style= text-align:center value='".$ls_estval."' size=13 readonly>";
}
}
elseif($ls_documento=="ANTICIPO" && $ls_operacion=="")
{
if($ls_campo=="") $ls_campobusqueda="an.codant";
else $ls_campobusqueda=$ls_campo;
$lb_valido=$io_recepcion->uf_select_anticipo($ls_campobusqueda,$ls_orden,$la_anticipo,$li_filas);
