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);