";
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("SCV","sigesp_scv_p_revcalcularviaticos.php",$ls_permisos,$la_seguridad,$la_permisos);
////////////////////////////////////////////// SEGURIDAD /////////////////////////////////////////////
function uf_obtenervalor($as_valor, $as_valordefecto)
{
//////////////////////////////////////////////////////////////////////////////
// Function: uf_obtenervalor
// Access: public
// Arguments:
// as_valor // nombre de la variable que desamos obtener
// as_valordefecto // contenido de la variable
// Description: Función que obtiene el valor de una variable si viene de un submit
//////////////////////////////////////////////////////////////////////////////
if(array_key_exists($as_valor,$_POST))
{
$valor=$_POST[$as_valor];
}
else
{
$valor=$as_valordefecto;
}
return $valor;
}
//--------------------------------------------------------------
function uf_agregarlineablanca(&$aa_object,&$aa_title,&$as_titletable,$ai_totrows)
{
//////////////////////////////////////////////////////////////////////////////
// Function: uf_agregarlineablanca
// Access: public
// Arguments:
// aa_object // arreglo de objetos
// aa_title // arreglo de titulos
// ai_totrows // ultima fila pintada en el grid
// Description: Funcion que agrega una linea en blanco al final del grid
//
//////////////////////////////////////////////////////////////////////////////
$aa_title[1]="--";
$aa_title[2]="--";
$aa_title[3]="--";
$aa_title[4]="";
$aa_object[$ai_totrows][1]="";
$aa_object[$ai_totrows][2]="";
$aa_object[$ai_totrows][3]="";
$aa_object[$ai_totrows][4]="";
$as_titletable="Recepciones de Documentos";
}
function uf_limpiarvariables()
{
//////////////////////////////////////////////////////////////////////////////
// Function: uf_limpiarvariables
// Description: Función que limpia todas las variables necesarias en la página
//////////////////////////////////////////////////////////////////////////////
global $ld_fecregdes,$ld_fecreghas,$ls_chkant,$ls_chkval;
$ld_fecregdes="01/".date("m/Y");
$ld_fecreghas=date("d/m/Y");
$ls_chkant="checked";
$ls_chkval="";
}
?>
Reverso de Recepciones de Documentos
Obras
uf_conectar();
require_once("../shared/class_folder/class_sql.php");
$io_sql= new class_sql($con);
require_once("../shared/class_folder/class_mensajes.php");
$io_msg= new class_mensajes();
require_once("../shared/class_folder/class_funciones_db.php");
$io_fun= new class_funciones_db($con);
require_once("../shared/class_folder/class_funciones.php");
$io_func= new class_funciones();
require_once("../shared/class_folder/grid_param.php");
$in_grid= new grid_param();
require_once("../shared/class_folder/class_fecha.php");
$io_fec= new class_fecha();
require_once("class_folder/sigesp_sob_c_revanticipo_rd.php");
$io_sob= new sigesp_sob_c_revanticipo_rd();
$ls_codemp=$_SESSION["la_empresa"]["codemp"];
$ls_codusu=$_SESSION["la_logusr"];
$li_totrows = uf_obtenervalor("totalfilas",1);
$li_widthtable=780;
$ls_nametable="grid";
if (array_key_exists("operacion",$_POST))
{
$ls_operacion=$_POST["operacion"];
}
else
{
$ls_operacion="NUEVO";
$ls_status="";
uf_limpiarvariables();
//uf_agregarlineablanca($lo_object,1);
}
switch ($ls_operacion)
{
case "REVERSAR":
$li_totrows= $_POST["totalfilas"];
$li_temp=0;
$li_s=0;
$ld_fecrev= date("Y-m-d");
$lb_valido=$io_fec->uf_valida_fecha_mes($ls_codemp,$ld_fecrev);
$ls_tiprecdoc=$io_fun_sob->uf_obtenervalor("rdtipord", 0);
$io_sql->begin_transaction();
if($lb_valido)
{
for($li_i=1;$li_i<=$li_totrows;$li_i++)
{
if (array_key_exists("chkreversar".$li_i,$_POST))
{
$li_s= $li_s + 1;
$li_check= $_POST["chkreversar".$li_i];
if ($li_check==1)
{
if($ls_tiprecdoc==0)
{
$ls_codcon=$io_fun_sob->uf_obtenervalor("txtcodcon".$li_i, 0);
$ls_codant=$io_fun_sob->uf_obtenervalor("txtcodant".$li_i, 0);
$ls_numrecdoc=$ls_codcon.$ls_codant;
$ls_codpro=$io_sob->uf_select_contratista($ls_codcon);
$lb_valido=$io_sob->uf_select_estatus_recepcion($ls_numrecdoc,$ls_codpro,$lb_registro);
if ($lb_valido)
{
if($lb_registro)
{
$lb_valido=$io_sob->uf_delete_dt_rd($ls_numrecdoc,$ls_codpro,$la_seguridad);
if($lb_valido)
{
$lb_valido=$io_sob->uf_delete_rd($ls_numrecdoc,$ls_codpro,$la_seguridad);
if($lb_valido)
{
$lb_valido=$io_sob->uf_update_estatus_anticipo($ls_codcon,$ls_codant,$la_seguridad);
}
}
}
else
{
$io_msg->message("Las Recepciones de Documentos asociadas deben estar en estatus de Registro - No Aprobada");
}
}
else
{
$io_msg->message("No existe Recepcion de Documentos asociada");
}
}
else
{
$ls_codcon=$io_fun_sob->uf_obtenervalor("txtcodcon".$li_i, 0);
$ls_codval=$io_fun_sob->uf_obtenervalor("txtcodval".$li_i, 0);
$ls_numrecdoc=$ls_codcon;
$ls_codpro=$io_sob->uf_select_contratista($ls_codcon);
$lb_valido=$io_sob->uf_select_estatus_recepcion($ls_numrecdoc,$ls_codpro,$lb_registro);
if ($lb_valido)
{
if($lb_registro)
{
$lb_valido=$io_sob->uf_delete_dt_rd($ls_numrecdoc,$ls_codpro,$la_seguridad);
if($lb_valido)
{
$lb_valido=$io_sob->uf_delete_rd($ls_numrecdoc,$ls_codpro,$la_seguridad);
if($lb_valido)
{
$lb_valido=$io_sob->uf_update_estatus_anticipo($ls_codcon,$ls_codval,$la_seguridad);
}
}
}
else
{
$io_msg->message("Las Recepciones de Documentos asociadas deben estar en estatus de Registro - No Aprobada");
}
}
else
{
$io_msg->message("No existe Recepcion de Documentos asociada");
}
}
}
}
else
{
$li_totrows=1;
uf_agregarlineablanca($lo_object,$lo_title,$ls_titletable,1);
}
}
if(($li_i<=1)||($li_s==0))
{
$io_msg->message("No se pudo realizar el reverso");
$li_totrows=1;
uf_agregarlineablanca($lo_object,$lo_title,$ls_titletable,1);
}
if($lb_valido)
{
$io_sql->commit();
$io_msg->message("El reverso se realizo con exito");
uf_limpiarvariables();
}
else
{
$io_sql->rollback();
$io_msg->message("No se pudo realizar el reverso");
uf_limpiarvariables();
}
if ($li_temp)
{
$li_totrows=$li_temp;
}
else
{
$li_totrows=1;
uf_agregarlineablanca($lo_object,$lo_title,$ls_titletable,1);
}
}
else
{
$io_msg->message("El mes no esta abierto");
$li_totrows=1;
uf_agregarlineablanca($lo_object,$lo_title,$ls_titletable,1);
}
break;
case "BUSCARSOLICITUD":
$li_totrows=0;
$ld_fecregdes=$io_fun_sob->uf_obtenervalor("txtfecregdes", "");
$ld_fecreghas=$io_fun_sob->uf_obtenervalor("txtfecreghas", "");
$ls_codcon=$io_fun_sob->uf_obtenervalor("txtcodcon", "");
$ls_tiprecdoc=$io_fun_sob->uf_obtenervalor("rdtipord", 0);
$ls_status=$ls_tiprecdoc;
if($ls_tiprecdoc==0)
{
$lb_valido=$io_sob->uf_scv_obtener_anticipos($ls_codcon,$ld_fecregdes,$ld_fecreghas,$li_totrows,$lo_object,$lo_title,$ls_titletable);
$ls_chkant="checked";
$ls_chkval="";
}
else
{
$lb_valido=$io_sob->uf_scv_obtener_valuaciones($ls_codcon,$ld_fecregdes,$ld_fecreghas,$li_totrows,$lo_object,$lo_title,$ls_titletable);
$ls_chkant="";
$ls_chkval="checked";
}
// $lb_valido=$io_sob->uf_scv_obtener_solicitud($ls_numsol,$ld_fecregdes,$ld_fecreghas,$li_totrows,$lo_object);
if (!$lb_valido)
{
$lo_object="";
uf_agregarlineablanca($lo_object,$lo_title,$ls_titletable,1);
}
break;
case "NUEVO":
uf_agregarlineablanca($lo_object,$lo_title,$ls_titletable,$li_totrows);
break;
}
?>
