";
print "location.href='../sigesp_inicio_sesion.php'";
print "";
}
$ls_logusr=$_SESSION["la_logusr"];
require_once("class_funciones_activos.php");
$io_fun_activo=new class_funciones_activos("../");
$ls_reporte=$io_fun_activo->uf_select_config("SAF","REPORTE","COMPROBANTE_ENT","sigesp_saf_rpp_comentrega.php","C");
$io_fun_activo->uf_load_seguridad("SAF","sigesp_saf_p_entregas.php",$ls_permisos,$la_seguridad,$la_permisos);
require_once("sigesp_saf_c_activo.php");
$ls_codemp = $_SESSION["la_empresa"]["codemp"];
$io_saf_tipcat= new sigesp_saf_c_activo();
$ls_rbtipocat=$io_saf_tipcat->uf_select_valor_config($ls_codemp);
////////////////////////////////////////////// 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_limpiarvariables()
{
//////////////////////////////////////////////////////////////////////////////////
// Function: uf_limpiarvariables
// Description: Función que limpia todas las variables necesarias en la página
/////////////////////////////////////////////////////////////////////////////////
global $ls_cmpent,$ls_descmp,$ld_feccmp, $ld_fecent, $ls_codcau,$ls_dencau;
global $ls_estproent,$ls_status,$ls_titletable,$li_widthtable,$ls_nametable,$lo_title,$li_totrows,$ls_codrespri;
global $ls_codres, $ls_denres, $ls_codrec, $ls_denrec, $ls_coddes, $ls_dendes,$ls_tipdes,$ls_tipres,$ls_tiprec, $ls_coduniadm, $ls_denuniadm, $ls_codunisol, $ls_denunisol;
$ls_cmpent="";
$ls_descmp="";
$ls_estproent="";
$ld_feccmp= date("d/m/Y");
$ld_fecent= date("d/m/Y");
$ls_status="";
$ls_titletable="Activos";
$li_widthtable=750;
$ls_nametable="grid";
$lo_title[1] ="Codigo";
$lo_title[2] ="Serial";
$lo_title[3] ="Denominacion";
$lo_title[4] ="Monto";
$lo_title[5] ="";
$li_totrows =1;
$ls_codres ="";
$ls_denres ="";
$ls_codrec ="";
$ls_denrec ="";
$ls_coddes ="";
$ls_dendes ="";
$ls_denuniadm ="";
$ls_denunisol ="";
$ls_coduniadm =uf_obtenervalor("cmbuniadm","");
$ls_codunisol =uf_obtenervalor("cmbunisol","");
$ls_tipres =uf_obtenervalor("cmbtipres","-");
$ls_tipdes =uf_obtenervalor("cmbtipdes","-");
$ls_tiprec =uf_obtenervalor("cmbtiprec","-");
}
function uf_agregarlineablanca(&$aa_object,$ai_totrows)
{
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_agregarlineablanca
// Access: private
// Argumento: $aa_object // arreglo de titulos
// $ai_totrows // ultima fila pintada en el grid
// Returns:
// Description: Funcion que agrega una linea en blanco al final del grid
// Creado Por: Ing. Luis Anibal Lang
// Fecha Creación: 23/03/2006 Fecha Última Modificación : 23/03/2006
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
$aa_object[$ai_totrows][1]="";
$aa_object[$ai_totrows][2]="";
$aa_object[$ai_totrows][3]="";
$aa_object[$ai_totrows][4]="";
$aa_object[$ai_totrows][5]="
";
}
function uf_pintardetalle(&$lo_object,$ai_totrows)
{
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_pintardetalle
// Access: private
// Argumento: $aa_object // arreglo de objetos
// $ai_totrows // ultima fila pintada en el grid
// Returns:
// Description: Funcion que se encarga de repintar el detalle existente en el grid.
// Creado Por: Ing. Arnaldo Suárez
// Fecha Creación: 06/06/2008 Fecha Última Modificación :
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
for($li_i=1;$li_i<$ai_totrows;$li_i++)
{
$ls_codact= $_POST["txtcodact".$li_i];
$ls_denact= $_POST["txtdenact".$li_i];
$ls_idact= $_POST["txtidact".$li_i];
$li_monact= $_POST["txtmonact".$li_i];
$lo_object[$li_i][1]="";
$lo_object[$li_i][2]="";
$lo_object[$li_i][3]="";
$lo_object[$li_i][4]="";
$lo_object[$li_i][5]="
";
}
uf_agregarlineablanca($lo_object,$ai_totrows);
}
?>
Entrega de Activos
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/sigesp_c_generar_consecutivo.php");
$io_keygen= new sigesp_c_generar_consecutivo();
require_once("../shared/class_folder/class_funciones.php");
$io_fun= new class_funciones();
require_once("../shared/class_folder/class_fecha.php");
$io_fec= new class_fecha();
require_once("sigesp_saf_c_entrega.php");
$io_saf= new sigesp_saf_c_entrega();
require_once("../shared/class_folder/grid_param.php");
$in_grid= new grid_param();
require_once("sigesp_saf_c_activo.php");
$io_saf_dta= new sigesp_saf_c_activo();
$arre=$_SESSION["la_empresa"];
$ls_codemp=$arre["codemp"];
$li_totrows = uf_obtenervalor("totalfilas",1);
if (array_key_exists("operacion",$_POST))
{
$ls_operacion=$_POST["operacion"];
}
else
{
$ls_operacion="";
uf_limpiarvariables();
uf_agregarlineablanca($lo_object,$li_totrows);
$ls_readonly="readonly";
}
switch ($ls_operacion)
{
case "NUEVO":
uf_limpiarvariables();
$ls_readonly="";
$ls_cmpent = $io_keygen->uf_generar_numero_nuevo("SAF","saf_entrega","cmpent","SAF",15,"","codemp",$ls_codemp);
uf_agregarlineablanca($lo_object,$li_totrows);
break;
case "AGREGARDETALLE":
uf_limpiarvariables();
$li_totrows = uf_obtenervalor("totalfilas",1);
$li_totrows = $li_totrows+1;
$ls_cmpent = $_POST["txtcmpent"];
$ld_feccmp = $_POST["txtfeccmp"];
$ld_fecent = $_POST["txtfecent"];
$ls_coduniadm = $_POST["txtcoduniadm"];
$ls_denuniadm = $_POST["txtdenuniadm"];
$ls_codunisol = $_POST["txtcodunisol"];
$ls_denunisol = $_POST["txtdenunisol"];
$ls_descmp = $_POST["txtdescmp"];
$ls_status = $_POST["hidstatus"];
$ls_codres = $_POST["txtcodres"];;
$ls_denres = $_POST["txtnomres"];
$ls_codrec = $_POST["txtcodrec"];
$ls_denrec = $_POST["txtnomrec"];
$ls_coddes = $_POST["txtcoddes"];
$ls_dendes = $_POST["txtnomdes"];
for($li_i=1;$li_i<$li_totrows;$li_i++)
{
$ls_codact= $_POST["txtcodact".$li_i];
$ls_denact= $_POST["txtdenact".$li_i];
$ls_idact= $_POST["txtidact".$li_i];
$li_monact= $_POST["txtmonact".$li_i];
$lo_object[$li_i][1]="";
$lo_object[$li_i][2]="";
$lo_object[$li_i][3]="";
$lo_object[$li_i][4]="";
$lo_object[$li_i][5]="
";
}
uf_agregarlineablanca($lo_object,$li_totrows);
break;
case "GUARDAR":
uf_limpiarvariables();
$li_totrows = uf_obtenervalor("totalfilas",1);
$ls_codusureg = $_SESSION["la_logusr"];
$ls_cmpent = $_POST["txtcmpent"];
$ld_feccmp = $_POST["txtfeccmp"];
$ld_fecent = $_POST["txtfecent"];
$ls_descmp = $_POST["txtdescmp"];
$ls_status = $_POST["hidstatus"];
$ls_coduniadm = $_POST["txtcoduniadm"];
$ls_denuniadm = $_POST["txtdenuniadm"];
$ls_codunisol = $_POST["txtcodunisol"];
$ls_denunisol = $_POST["txtdenunisol"];
$ls_codres = $_POST["txtcodres"];
$ls_codrec = $_POST["txtcodrec"];
$ls_dendes = $_POST["txtnomdes"];
$ls_denres = $_POST["txtnomres"];
$ls_denrec = $_POST["txtnomrec"];
$ls_coddes = $_POST["txtcoddes"];
$ls_tipres = $_POST["cmbtipres"];
$ls_tiprec = $_POST["cmbtiprec"];
$ls_tipdes = $_POST["cmbtipdes"];
$ld_date = date("Y-m-d");
$lb_valido = $io_fec->uf_valida_fecha_mes($ls_codemp,$ld_date);
if($lb_valido)
{
if(($ls_cmpent!="")&&($li_totrows>1))
{
$ls_estproent=0;
$ld_feccmpbd=$io_fun->uf_convertirdatetobd($ld_feccmp);
$ld_fecentbd=$io_fun->uf_convertirdatetobd($ld_fecent);
$lb_existe=$io_saf->uf_saf_select_entrega($ls_codemp,$ls_cmpent,$ls_coduniadm,$ld_feccmpbd);
if($lb_existe)
{
$li_totrows=1;
uf_limpiarvariables();
uf_agregarlineablanca($lo_object,1);
$io_msg->message("El numero de comprobante ".$ls_cmpent."ya existe");
$lb_valido=false;
}
else
{
$io_sql->begin_transaction();
$lb_valido=$io_saf->uf_saf_insert_entrega($ls_codemp,$ls_cmpent,$ld_feccmpbd,$ld_fecentbd,$ls_coduniadm,$ls_codunisol,
$ls_codres,$ls_codrec,$ls_coddes,$ls_tipres,$ls_tiprec,$ls_tipdes,$ls_descmp,$ls_estproent,
$la_seguridad);
if($lb_valido)
{
for($li_i=1;$li_i<$li_totrows;$li_i++)
{
$ls_codact= $_POST["txtcodact".$li_i];
$ls_denact= $_POST["txtdenact".$li_i];
$ls_idact= $_POST["txtidact".$li_i];
$li_monact= $_POST["txtmonact".$li_i];
$li_monact= str_replace(".","",$li_monact);
$li_monact= str_replace(",",".",$li_monact);
$lb_valido=$io_saf->uf_saf_insert_dt_entrega($ls_codemp,$ls_cmpent,$ls_coduniadm,$ld_feccmpbd,$ls_codact,$ls_idact,$la_seguridad);
$lo_object[$li_i][1]="";
$lo_object[$li_i][2]="";
$lo_object[$li_i][3]="".
$lo_object[$li_i][4]="";
$lo_object[$li_i][5]="
";
}
}
if($lb_valido)
{
$io_sql->commit();
$io_msg->message("El registro fue incluido con exito");
$ls_estproent=0;
uf_pintardetalle($lo_object,$li_totrows);
uf_agregarlineablanca($lo_object,$li_totrows);
}
else
{
$io_sql->rollback();
$io_msg->message("No se pudo incluir el registro");
uf_pintardetalle($lo_object,$li_totrows);
}
}
}
else
{
if($li_totrows<=1)
{
$io_msg->message("El registro debe tener al menos 1 detalle");
uf_agregarlineablanca($lo_object,1);
}
else
{
$io_msg->message("Debe completar los datos");
uf_pintardetalle($lo_object,$li_totrows);
}
}
}
else
{
$io_msg->message("El mes no esta abierto");
$li_totrows=1;
uf_agregarlineablanca($lo_object,$li_totrows);
uf_limpiarvariables();
}
break;
case "PROCESAR":
$ls_cmpent = $_POST["txtcmpent"];
$ld_feccmp = $_POST["txtfeccmp"];
$ld_fecent = $_POST["txtfecent"];
$ls_descmp = $_POST["txtdescmp"];
$ls_status = $_POST["hidstatus"];
$ls_coduniadm = $_POST["txtcoduniadm"];
$ls_denuniadm = $_POST["txtdenuniadm"];
$ls_codunisol = $_POST["txtcodunisol"];
$ls_denunisol = $_POST["txtdenunisol"];
$ls_codres = $_POST["txtcodres"];
$ls_codrec = $_POST["txtcodrec"];
$ls_dendes = $_POST["txtnomdes"];
$ls_denres = $_POST["txtnomres"];
$ls_denrec = $_POST["txtnomrec"];
$ls_coddes = $_POST["txtcoddes"];
$ls_tipres = $_POST["cmbtipres"];
$ls_tiprec = $_POST["cmbtiprec"];
$ls_tipdes = $_POST["cmbtipdes"];
$ld_feccmpbd=$io_fun->uf_convertirdatetobd($ld_feccmp);
$ls_status=$_POST["hidstatus"];
$ls_estproent=1;
$ld_date=date("Y-m-d");
$lb_valido=$io_fec->uf_valida_fecha_mes($ls_codemp,$ld_date);
if($lb_valido)
{
$io_sql->begin_transaction();
$lb_valido=$io_saf->uf_saf_update_procesarentrega($ls_codemp,$ls_cmpent,$ld_feccmpbd,$ls_coduniadm,$ls_estproent,$la_seguridad);
if($lb_valido)
{
$io_sql->commit();
$io_msg->message("El registro fue procesado con exito");
uf_agregarlineablanca($lo_object,1);
uf_limpiarvariables();
$li_totrows=1;
}
else
{
$io_sql->rollback();
$io_msg->message("No se pudo procesar el registro");
uf_limpiarvariables();
uf_agregarlineablanca($lo_object,1);
}
}
else
{
$io_msg->message("El mes no esta abierto");
$li_totrows=1;
uf_agregarlineablanca($lo_object,$li_totrows);
uf_limpiarvariables();
}
break;
case "REVERSAR":
$ls_cmpent = $_POST["txtcmpent"];
$ld_feccmp = $_POST["txtfeccmp"];
$ld_feccmpbd=$io_fun->uf_convertirdatetobd($ld_feccmp);
$ld_fecent = $_POST["txtfecent"];
$ls_descmp = $_POST["txtdescmp"];
$ls_status = $_POST["hidstatus"];
$ls_coduniadm = $_POST["txtcoduniadm"];
$ls_denuniadm = $_POST["txtdenuniadm"];
$ls_codunisol = $_POST["txtcodunisol"];
$ls_denunisol = $_POST["txtdenunisol"];
$ls_codres = $_POST["txtcodres"];
$ls_codrec = $_POST["txtcodrec"];
$ls_dendes = $_POST["txtnomdes"];
$ls_denres = $_POST["txtnomres"];
$ls_denrec = $_POST["txtnomrec"];
$ls_coddes = $_POST["txtcoddes"];
$ls_tipres = $_POST["cmbtipres"];
$ls_tiprec = $_POST["cmbtiprec"];
$ls_tipdes = $_POST["cmbtipdes"];
$ls_status=$_POST["hidstatus"];
$ls_estproent=0;
$ld_date=date("Y-m-d");
$lb_valido=$io_fec->uf_valida_fecha_mes($ls_codemp,$ld_date);
if($lb_valido)
{
$io_sql->begin_transaction();
$lb_valido=$io_saf->uf_saf_update_procesarentrega($ls_codemp,$ls_cmpent,$ld_feccmpbd,$ls_estproent,$ls_coduniadm,$la_seguridad);
if($lb_valido)
{
$io_sql->commit();
$io_msg->message("El registro fue reversado con exito");
uf_agregarlineablanca($lo_object,1);
uf_limpiarvariables();
$li_totrows=1;
}
else
{
$io_sql->rollback();
$io_msg->message("No se pudo reversar el registro");
uf_limpiarvariables();
uf_agregarlineablanca($lo_object,1);
}
}
else
{
$io_msg->message("El mes no esta abierto");
$li_totrows=1;
uf_agregarlineablanca($lo_object,$li_totrows);
uf_limpiarvariables();
}
break;
case "ELIMINARDETALLE":
uf_limpiarvariables();
$li_totrows = uf_obtenervalor("totalfilas",1);
$ls_cmpent = $_POST["txtcmpent"];
$ld_feccmp = $_POST["txtfeccmp"];
$ld_fecent = $_POST["txtfecent"];
$ls_descmp = $_POST["txtdescmp"];
$ls_status = $_POST["hidstatus"];
$ls_coduniadm = $_POST["txtcoduniadm"];
$ls_denuniadm = $_POST["txtdenuniadm"];
$ls_codunisol = $_POST["txtcodunisol"];
$ls_denunisol = $_POST["txtdenunisol"];
$ls_codres = $_POST["txtcodres"];
$ls_codrec = $_POST["txtcodrec"];
$ls_dendes = $_POST["txtnomdes"];
$ls_denres = $_POST["txtnomres"];
$ls_denrec = $_POST["txtnomrec"];
$ls_coddes = $_POST["txtcoddes"];
$ls_tipres = $_POST["cmbtipres"];
$ls_tiprec = $_POST["cmbtiprec"];
$ls_tipdes = $_POST["cmbtipdes"];
$li_totrows=$li_totrows-1;
$li_rowdelete=$_POST["filadelete"];
$li_temp=0;
for($li_i=1;$li_i<=$li_totrows;$li_i++)
{
if($li_i!=$li_rowdelete)
{
$li_temp=$li_temp+1;
$ls_codact= $_POST["txtcodact".$li_i];
$ls_denact= $_POST["txtdenact".$li_i];
$ls_idact= $_POST["txtidact".$li_i];
$li_monact= $_POST["txtmonact".$li_i];
$lo_object[$li_temp][1]="";
$lo_object[$li_temp][2]="";
$lo_object[$li_temp][3]="";
$lo_object[$li_temp][4]="";
$lo_object[$li_temp][5]="
";
}
else
{
$li_rowdelete= 0;
}
}
if ($li_temp==0)
{
$li_totrows=1;
uf_agregarlineablanca($lo_object,$li_totrows);
}
else
{
uf_agregarlineablanca($lo_object,$li_totrows);
}
break;
case "BUSCARDETALLE":
uf_limpiarvariables();
$ls_cmpent = $_POST["txtcmpent"];
$ld_feccmp = $_POST["txtfeccmp"];
$ld_fecent = $_POST["txtfecent"];
$ls_coduniadm = $_POST["txtcoduniadm"];
$ls_denuniadm = $_POST["txtdenuniadm"];
$ls_codunisol = $_POST["txtcodunisol"];
$ls_denunisol = $_POST["txtdenunisol"];
$ls_descmp = $_POST["txtdescmp"];
$ls_estproent = $_POST["hidestproent"];
$ls_status = $_POST["hidstatus"];
$ls_codres = $_POST["txtcodres"];;
$ls_denres = $_POST["txtnomres"];
$ls_codrec = $_POST["txtcodrec"];
$ls_denrec = $_POST["txtnomrec"];
$ls_coddes = $_POST["txtcoddes"];
$ls_dendes= $_POST["txtnomdes"];
$ld_feccmpbd=$io_fun->uf_convertirdatetobd($ld_feccmp);
$lb_valido=$io_saf->uf_saf_load_dt_entrega($ls_codemp,$ls_cmpent,$ld_feccmpbd,$ls_coduniadm,$li_totrows,$lo_object);
break;
}
?>