"; print "location.href='../sigesp_inicio_sesion.php'"; print ""; } $ls_logusr=$_SESSION["la_logusr"]; require_once("class_folder/class_funciones_sob.php"); $io_fun_sob=new class_funciones_sob(); $io_fun_sob->uf_load_seguridad("SOB","sigesp_sob_d_acta.php",$ls_permisos,$la_seguridad,$la_permisos); ////////////////////////////////////////////// SEGURIDAD ///////////////////////////////////////////// ?> Elaboración de Actas uf_conectar(); require_once("../shared/class_folder/class_sql.php"); $io_sql=new class_sql($io_connect); $la_empresa=$_SESSION["la_empresa"]; require_once ("class_folder/sigesp_c_generar_consecutivo_acta.php"); $io_keygen= new sigesp_c_generar_consecutivo_acta(); function uf_generar_codigoacta($as_tipoacta,$as_codcon,$io_sql,$la_empresa,$io_function) { ////////////////////////////////////////////////////////////////////////////// // Metodo: uf_generarcodigoacta // Access: public // Returns: proximo codigo del acta buscada // Description: Funcion que permite generar el proximo codigo de un acta, dependiendo de su tipo // Fecha: 06/04/2006 // Autor: Ing. Laura Cabré ////////////////////////////////////////////////////////////////////////////// $ls_codemp=$la_empresa["codemp"]; $ls_sql="SELECT codact FROM sob_acta WHERE codemp='".$ls_codemp."' AND codcon='".$as_codcon."' AND tipact='".$as_tipoacta."' ORDER BY codact DESC"; $rs_data=$io_sql->select($ls_sql); if ($row=$io_sql->fetch_row($rs_data)) { $codigo=$row["codact"]; settype($codigo,'int'); // Asigna el tipo a la variable. $codigo = $codigo + 1; // Le sumo uno al entero. settype($codigo,'string'); // Lo convierto a varchar nuevamente. $ls_codigo=$io_function->uf_cerosizquierda($codigo,6); } else { $codigo="1"; $ls_codigo=$io_function->uf_cerosizquierda($codigo,6); } return $ls_codigo; } $ls_tituloretenciones="Retenciones Asignadas"; $li_anchoretenciones=600; $ls_nametable="grid"; $la_columretenciones[1]="Código"; $la_columretenciones[2]="Descripción"; $la_columretenciones[3]="Cuenta"; $la_columretenciones[4]="Deducible"; $la_columretenciones[5]="Edición"; if(array_key_exists("operacion",$_POST)) { $ls_operacion=$_POST["operacion"]; $ls_tipoacta=$_POST["cmbtipoacta"]; //$ls_tipoacta=$_POST["hidtipoacta"]; } else { $ls_datoscontrato="OCULTAR"; $ls_datosobra="OCULTAR"; $ls_fecinicon=""; $ls_placon=""; $ls_placonuni=""; $ls_contasi=""; $ls_contasi=""; $ls_moncon=""; $ls_estcon=""; $ls_codobr=""; $ls_desobr=""; $ls_estobr=""; $ls_control=""; $ls_estobr=""; $ls_munobr=""; $ls_comobr=""; $ls_codigo=""; $ls_parobr=""; $ls_dirobr=""; $ls_codcon=""; $ls_codact=""; $ls_fecact=""; $ls_obsact=""; $ls_feciniact=""; $ls_fecfinact=""; $ls_nominsact=""; $ls_cedinsact=""; $ls_nomsupact=""; $ls_estact=""; $ls_cedsupact=""; $ls_nomresact=""; $ls_fecrecact=""; $ls_motact=""; $ls_codproins=""; $ls_codpro=""; $ls_cedresact=""; $ls_civresact=""; $ls_civsup=""; $ls_civinsact=""; $ls_tipoacta="s1"; } /////////Instrucciones para evitar que las cajitas pierdan la informacion cada vez que se realiza un submit///////////// if (array_key_exists("hiddatoscontrato",$_POST)){$ls_datoscontrato=$_POST["hiddatoscontrato"]; } else{$ls_datoscontrato="OCULTAR";} if (array_key_exists("hiddatosobra",$_POST)){ $ls_datosobra=$_POST["hiddatosobra"]; } else{$ls_datosobra="OCULTAR";} if (array_key_exists("operacion",$_POST)){ $ls_operacion=$_POST["operacion"]; } else{$ls_operacion="";} if (array_key_exists("txtcodcon",$_POST)){ $ls_codigo=$_POST["txtcodcon"]; } else{$ls_codigo="";} if (array_key_exists("txtobsact",$_POST)){ $ls_obsact=$_POST["txtobsact"]; } else{$ls_obsact="";} if (array_key_exists("txtfecinicon",$_POST)){$ls_fecinicon=$_POST["txtfecinicon"]; } else{$ls_fecinicon="";} if (array_key_exists("hidplacon",$_POST)){$ls_placon=$_POST["hidplacon"]; } else{$ls_placon="0";} if (array_key_exists("hidplaconuni",$_POST)){$ls_placonuni=$_POST["hidplaconuni"]; } else{$ls_placonuni="";} if (array_key_exists("txtcontasi",$_POST)){$ls_contasi=$_POST["txtcontasi"]; } else{$ls_contasi="";} if (array_key_exists("txtmoncon",$_POST)){$ls_moncon=$_POST["txtmoncon"]; } else{$ls_moncon="";} if (array_key_exists("txtestcon",$_POST)){$ls_estcon=$_POST["txtestcon"]; } else{$ls_estcon="";} if (array_key_exists("txtcodobr",$_POST)){$ls_codobr=$_POST["txtcodobr"]; } else{$ls_codobr="";} if (array_key_exists("txtdesobr",$_POST)){$ls_desobr=$_POST["txtdesobr"]; } else{$ls_desobr="";} if (array_key_exists("txtestobr",$_POST)){$ls_estobr=$_POST["txtestobr"]; } else{$ls_estobr="";} if (array_key_exists("txtmunobr",$_POST)){$ls_munobr=$_POST["txtmunobr"]; } else{$ls_munobr="";} if (array_key_exists("txtcomobr",$_POST)){$ls_comobr=$_POST["txtcomobr"]; } else{$ls_comobr="";} if (array_key_exists("txtparobr",$_POST)){$ls_parobr=$_POST["txtparobr"]; } else{$ls_parobr="";} if (array_key_exists("txtdirobr",$_POST)){$ls_dirobr=$_POST["txtdirobr"]; } else{$ls_dirobr="";} if (array_key_exists("txtcodact",$_POST)){$ls_codact=$_POST["txtcodact"]; } else{$ls_codact="";} if (array_key_exists("txtfecact",$_POST)){$ls_fecact=$_POST["txtfecact"]; } else{$ls_fecact="";} if (array_key_exists("txtfeciniact",$_POST)){$ls_feciniact=$_POST["txtfeciniact"]; } else{$ls_feciniact="";} if (array_key_exists("txtfecfinact",$_POST)){$ls_fecfinact=$_POST["txtfecfinact"]; } else{$ls_fecfinact="";} if (array_key_exists("txtnominsact",$_POST)){$ls_nominsact=$_POST["txtnominsact"]; } else{$ls_nominsact="";} if (array_key_exists("txtcedinsact",$_POST)){$ls_cedinsact=$_POST["txtcedinsact"]; } else{$ls_cedinsact="";} if (array_key_exists("txtnomsupact",$_POST)){$ls_nomsupact=$_POST["txtnomsupact"]; } else{$ls_nomsupact="";} if (array_key_exists("txtcedsupact",$_POST)){$ls_cedsupact=$_POST["txtcedsupact"]; } else{$ls_cedsupact="";} if (array_key_exists("txtnomresact",$_POST)){$ls_nomresact=$_POST["txtnomresact"]; } else{$ls_nomresact="";} if (array_key_exists("txtcedresact",$_POST)){$ls_cedresact=$_POST["txtcedresact"]; } else{$ls_cedresact="";} if (array_key_exists("txtcivresact",$_POST)){$ls_civresact=$_POST["txtcivresact"]; } else{$ls_civresact="";} if (array_key_exists("txtcivinsact",$_POST)){$ls_civinsact=$_POST["txtcivinsact"]; } else{$ls_civinsact="";} if (array_key_exists("hidcodproins",$_POST)){$ls_codproins=$_POST["hidcodproins"]; } else{$ls_codproins="";} if (array_key_exists("hidcodpro",$_POST)){$ls_codpro=$_POST["hidcodpro"]; } else{$ls_codpro="";} if (array_key_exists("txtestact",$_POST)){$ls_estact=$_POST["txtestact"]; } else{$ls_estact="";} if (array_key_exists("hidcontrol",$_POST)){$ls_control=$_POST["hidcontrol"]; } else{$ls_control="";} if (array_key_exists("txtfecrecact",$_POST)){$ls_fecrecact=$_POST["txtfecrecact"]; } else{$ls_fecrecact="";} if (array_key_exists("txtmotact",$_POST)){$ls_motact=$_POST["txtmotact"]; } else{$ls_motact="";} if (array_key_exists("hidcodigo",$_POST)){$ls_codcon=$_POST["hidcodigo"]; } else{$ls_codcon="";} if (array_key_exists("hidstatus",$_POST)){$ls_status=$_POST["hidstatus"]; } else{$ls_status="";} ////////////////////////////////Operaciones de Actualizacion////////////////////////////////////// if($ls_operacion=="ue_nuevo")//Abre una ficha de obra nueva { 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"]; $lb_tieneacta=$io_acta->uf_revisar_contrato_acta($ls_codcon,$ls_tipoacta,$la_seguridad); if(!$lb_tieneacta) { // $ls_codact=uf_generar_codigoacta($ls_tipoacta,$ls_codcon,$io_sql,$la_empresa,$io_function); $ls_codact= $io_keygen->uf_generar_numero_nuevo("SOB","sob_acta","codact","SOBACT",6,"","codcon",$ls_codcon,"tipact",$ls_tipoacta); $ls_feciniact=""; $ls_fecfinact=""; $ls_nominsact=""; $ls_cedinsact=""; $ls_nomsupact=""; $ls_cedsupact=""; $ls_nomresact=""; $ls_cedresact=""; $ls_civinsact=""; $ls_obsact=""; $ls_civsup=""; $ls_fecrecact=""; $ls_motact=""; $ls_control=""; $ls_civresact=""; $ls_estact="EMITIDO"; $fecha=date("d/m/Y"); $ls_fecact=$fecha; } else { $io_msg->message("Este Contrato ya tiene un Acta de Inicio!!!"); $ls_datoscontrato="OCULTAR"; $ls_datosobra="OCULTAR"; $ls_placon=""; $ls_placonuni=""; $ls_contasi=""; $ls_contasi=""; $ls_moncon=""; $ls_estcon=""; $ls_codobr=""; $ls_desobr=""; $ls_estobr=""; $ls_estobr=""; $ls_munobr=""; $ls_comobr=""; $ls_obsact=""; $ls_estact=""; $ls_parobr=""; $ls_dirobr=""; $ls_codcon=""; $ls_codact=""; $ls_fecact=""; $ls_feciniact=""; $ls_fecfinact=""; $ls_motact=""; $ls_fecrecact=""; $ls_nominsact=""; $ls_cedinsact=""; $ls_control=""; $ls_nomsupact=""; $ls_cedsupact=""; $ls_nomresact=""; $ls_codproins=""; $ls_codpro=""; $ls_cedresact=""; $ls_civresact=""; $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=$io_funsob->uf_convertir_letraunidad($la_data["placonuni"][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") { if($ls_fecact!="") $ls_fecact=$io_function->uf_convertirdatetobd($ls_fecact); if($ls_feciniact!="") $ls_feciniact=$io_function->uf_convertirdatetobd($ls_feciniact); if($ls_fecfinact!="") $ls_fecfinact=$io_function->uf_convertirdatetobd($ls_fecfinact); if($ls_fecrecact!="") $ls_fecrecact=$io_function->uf_convertirdatetobd($ls_fecrecact); $li_numero=0; $io_acta->io_sql->begin_transaction(); $lb_existe=$io_acta->uf_select_acta($ls_codcon,$ls_codact,$ls_tipoacta,$aa_data); if($ls_status!="C") { $ls_codactaux=$ls_codact; $lb_valido=$io_acta->uf_guardar_acta($ls_codcon,$ls_codact,$ls_tipoacta,$ls_fecact,$ls_feciniact,$ls_fecfinact, $ls_fecrecact,$li_numero,"001",$ls_motact,"",$ls_cedinsact,$ls_cedresact, $ls_cedsupact,"",$ls_obsact,$ls_civinsact,$ls_nomresact,$ls_civresact, $la_seguridad); if ($lb_valido) { $lb_valido=$io_contrato->uf_update_ultimoacta($ls_codcon,$ls_tipoacta,$la_seguridad); $ls_tipofecha=""; if($lb_valido) { switch($ls_tipoacta) { case 1: $li_estado=10; $ls_tipofecha="inicio"; $ls_fecha=$ls_feciniact; break; case 2: $li_estado=8; $ls_tipofecha="finalizacion"; $ls_fecha=$ls_fecfinact; break; case 5: $lb_valido=$io_contrato->uf_select_estado($ls_codcon,$li_estadoanterior); if($lb_valido) { if($li_estadoanterior==9) $li_estado=11; else $li_estado=7; } break; case 6: $lb_valido=$io_contrato->uf_select_estado($ls_codcon,$li_estadoanterior); if($lb_valido) { if($li_estadoanterior==11) $li_estado=9; else $li_estado=10; } break; case 7: $li_estado=9; break; default: $li_estado=""; } if($li_estado=="") { $lb_valido=true; } else { $lb_valido=$io_contrato->uf_update_estado($ls_codcon,$li_estado,$la_seguridad); } if($lb_valido) { if($ls_tipofecha=="") { $lb_valido=true; } else { $lb_valido=$io_contrato->uf_update_fechasreales($ls_codcon,$ls_fecha,$ls_tipofecha,$la_seguridad); } if($lb_valido) { if($ls_codactaux!=$ls_codact) { $io_msg->message("Se le asigno el nuevo numero ".$ls_codact." "); } $io_mensaje->incluir(); $io_acta->io_sql->commit(); $ls_feciniact=$io_function->uf_convertirfecmostrar($ls_feciniact); $ls_fecrecact=$io_function->uf_convertirfecmostrar($ls_fecrecact); $ls_fecfinact=$io_function->uf_convertirfecmostrar($ls_fecfinact); $ls_fecact=$io_function->uf_convertirfecmostrar($ls_fecact); $ls_imprimir=$_POST["hidimprimir"]; $ls_status="C"; if($ls_imprimir=="IMPRIMIR") { $ls_documento="CONTRATO"; $ls_pagina="sigesp_sob_d_filechooser.php?codcon=".$ls_codcon."&documento=".$ls_documento; print ""; } } else { $io_msg->message("Se produjo un error al procesar la operacion"); $io_acta->io_sql->rollback(); } } } else { $io_msg->message("Error actualizando ultimo acta del contrato"); } } else { $io_mensaje->error_incluir(); } }/*************************************End del if si no existe (Guardar)*************************/ else { if($lb_existe) { $lb_valido=$io_acta->uf_select_estado($ls_codcon,$ls_codact,$ls_tipoacta,$li_estado); if($li_estado==1) { $lb_valido=$io_acta->uf_update_acta($ls_codcon,$ls_codact,$ls_tipoacta,$ls_fecact,$ls_feciniact,$ls_fecfinact, $ls_fecrecact,$li_numero,"001",$ls_motact,"",$ls_cedinsact,$ls_cedresact, $ls_cedsupact,"",$ls_obsact,$ls_civinsact,$ls_nomresact,$ls_civresact, $la_seguridad); if($lb_valido) { $ls_datoscontrato="OCULTAR"; $ls_datosobra="OCULTAR"; $ls_placon=""; $ls_placonuni=""; $ls_contasi=""; $ls_contasi=""; $ls_moncon=""; $ls_estcon=""; $ls_codobr=""; $ls_desobr=""; $ls_estobr=""; $ls_estobr=""; $ls_munobr=""; $ls_comobr=""; $ls_estact=""; $ls_obsact=""; $ls_parobr=""; $ls_dirobr=""; $ls_tipoacta="s1"; $ls_codcon=""; $ls_codact=""; $ls_fecact=""; $ls_feciniact=""; $ls_fecfinact=""; $ls_nominsact=""; $ls_motact=""; $ls_fecrecact=""; $ls_control=""; $ls_cedinsact=""; $ls_nomsupact=""; $ls_cedsupact=""; $ls_nomresact=""; $ls_codproins=""; $ls_codpro=""; $ls_cedresact=""; $ls_civresact=""; $ls_civsup=""; $ls_civinsact=""; if($lb_valido===true) $io_mensaje->modificar(); } else { $io_mensaje->error_modificar(); } } else { $ls_estado=$io_funsob->uf_convertir_numeroestado($li_estado); $io_msg->message("El Acta no puede ser modificada, su estado es $ls_estado"); } } else { $io_msg->message("El Acta a modificar no existe registrada"); } } } elseif($ls_operacion=="ue_eliminar") { $lb_valido=$io_acta->uf_select_estado($ls_codcon,$ls_codact,$ls_tipoacta,$li_estado); if($lb_valido) { if($li_estado==1) { $lb_valido=$io_acta->uf_delete_acta($ls_codcon,$ls_codact,$ls_tipoacta,$la_seguridad); //$lb_valido=$io_acta->uf_update_estado($ls_codcon,$ls_codact,$ls_tipoacta,3,$la_seguridad); if($lb_valido) $io_mensaje->anular(); else $io_mensaje->error_anular(); $ls_datoscontrato="OCULTAR"; $ls_datosobra="OCULTAR"; $ls_placon=""; $ls_placonuni=""; $ls_contasi=""; $ls_contasi=""; $ls_moncon=""; $ls_tipoacta="s1"; $ls_estcon=""; $ls_codobr=""; $ls_desobr=""; $ls_estobr=""; $ls_estobr=""; $ls_munobr=""; $ls_comobr=""; $ls_estact=""; $ls_parobr=""; $ls_dirobr=""; $ls_codcon=""; $ls_codact=""; $ls_fecact=""; $ls_feciniact=""; $ls_fecfinact=""; $ls_motact=""; $ls_control=""; $ls_nominsact=""; $ls_cedinsact=""; $ls_obsact=""; $ls_nomsupact=""; $ls_fecrecact=""; $ls_cedsupact=""; $ls_nomresact=""; $ls_codproins=""; $ls_codpro=""; $ls_cedresact=""; $ls_civresact=""; $ls_civsup=""; $ls_civinsact=""; } else { $ls_estado=$io_funsob->uf_convertir_numeroestado($li_estado); $io_msg->message("El Acta no puede ser eliminada, su estado es $ls_estado"); } } } elseif($ls_operacion=="ue_cargaracta") { $ls_codact=$_POST["codact"]; $ls_codcon=$_POST["hidcodigo"]; $ls_codigo=$_POST["codcon"]; $ls_fecact=$_POST["fecact"]; $ls_cedinsact=$_POST["cedinsact"]; $ls_cedresact=$_POST["cedresact"]; $ls_nominsact=$_POST["nominsact"]; $ls_civinsact=$_POST["civinsact"]; $ls_nomresact=$_POST["nomresact"]; $ls_civresact=$_POST["civresact"]; $ls_estact=$_POST["estact"]; $ls_obsact=$_POST["obsact"]; $ls_feciniact=$_POST["feciniact"]; $ls_fecfinact=$_POST["fecfinact"]; $ls_fecrecact=$_POST["fecrecact"]; $ls_motact=$_POST["hidmotivo"]; } elseif($ls_operacion=="ue_cambiaracta") { $ls_datoscontrato="OCULTAR"; $ls_datosobra="OCULTAR"; $ls_fecinicon=""; $ls_placon=""; $ls_placonuni=""; $ls_codigo=""; $ls_contasi=""; $ls_contasi=""; $ls_moncon=""; $ls_estcon=""; $ls_codobr=""; $ls_desobr=""; $ls_estobr=""; $ls_control=""; $ls_estobr=""; $ls_munobr=""; $ls_comobr=""; $ls_parobr=""; $ls_dirobr=""; $ls_codcon=""; $ls_codact=""; $ls_fecact=""; $ls_obsact=""; $ls_feciniact=""; $ls_fecfinact=""; $ls_nominsact=""; $ls_cedinsact=""; $ls_nomsupact=""; $ls_estact=""; $ls_cedsupact=""; $ls_nomresact=""; $ls_fecrecact=""; $ls_motact=""; $ls_codproins=""; $ls_codpro=""; $ls_cedresact=""; $ls_civresact=""; $ls_civsup=""; $ls_civinsact=""; } elseif($ls_operacion=="ue_imprimir") { $lb_existe=$io_acta->uf_select_acta($ls_codcon,$ls_codact,$ls_tipoacta,$aa_data); if($lb_existe===true) { $ls_operacion="imprimir_acta"; } else { if($lb_existe===0) { $ls_operacion="confirmar_guardar"; } } } ?>
Obras
 
 
NuevoGrabarBuscarImprimirEliminarSalir

 

uf_print_permisos($ls_permisos,$la_permisos,$ls_logusr,"location.href='sigespwindow_blank.php'"); unset($io_fun_sob); ////////////////////////////////////////////// SEGURIDAD ///////////////////////////////////////////// ?>
Tipo de Acta data=$la_data; ?>
 
 
  Datos del Contrato              
Código
 
  Datos del Contrato
 
   
Fecha de Inicio
Duración
   
Contratista
      Datos del Acta de Inicio Datos del Acta de Finalización Datos del Acta de Recepción Provisional Datos del Acta de Recepción Definitiva Datos del Acta de Paralización Datos del Acta de Reanudación Datos del Acta de Prórroga  
Código
Estado
 
Fecha:
     
Fecha de Inicio
       
Fecha de Fin
       
Fecha de Recepción
       
Fecha Paraliz.
Fecha Reinicio
       
Fecha Reinicio
Nueva Fecha Finaliz.
       
Nueva Fecha de Fin
       
Ing. Inspector
    C.I.   C.I.V.
     
Ing. Residente
    C.I.   C.I.V.      
Motivo Paraliz.
     
Motivo Prórroga
     
Observación