";
print "location.href='../sigesp_inicio_sesion.php'";
print "";
}
$ls_logusr=$_SESSION["la_logusr"];
require_once("class_funciones_inventario.php");
$io_fun_activo=new class_funciones_inventario();
$io_fun_activo->uf_load_seguridad("SIV","sigesp_siv_p_cerraroc.php",$ls_permisos,$la_seguridad,$la_permisos);
////////////////////////////////////////////// SEGURIDAD /////////////////////////////////////////////
function uf_agregarlineablanca(&$aa_object,$ai_totrows)
{
//////////////////////////////////////////////////////////////////////////////
// Function: uf_agregarlineablanca
// Access: public
// Arguments:
// aa_object // arreglo de titulos
// ai_totrows // ultima fila pintada en el grid
// Description: Funcion que agrega una linea en blanco al final del grid
//
//////////////////////////////////////////////////////////////////////////////
$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]="";
$aa_object[$ai_totrows][6]="";
$aa_object[$ai_totrows][7]="";
}
function uf_limpiarvariables()
{
//////////////////////////////////////////////////////////////////////////////
// Function: uf_limpiarvariables
// Description: Función que limpia todas las variables necesarias en la página
//////////////////////////////////////////////////////////////////////////////
global $ls_numordcom,$ls_codpro,$ls_denpro,$ls_codalm,$ls_nomfisalm,$ld_fecdes,$ld_fechas;
global $selected0,$selected1,$ls_codusu,$ls_readonly,$ls_accion;
$ls_numordcom="";
$ls_codpro="";
$ls_denpro="";
$ls_codalm="";
$ls_nomfisalm="";
$ld_fechas=date("d/m/Y");
$ls_mes=date("m");
$ls_annio=date("Y");
$ld_fecdes="01/".$ls_mes."/".$ls_annio;
$ls_obsrec="";
$selected0="selected";
$selected1="";
$ls_codusu=$_SESSION["la_logusr"];
$ls_readonly="true";
$ls_accion=0;
}
?>
Cierre de Órdenes de Compra
Sistema de Inventario
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("sigesp_siv_c_cerraroc.php");
$io_siv= new sigesp_siv_c_cerraroc();
require_once("class_funciones_inventario.php");
$io_inventario= new class_funciones_inventario();
$ls_codemp=$_SESSION["la_empresa"]["codemp"];
$ls_codusu=$_SESSION["la_logusr"];
$li_totrows = $io_inventario->uf_obtenervalor("totalfilas",1);
$ls_titletable="Entradas Actuales";
$li_widthtable=760;
$ls_nametable="grid";
$lo_title[1]="Órden de Compra";
$lo_title[2]="Proveedor ó Beneficiario";
$lo_title[3]="Unidad Ejecutora";
$lo_title[4]="Fecha";
$lo_title[5]="Monto";
$lo_title[6]="Monto Cierre";
$lo_title[7]="";
if (array_key_exists("operacion",$_POST))
{
$ls_operacion=$_POST["operacion"];
// $ls_status=$_POST["hidestatus"];
}
else
{
$ls_operacion="";
$ls_status="";
uf_limpiarvariables();
uf_agregarlineablanca($lo_object,1);
}
switch ($ls_operacion)
{
case "PROCESAR":
$li_temp=0;
$li_s=0;
$ld_fecmov= date("Y-m-d");
$lb_valido=$io_fec->uf_valida_fecha_mes($ls_codemp,$ld_fecmov);
$ls_accion=$io_inventario->uf_obtenervalor("cmbaccion",1);
if($ls_accion==0)
{
$ls_estpenalm=1;
}
else
{
$ls_estpenalm=0;
}
$ld_fecdes=$io_inventario->uf_obtenervalor("txtfecdes",0);
$ld_fechas=$io_inventario->uf_obtenervalor("txtfechas",0);
if($ls_accion==0)
{
$selected1="";
$selected0="selected";
}
else
{
$selected1="selected";
$selected0="";
}
if($lb_valido)
{
$io_sql->begin_transaction();
for($li_i=1;$li_i<=$li_totrows;$li_i++)
{
$ls_numordcom= $_POST["txtnumordcom".$li_i];
$ls_codpro= $_POST["txtcodpro".$li_i];
$ls_nompro= $_POST["txtnompro".$li_i];
$ld_fecordcom= $_POST["txtfecordcom".$li_i];
$li_montot= $_POST["txtmontot".$li_i];
$li_monrev= $_POST["txtmonrev".$li_i];
$ls_coduniadm= $_POST["txtcoduniadm".$li_i];
$ls_denuniadm= $_POST["txtdenuniadm".$li_i];
if (array_key_exists("chkprocesar".$li_i,$_POST))
{
$li_s=$li_s + 1;
$li_check= $_POST["chkprocesar".$li_i];
if ($li_check==1)
{
$lb_valido=$io_siv->uf_siv_update_statusorden($ls_codemp,$ls_numordcom,$ls_estpenalm,$la_seguridad);
if($lb_valido)
{
if($ls_accion==0)
{
$li_totmonart="";
$li_totmoncar="";
// $lb_valido=$io_siv->uf_siv_load_dt_pendiente($ls_codemp,$ls_numordcom,$ls_coduniadm,$li_totmonart,$li_totmoncar,$la_seguridad);
$lb_valido=$io_siv->uf_verificar_compromisos($ls_codemp,$ls_numordcom,$ls_codpro,$la_seguridad);
}
else
{
$lb_valido=$io_siv->uf_load_comprobante($ls_codemp,$ls_numordcom,$ls_comprobante,$ld_feccmp,$ls_codban,$ls_ctaban);
$ls_procedencia="SOCROC";
$ls_tipo="P";
$ls_cedbene="----------";
$lb_valido=$io_siv->io_sigesp_int->uf_init_delete($ls_codemp,$ls_procedencia,$ls_comprobante,$ld_feccmp,$ls_tipo,$ls_cedbene,$ls_codpro,false,$ls_codban,$ls_ctaban);
if (!$lb_valido)
{$io_msg->message("No existen registros contables");}
else
{
$lb_valido = $io_siv->io_sigesp_int->uf_int_init_transaction_begin();
if(!$lb_valido)
{
$io_msg->message($io_siv->io_sigesp_int->is_msg_error);
}
if($lb_valido)
{
$lb_valido = $io_siv->io_sigesp_int->uf_init_end_transaccion_integracion($la_seguridad);
if (!$lb_valido)
{
$io_msg->message("Error".$io_siv->io_sigesp_int->is_msg_error);
}
}
}
}//if($ls_accion==0)
}
}
}
else
{
$li_temp=$li_temp + 1;
$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]="";
$lo_object[$li_temp][6]="";
$lo_object[$li_temp][7]="";
}
}
if(($li_i<=1)||($li_s==0))
{
$io_msg->message("No se pudo realizar el proceso");
//$li_totrows=1;
//uf_agregarlineablanca($lo_object,1);
break;
}
if($lb_valido)
{
$io_sql->commit();
$io_msg->message("El proceso se realizo con exito");
}
else
{
$io_sql->rollback();
$io_msg->message("No se pudo realizar el proceso");
}
if ($li_temp)
{
$li_totrows=$li_temp;
}
else
{
$li_totrows=1;
uf_agregarlineablanca($lo_object,1);
}
}
else
{
$io_msg->message("El mes no esta abierto");
$li_totrows=1;
uf_agregarlineablanca($lo_object,1);
}
break;
case "BUSCARORDEN":
$li_totrows=0;
$ls_accion=$io_inventario->uf_obtenervalor("cmbaccion",1);
//$ls_accion=$io_inventario->uf_obtenervalor("radioaccion",1);
$ld_fecdes=$io_inventario->uf_obtenervalor("txtfecdes",0);
$ld_fechas=$io_inventario->uf_obtenervalor("txtfechas",0);
if($ls_accion==0)
{
$selected1="";
$selected0="selected";
}
else
{
$selected1="selected";
$selected0="";
}
$lb_valido=$io_siv->uf_siv_load_ordenes($li_totrows,$lo_object,$ls_accion,$ld_fecdes,$ld_fechas);
if (!$lb_valido)
{
//$lo_object="";
uf_agregarlineablanca($lo_object,1);
}
break;
}
?>
