";
print "location.href='../sigesp_inicio_sesion.php'";
print "";
}
$ls_logusr=$_SESSION["la_logusr"];
require_once("class_funciones_inventario.php");
$io_fun_inventario=new class_funciones_inventario();
$io_fun_inventario->uf_load_seguridad("SIV","sigesp_siv_p_transferencia.php",$ls_permisos,$la_seguridad,$la_permisos);
$ls_reporte=$io_fun_inventario->uf_select_config("SIV","REPORTE","TRASFERENCIA_ALMACEN","sigesp_siv_rfs_transferencia.php","C");
$ls_estartpri=$io_fun_inventario->uf_select_config("SIV","CONFIG","ARTICULO_PRI","","C");
////////////////////////////////////////////// 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_seleccionarcombo($as_valores,$as_seleccionado,&$aa_parametro,$li_total)
{
//////////////////////////////////////////////////////////////////////////////
// Function: uf_seleccionarcombo
// Access: public
// Arguments:
// as_valores // valores que puede tomar el combo
// as_seleccionado // item seleccionado
// aa_parametro // arreglo de seleccionados
// li_total // total de elementos en el combo
// Description: Esta funcion mantiene la seleccion de un combo despues de hacer un submit
//
//////////////////////////////////////////////////////////////////////////////
$la_valores = split("-",$as_valores);
for($li_index=0;$li_index<$li_total;++$li_index)
{
if($la_valores[$li_index]==$as_seleccionado)
{
$aa_parametro[$li_index]=" selected";
}
}
}
//--------------------------------------------------------------
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]="";
$aa_object[$ai_totrows][8]="";//
}
//--------------------------------------------------------------
function uf_limpiarvariables()
{
//////////////////////////////////////////////////////////////////////////////
// Function: uf_limpiarvariables
// Description: Función que limpia todas las variables necesarias en la página
//////////////////////////////////////////////////////////////////////////////
global $ls_numtra,$ld_fecemi,$ls_codusu,$ls_codalmori,$ls_codalmdes,$ls_nomalmori,$ls_nomalmdes,$ls_obstra,$ls_readonly;
global $ls_status;
$ls_numtra="";
$ld_fecemi=date("d/m/Y ");
$ls_codusu=$_SESSION["la_logusr"];
$ls_codalmori="";
$ls_codalmdes="";
$ls_nomalmori="";
$ls_nomalmdes="";
$ls_obstra="";
$ls_readonly="true";
$ls_status="";
}
function uf_obtenervalorunidad($li_i)
{
//////////////////////////////////////////////////////////////////////////////
// Function: uf_obtenervalorunidad
// Access: public
// Arguments:
// li_i // valor del
// ls_valor // nombre de la variable que desamos obtener
// Description: Función que obtiene el contenido del combo cmbunidad o
// del campo txtunidad deacuerdo sea el caso
//////////////////////////////////////////////////////////////////////////////
if (array_key_exists("cmbunidad".$li_i,$_POST))
{
$ls_valor= $_POST["cmbunidad".$li_i];
}
else
{
$ls_valoraux= $_POST["txtcoduni".$li_i];
if($ls_valoraux=="Mayor")
{
$ls_valor="M";
}
else
{
$ls_valor="D";
}
}
return $ls_valor;
}
?>
Transferencia entre Almacenes
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_fecha.php");
$io_fec= new class_fecha();
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("sigesp_siv_c_transferencia.php");
$io_siv= new sigesp_siv_c_transferencia();
require_once("sigesp_siv_c_articuloxalmacen.php");
$io_art= new sigesp_siv_c_articuloxalmacen();
require_once("sigesp_siv_c_movimientoinventario.php");
$io_mov= new sigesp_siv_c_movimientoinventario();
$arre=$_SESSION["la_empresa"];
$ls_codemp=$arre["codemp"];
$ls_codusu=$_SESSION["la_logusr"];
$li_totrows = uf_obtenervalor("totalfilas",1);
$ls_titletable="Detalle de la Transferencia";
$li_widthtable=600;
$ls_nametable="grid";
$lo_title[1]="Artículo";
$lo_title[2]="Unidad de Medida";
$lo_title[3]="Modalidad";
$lo_title[4]="Cantidad";
$lo_title[5]="Costo Unitario";
$lo_title[6]="Costo Total";
$lo_title[7]="";
$lo_title[8]="";
if (array_key_exists("operacion",$_POST))
{
$ls_operacion= $_POST["operacion"];
$ls_status= $_POST["hidestatus"];
if ($ls_status=="C")
{
$ls_readonly=$_POST["hidreadonly"];
if (array_key_exists("catafilas",$_POST))
{
$li_catafilas=$_POST["catafilas"];
}
else
{
$li_catafilas="";
}
}
else
{
$ls_status="";
}
}
else
{
$ls_operacion="";
uf_limpiarvariables();
uf_agregarlineablanca($lo_object,1);
}
switch ($ls_operacion)
{
case "NUEVO":
uf_agregarlineablanca($lo_object,1);
uf_limpiarvariables();
$li_totrows=1;
break;
case "GUARDAR":
$ls_numtra= $_POST["txtnumtra"];
$ld_fecemi= $_POST["txtfecemi"];
$ls_codalmori= $_POST["txtcodalm"];
$ls_codalmdes= $_POST["txtcodalmdes"];
$ls_nomalmori= $_POST["txtnomfisalm"];
$ls_nomalmdes= $_POST["txtnomfisdes"];
$ls_obstra= $_POST["txtobstra"];
$lb_valido=$io_fec->uf_valida_fecha_mes($ls_codemp,$ld_fecemi);
if($lb_valido)
{
$ld_fecemi=$io_func->uf_convertirdatetobd($ld_fecemi);
if ($ls_status=="C")
{
$io_msg->message("La transferencia entre almacenes no debe ser modificada");
$li_totrows=1;
uf_agregarlineablanca($lo_object,$li_totrows);
uf_limpiarvariables();
}
else
{
$lb_encontrado=$io_siv->uf_siv_select_transferencia($ls_codemp,$ls_numtra,$ld_fecemi);
if ($lb_encontrado)
{
$io_msg->message("La transferencia entre almacenes ya existe");
}
else
{
$io_sql->begin_transaction();
$ls_nummov="";
$lb_valido1=false;
$lb_existencia=false;
$lb_valido=$io_siv->uf_siv_insert_transferencia($ls_codemp,$ls_numtra,$ld_fecemi,$ls_codusu,$ls_codalmori,
$ls_codalmdes,$ls_obstra,$la_seguridad);
if ($lb_valido)
{
$ls_nummov=0;
$ls_nomsol="Transferencia";
$lb_valido=$io_mov->uf_siv_insert_movimiento($ls_nummov,$ld_fecemi,$ls_nomsol,$ls_codusu,
$la_seguridad);
if ($lb_valido)
{
for($li_i=1;$li_i<$li_totrows;$li_i++)
{
$li_unidad= $_POST["hidunidad".$li_i];
$ls_unidad= $_POST["txtcoduni".$li_i];
$ls_denunimed= $_POST["txtdenunimed".$li_i];
$ls_codart= $_POST["txtcodart".$li_i];
$ls_denart= $_POST["txtdenart".$li_i];
$li_cantidad= $_POST["txtcantidad".$li_i];
$li_cosuni= $_POST["txtcosuni".$li_i];
$li_costot= $_POST["txtcostot".$li_i];
$li_cantidad= str_replace(".","",$li_cantidad);
$li_cantidad= str_replace(",",".",$li_cantidad);
$li_cosuni= str_replace(".","",$li_cosuni);
$li_cosuni= str_replace(",",".",$li_cosuni);
$li_costot= str_replace(".","",$li_costot);
$li_costot= str_replace(",",".",$li_costot);
$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]="";
$lo_object[$li_i][6]="";
$lo_object[$li_i][7]="";
$lo_object[$li_i][8]="";
switch ($ls_unidad)
{
case "Mayor":
$ls_coduni="M";
$li_cantidad=($li_cantidad * $li_unidad);
break;
case "Detal":
$ls_coduni="D";
break;
}
$lb_valido=$io_art->uf_siv_chequear_articuloxalmacen($ls_codemp,$ls_codart,$ls_codalmori,$li_cantidad);
if ($lb_valido)
{
$lb_valido=$io_siv->uf_siv_guardar_dt_transferencia($ls_codemp,$ls_numtra,$ld_fecemi,$ls_codart,
$ls_coduni,$li_cantidad,$li_cosuni,$li_costot,
$la_seguridad);
if ($lb_valido)
{
$lb_valido=$io_art->uf_siv_disminuir_articuloxalmacen($ls_codemp,$ls_codart,$ls_codalmori,$li_cantidad,$la_seguridad);
if ($lb_valido)
{
$lb_valido=$io_art->uf_siv_aumentar_articuloxalmacen($ls_codemp,$ls_codart,$ls_codalmdes,$li_cantidad,$la_seguridad);
if($lb_valido)
{
/*$ls_opeinv="SAL";
$ls_codprodoc="ALM";
$ls_promov="TRA";
$li_candesart=0;*/
$lb_valido=$io_siv->uf_siv_procesar_dt_movimientotransferencia($ls_codemp,$ls_nummov,$ls_codart,
$ls_codalmori,$ls_unidad,$li_cantidad,
$li_cosuni,$ld_fecemi,$ls_numtra,
$la_seguridad);
if($lb_valido)
{
$ls_opeinv="ENT";
$ls_codprodoc="ALM";
$ls_promov="TRA";
$lb_valido=$io_mov->uf_siv_insert_dt_movimiento($ls_codemp,$ls_nummov,$ld_fecemi,
$ls_codart,$ls_codalmdes,$ls_opeinv,
$ls_codprodoc,$ls_numtra,$li_cantidad,
$li_cosuni,$ls_promov,$ls_numtra,
$li_cantidad,$ld_fecemi,$la_seguridad);
}
}
}
}
}
}// for
}
}
$ld_fecemi=$io_func->uf_convertirfecmostrar($ld_fecemi);
if($lb_valido)
{
$io_sql->commit();
//$io_msg->message("El Numero de Movimiento correspondiente es: ".$ls_numtra);
$io_msg->message("La transferencia entre almacenes ha sido procesada");
$ls_status="C";
$li_totrows=$li_totrows-1;
/* uf_agregarlineablanca($lo_object,1);
uf_limpiarvariables();
$li_totrows=1;
*/ }
else
{
$io_sql->rollback();
$li_totrows=1;
uf_agregarlineablanca($lo_object,1);
$io_msg->message("No se pudo procesar la transferencia entre almacenes");
}
}
}
}
else
{
$io_msg->message("El mes no esta abierto");
$li_totrows=1;
uf_agregarlineablanca($lo_object,$li_totrows);
uf_limpiarvariables();
}
break;
case "AGREGARDETALLE":
$li_totrows=$li_totrows+1;
$ls_numtra= $_POST["txtnumtra"];
$ld_fecemi= $_POST["txtfecemi"];
$ls_codalmori= $_POST["txtcodalm"];
$ls_codalmdes= $_POST["txtcodalmdes"];
$ls_nomalmori= $_POST["txtnomfisalm"];
$ls_nomalmdes= $_POST["txtnomfisdes"];
$ls_obstra= $_POST["txtobstra"];
for($li_i=1;$li_i<$li_totrows;$li_i++)
{
$ls_codart= $_POST["txtcodart".$li_i];
$ls_denunimed= $_POST["txtdenunimed".$li_i];
$ls_denart= $_POST["txtdenart".$li_i];
$ls_unidad= uf_obtenervalorunidad($li_i);
$li_unidad= $_POST["hidunidad".$li_i];
$li_cantidad= $_POST["txtcantidad".$li_i];
$li_cosuni= $_POST["txtcosuni".$li_i];
$li_costot= $_POST["txtcostot".$li_i];
switch ($ls_unidad)
{
case "M":
$ls_unidadaux="Mayor";
break;
case "D":
$ls_unidadaux="Detal";
break;
}
$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]="";
$lo_object[$li_i][6]="";
$lo_object[$li_i][7]="";
$lo_object[$li_i][8]="";
}
uf_agregarlineablanca($lo_object,$li_totrows);
break;
case "ELIMINARDETALLE":
$ls_numtra= $_POST["txtnumtra"];
$ld_fecemi= $_POST["txtfecemi"];
$ls_codalmori= $_POST["txtcodalm"];
$ls_codalmdes= $_POST["txtcodalmdes"];
$ls_nomalmori= $_POST["txtnomfisalm"];
$ls_nomalmdes= $_POST["txtnomfisdes"];
$ls_obstra= $_POST["txtobstra"];
$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_codart= $_POST["txtcodart".$li_i];
$ls_denart= $_POST["txtdenart".$li_i];
$ls_denunimed= $_POST["txtdenunimed".$li_i];
$ls_unidad= $_POST["txtcoduni".$li_i];
$li_unidad= $_POST["hidunidad".$li_i];
$li_cantidad= $_POST["txtcantidad".$li_i];
$li_cosuni= $_POST["txtcosuni".$li_i];
$li_costot= $_POST["txtcostot".$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]="";
$lo_object[$li_i][6]="";
$lo_object[$li_i][7]="";
$lo_object[$li_i][8]="";
}
else
{
$li_rowdelete= 0;
}
}
uf_agregarlineablanca($lo_object,$li_totrows);
break;
case "BUSCARDETALLE":
$ls_numtra= $_POST["txtnumtra"];
$ld_fecemi= $_POST["txtfecemi"];
$ls_codalmori= $_POST["txtcodalm"];
$ls_codalmdes= $_POST["txtcodalmdes"];
$ls_nomalmori= $_POST["txtnomfisalm"];
$ls_nomalmdes= $_POST["txtnomfisdes"];
$ls_obstra= $_POST["txtobstra"];
$ld_fecemiaux=$io_func->uf_convertirdatetobd($ld_fecemi);
$lb_valido=$io_siv->uf_siv_obtener_dt_transferencia($ls_codemp,$ls_numtra,$ld_fecemiaux,$li_totrows,$lo_object);
break;
}
?>