更新装配、精工车间、技术中心、仓储模块,新增工序工价、生产审核、三楼仓库可视化等功能及文档SQL

This commit is contained in:
Developer
2026-07-06 11:21:59 +08:00
parent be0ff91e24
commit 9c1f52078d
43 changed files with 8566 additions and 233 deletions

View File

@@ -0,0 +1,94 @@
-- 三楼仓库可视化 - 库位查询存储过程
-- 创建时间: 2026-06-30
-- 说明: 查询三楼仓库库位列表及状态(三段式库位编码: 排号-列号-层号)
-- 状态: 0=空闲, 1=有物料无库存, 2=有库存
-- 矩阵布局: 竖向排号,横向列号
IF EXISTS (SELECT name FROM sys.procedures WHERE name = '仓储管理_三楼仓库库位_查询数据')
DROP PROCEDURE _三楼仓库库位_查询数据
GO
CREATE PROCEDURE [dbo].[_三楼仓库库位_查询数据]
@_check bit = 0,
@ nvarchar(50) = NULL,
@_check bit = 0,
@ nvarchar(50) = NULL,
@_check bit = 0,
@ int = NULL
AS
BEGIN
SET NOCOUNT ON;
SELECT
h. AS ,
h. AS ,
CASE
WHEN EXISTS (SELECT 1 FROM _物料与货位对照表 ml WHERE ml. = h. AND ml. > 0) THEN 2
WHEN EXISTS (SELECT 1 FROM _物料主文件_基本 m WHERE m. = h.) THEN 1
ELSE 0
END AS ,
PARSENAME(REPLACE(h., '-', '.'), 3) AS ,
CAST(PARSENAME(REPLACE(h., '-', '.'), 2) AS int) AS ,
PARSENAME(REPLACE(h., '-', '.'), 1) AS ,
h.
INTO #TempLocations
FROM _货位主文件 h
WHERE LEN(h.) - LEN(REPLACE(h., '-', '')) = 2
AND ISNUMERIC(PARSENAME(REPLACE(h., '-', '.'), 3)) = 1
DECLARE @sql nvarchar(4000)
SET @sql = 'SELECT 库位编号, 库位名称, 状态, 排号, 列号, 层号, 货位流水号 FROM #TempLocations WHERE 1=1'
IF @_check = 1 AND @ IS NOT NULL
SET @sql = @sql + ' AND 排号 = @p_row'
IF @_check = 1 AND @ IS NOT NULL
SET @sql = @sql + ' AND 库位编号 LIKE ''%'' + @p_code + ''%'''
IF @_check = 1 AND @ IS NOT NULL
SET @sql = @sql + ' AND 状态 = @p_status'
SET @sql = @sql + ' ORDER BY 排号, 列号, 层号'
EXEC sp_executesql @sql,
N'@p_row nvarchar(50), @p_code nvarchar(50), @p_status int',
@p_row = @, @p_code = @, @p_status = @
DROP TABLE #TempLocations
END
GO
-- 三楼仓库可视化 - 库位物料查询存储过程
-- 创建时间: 2026-06-30
-- 说明: 按库位编号查询三楼仓库库位上的物料明细
IF EXISTS (SELECT name FROM sys.procedures WHERE name = '仓储管理_三楼仓库库位物料_查询数据')
DROP PROCEDURE _三楼仓库库位物料_查询数据
GO
CREATE PROCEDURE [dbo].[_三楼仓库库位物料_查询数据]
@_check bit = 0,
@ nvarchar(50) = NULL
AS
BEGIN
SET NOCOUNT ON;
IF @_check = 1 AND @ IS NOT NULL
BEGIN
SELECT
m. AS ,
m. AS ,
m. AS ,
m. AS ,
ISNULL(ml., 0) AS ,
ISNULL(m., '') AS ,
ISNULL(ml., '') AS
FROM _货位主文件 h
INNER JOIN _物料主文件_基本 m ON h. = m.
LEFT JOIN _物料与货位对照表 ml ON m. = ml. AND ml. = h.
WHERE h. = @
ORDER BY m.
END
END
GO