function registraInventario($tipInvent, $IdLocal, $IdPedido, $IdComprobante)
{
//Control
$IdInventario = getIdInventario($IdLocal);
if ($IdInventario) {
return $IdInventario;
}
global $UltimaInsercion;
$IdUsuario = CleanID(getSesionDato("IdUsuario"));
$Keys = "IdUsuario,";
$Values = "'" . $IdUsuario . "',";
$Keys .= "IdLocal,";
$Values .= "'" . $IdLocal . "',";
$Keys .= "Inventario,";
$Values .= "'" . $tipInvent . "',";
$Keys .= "IdPedido,";
$Values .= "'" . $IdPedido . "',";
$Keys .= " IdComprobante,";
$Values .= "'" . $IdComprobante . "',";
$Keys .= " Estado";
$Values .= "'Pendiente'";
$sql = "insert into ges_inventario (" . $Keys . ") values (" . $Values . ")";
query($sql);
$IdInventario = $UltimaInsercion;
if ($IdInventario == 1) {
registraCambiosInventario($IdInventario, " Inventario = 'Inicial' ");
}
return $IdInventario;
}
$IdPedido = $esPedido ? $xIdPedido : registrarAlbaranDestino($Destino, $Origen, $Motivo, $Codigo, 'TrasLocal');
//Compras AlbaranInt IdPedidodet
$IdPedidoDets = $IdPedido;
//Compras AlbaranInt Detalle
$IdPedidoDet = registrarDetalleTrasladoEntrada($IdPedido, $IdProducto, $LoteVence, $Cantidad, $Costo, $Precio, $esSerie);
//Compras AlbaranInt Detalle Series?
if ($esSerie) {
registrarAjusteEntradaSeries($IdPedido, $IdPedidoDet, $IdProducto, $Series, $SerieVence);
}
//Compras AlbaranInt Importes
ConsolidaDetalleCompra($IdPedido, false);
//Inventario? ó Inventario Nuevo?
$IdInventario = $esInvent ? registraInventario($tipInvent, $IdLocal, $IdPedido, $IdComprobante) : 0;
//Inventario? Nuevo IdPedido?
if ($esInvent && !$esPedido) {
registraCambiosInventario($IdInventario, 'IdPedido = ' . $IdPedido);
}
//kardex IdAjuste
$IdOpeAjuste = getIdAjusteOperacion($OpeAjuste, 'Entrada');
//Kardex Entrada
registrarAjusteEntradaKardex($IdPedido, $IdPedidoDet, $IdLocal, $Operacion, $IdOpeAjuste, $IdInventario, $xObs);
//Pedido & Compras Estados
actualizarStatusPedido($IdPedido, '2');
//Compras Estado Documento & Pago AlbaranInt
sModificarCompra($IdPedido, $campoxdato, false, false);
//Ventas Precios
registrarPreciosVentaAlmacen($PVD, $PVDD, $PVC, $PVCD, $IdArticulo);
//Registro Costo Operativo
guardarCostoOperativo($CostoOP, $IdProducto, $IdLocal);
//Retorna IdInventario, IdPedido & IdComprobante
echo "1~" . $IdInventario . "~" . $IdPedido . "~" . $IdComprobante;