";
print "location.href='../sigesp_inicio_sesion.php'";
print "";
}
$ls_logusr=$_SESSION["la_logusr"];
require_once("../shared/class_folder/class_funciones.php");
$io_funciones=new class_funciones();
require_once("class_funciones_banco.php");
$io_fun_scb=new class_funciones_banco();
$io_fun_scb->uf_load_seguridad("SCB","sigesp_scb_p_cmp_retencion.php",$ls_permisos,$la_seguridad,$la_permisos);
////////////////////////////////////////////// SEGURIDAD /////////////////////////////////////////////
//--------------------------------------------------------------------------------------------------------------
function uf_limpiarvariables()
{
//////////////////////////////////////////////////////////////////////////////
// Function: uf_limpiarvariables
// Access: private
// Description: Función que limpia todas las variables necesarias en la página
// Creado Por: Ing. Gerardo Cordero
// Fecha Creación: 19/04/2007 Fecha Última Modificación :
//////////////////////////////////////////////////////////////////////////////
global $ls_mes,$ls_agno,$ls_operacion,$ls_tipproben,$io_funciones,$ls_provbenedesde,$io_fun_scb,$ls_provbenehasta;
$arr_fecha = getdate();
$ls_agno = $arr_fecha["year"];
$ls_mes = $arr_fecha["mon"];
$ls_mes = $io_funciones->uf_cerosizquierda($ls_mes,2);
$ls_tipproben = "-";
$ls_provbenedesde = "";
$ls_provbenehasta = "";
$ls_operacion = $io_fun_scb->uf_obteneroperacion();
}
//--------------------------------------------------------------------------------------------------------------
//--------------------------------------------------------------------------------------------------------------
function uf_load_variables()
{
//////////////////////////////////////////////////////////////////////////////
// Function: uf_load_variables
// Access: private
// Description: Función que carga todas las variables necesarias en la página
// Creado Por: Ing. Néstor Falcón.
// Fecha Creación: 23/04/2007 Fecha Última Modificación :
//////////////////////////////////////////////////////////////////////////////
global $ls_tipproben,$ls_mes,$ls_agno,$ls_provbenedesde,$ls_provbenehasta;
$ls_mes = $_POST["mes"];
$ls_agno = $_POST["agno"];
$ls_tipproben = $_POST["estprov"];
$ls_provbenedesde = $_POST["txtprovbendesde"];
$ls_provbenehasta = $_POST["txtprovbenhasta"];
}
//--------------------------------------------------------------------------------------------------------------
$li_diasem = date('w');
switch ($li_diasem){
case '0': $ls_diasem='Domingo';
break;
case '1': $ls_diasem='Lunes';
break;
case '2': $ls_diasem='Martes';
break;
case '3': $ls_diasem='Miércoles';
break;
case '4': $ls_diasem='Jueves';
break;
case '5': $ls_diasem='Viernes';
break;
case '6': $ls_diasem='Sábado';
break;
}
?>
Comprobante Retención Iva
Caja y Banco
message("Los Comprobantes de Retenciones IVA se generan por el Módulo de Cuentas por Pagar !!!");
}
else
{
uf_load_variables();
}
break;
case "PROCESAR":
uf_load_variables();
if ($ls_tipproben=='P' || $ls_tipproben=='-')
{
$lb_chepro = "checked";
$lb_cheben = "";
}
elseif($ls_tipproben=='B')
{
$lb_cheben = "checked";
$lb_chepro = "";
}
$li_totrocmp = $io_retencion->uf_procesar_comprobante_retencion($ls_mes,$ls_agno,$ls_provbenedesde,$ls_provbenehasta,$ls_tipproben,$la_numcmp,$la_seguridad);
if ($li_totrocmp>0)
{
for ($li_i=1;$li_i<=$li_totrocmp;$li_i++)
{
$io_msg->message("Se procesó satisfactoriamente el Comprobante Nº.".$la_numcmp[$li_i]);
}
}
else
{
$io_msg->message("No se generaron Comprobantes de Retención verifique sus datos !!!");
}
break;
case "VALIDARMES":
$io_msg->message("Sólo es posible generar comprobantes de retención de el mes en curso !!!");
break;
}
?>
