";
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";
}
}
}
?>