212 lines
7.6 KiB
Transact-SQL
212 lines
7.6 KiB
Transact-SQL
USE [ERPTOOL_JY]
|
||
GO
|
||
|
||
ALTER PROCEDURE [dbo].[物料管理_查询数据_分页]
|
||
@物料名称_check bit = null,
|
||
@物料名称 nvarchar(50) = null,
|
||
@物料编码_check bit = null,
|
||
@物料编码 nvarchar(50) = null,
|
||
@图号_check bit = null,
|
||
@图号 nvarchar(50) = null,
|
||
@类型_check bit = null,
|
||
@类型 int = null,
|
||
@时间_check bit = null,
|
||
@开始时间 nvarchar(50) = null,
|
||
@结束时间 nvarchar(50) = null,
|
||
@排序名称 int =null,
|
||
@排序方式 int =null,
|
||
@物料库_check bit = null,
|
||
@物料库 int = null,
|
||
@是否禁用_check bit = null, -- 修改人:Ld 修改时间:2026-08-04 08:34:47; 正式库支持前端切换查看启用/禁用物料
|
||
@是否禁用 bit = null, -- 修改人:Ld 修改时间:2026-08-04 08:34:47; 1 查询禁用物料，0 查询启用物料
|
||
|
||
@PageCurrent int=1, --要显示的页码
|
||
@PageSize int = 20, --每页的大小(记录数)
|
||
@PageCount int = '1111' OUTPUT, --总页数
|
||
@ItemCount int = '1111' OUTPUT --总记录数
|
||
AS
|
||
|
||
declare @selectStrWhere nvarchar(4000)
|
||
|
||
|
||
set @selectStrWhere = '1=1 ' -- 修改人:Ld 修改时间:2026-08-04 08:34:47; 默认条件改为可拼接启用状态
|
||
|
||
if (ISNULL(@是否禁用_check, 0) = 1) -- 修改人:Ld 修改时间:2026-08-04 08:34:47; 按按钮传入状态筛选禁用/启用物料
|
||
set @selectStrWhere = @selectStrWhere + ' and 是否禁用 = ' + str(ISNULL(@是否禁用, 0))
|
||
else
|
||
set @selectStrWhere = @selectStrWhere + ' and 是否禁用=0 '
|
||
|
||
|
||
--if(@物料名称_check = 1)
|
||
-- set @selectStrWhere = @selectStrWhere+' and 名称 like + ''%'' + @物料名称 + ''%'' '
|
||
--if(@时间_check = 1)
|
||
-- set @selectStrWhere = @selectStrWhere+' and 修改日期 >=@开始时间 and 修改日期 <=@结束时间 '
|
||
--if(@图号_check = 1)
|
||
-- set @selectStrWhere = @selectStrWhere+' and 代号 like + ''%'' + @图号 + ''%'' '
|
||
--if(@类型_check = 1)
|
||
-- set @selectStrWhere = @selectStrWhere+' and 类型 = @类型 '
|
||
|
||
|
||
if (@物料名称_check = 1)
|
||
if(@物料名称 is not null)
|
||
set @selectStrWhere = @selectStrWhere+' and 名称 like '+N'''%'+@物料名称+N'%'''
|
||
|
||
if (@物料编码_check = 1)
|
||
if(@物料编码 is not null)
|
||
set @selectStrWhere = @selectStrWhere+' and 物料编码 like '+N'''%'+@物料编码+N'%'''
|
||
|
||
|
||
if (@时间_check = 1)
|
||
if(@开始时间 is not null and @结束时间 is not null)
|
||
set @selectStrWhere = @selectStrWhere+' and ' + N''''+@开始时间+N'''' + '<=修改日期' + ' and '+ N''''+@结束时间+N'''' + '>=修改日期'
|
||
|
||
if (@图号_check = 1)
|
||
if(@图号 is not null)
|
||
set @selectStrWhere = @selectStrWhere+' and 代号 like '+N'''%'+@图号+N'%'''
|
||
|
||
if (@类型_check = 1)
|
||
if(@类型 is not null)
|
||
set @selectStrWhere = @selectStrWhere+' and 类型 = '+str(@类型)
|
||
|
||
---if (@物料库_check = 1)
|
||
-- if(@物料库 is not null)
|
||
-- set @selectStrWhere = @selectStrWhere+' and 物料库流水号 = '+ str(@物料库)
|
||
|
||
|
||
declare @tbname sysname --要分页显示的表名
|
||
declare @fieldkey sysname --用于定位记录的主键(唯一键)字段,只能是单个字段
|
||
declare @where nvarchar(4000) --查询条件
|
||
declare @fieldshow nvarchar(1000) --以逗号分隔的要显示的字段列表,如果不指定,则显示所有字段
|
||
declare @fieldOrder nvarchar(1000) ----以逗号分隔的排序字段列表,可以指定在字段后面指定DESC/ASC --不指定则按主键顺序
|
||
|
||
set @tbname = '物料视图'
|
||
set @fieldkey = '物料流水号'
|
||
set @where = @selectStrWhere
|
||
set @fieldshow =' [代号], [修改人], [修改日期], [单位], [单位流水号],[名称], [库位], [货位流水号], [操作日期],[文件内容],[文件后缀], [物料类型],[物料库流水号],
|
||
[是否启用], [是否禁用], [材料], [材料流水号],
|
||
[物料流水号], [物料编码], [类型], [类型名称], [物料说明],[规格],[曾用物料编码],[Expr1]' -- 修改人:Ld 修改时间:2026-08-04 08:34:47; 保持原输出字段并继续返回是否禁用状态
|
||
if @排序名称 = 1
|
||
begin
|
||
if @排序方式 = 1
|
||
begin
|
||
set @fieldOrder ='名称 DESC'
|
||
end
|
||
else
|
||
begin
|
||
set @fieldOrder = '名称 ASC'
|
||
end
|
||
end
|
||
else if @排序名称 = 2
|
||
begin
|
||
if @排序方式 = 1
|
||
begin
|
||
set @fieldOrder = '代号 DESC'
|
||
end
|
||
else
|
||
begin
|
||
set @fieldOrder = '代号 ASC'
|
||
end
|
||
end
|
||
else
|
||
begin
|
||
set @fieldOrder = '操作日期 DESC'
|
||
end
|
||
|
||
exec sp_xt_pagesplit @tbname,@fieldkey,@where,@fieldshow,@fieldOrder,'',@PageCurrent,@PageSize,@PageCount out,@ItemCount out
|
||
GO
|
||
|
||
ALTER PROCEDURE [dbo].[物料管理_删除]
|
||
@物料流水号 int=null
|
||
AS
|
||
BEGIN
|
||
SET NOCOUNT ON;
|
||
|
||
IF @物料流水号 IS NULL OR NOT EXISTS (SELECT 1 FROM dbo.库存管理_物料主文件_基本 WHERE 物料流水号 = @物料流水号)
|
||
BEGIN
|
||
SELECT '0' AS result, N'物料不存在' AS msg;
|
||
RETURN;
|
||
END
|
||
|
||
UPDATE dbo.库存管理_物料主文件_基本
|
||
SET 是否禁用 = 1
|
||
WHERE 物料流水号 = @物料流水号; -- 修改人:Ld 修改时间:2026-08-04 08:34:47; 删除保持原逻辑删除语义
|
||
|
||
DELETE FROM dbo.库存管理_物料_图片
|
||
WHERE 物料流水号 = @物料流水号; -- 修改人:Ld 修改时间:2026-08-04 08:34:47; 删除后继续清理物料图片
|
||
|
||
SELECT '1' AS result, N'删除成功' AS msg; -- 修改人:Ld 修改时间:2026-08-04 08:34:47; 返回前端可识别结果
|
||
END
|
||
GO
|
||
|
||
IF OBJECT_ID(N'[dbo].[物料管理_启用]', N'P') IS NOT NULL
|
||
DROP PROCEDURE [dbo].[物料管理_启用]
|
||
GO
|
||
|
||
CREATE PROCEDURE [dbo].[物料管理_启用]
|
||
@物料流水号 int=null,
|
||
@操作者 int=null
|
||
AS
|
||
BEGIN
|
||
SET NOCOUNT ON;
|
||
|
||
IF @物料流水号 IS NULL OR NOT EXISTS (SELECT 1 FROM dbo.库存管理_物料主文件_基本 WHERE 物料流水号 = @物料流水号)
|
||
BEGIN
|
||
SELECT '0' AS result, N'物料不存在' AS msg;
|
||
RETURN;
|
||
END
|
||
|
||
UPDATE dbo.库存管理_物料主文件_基本
|
||
SET 是否禁用 = 0,
|
||
修改人 = @操作者,
|
||
修改日期 = GETDATE()
|
||
WHERE 物料流水号 = @物料流水号; -- 修改人:Ld 修改时间:2026-08-04 08:34:47; 禁用物料重新启用
|
||
|
||
SELECT '1' AS result, N'启用成功' AS msg; -- 修改人:Ld 修改时间:2026-08-04 08:34:47; 返回前端可识别结果
|
||
END
|
||
GO
|
||
|
||
IF OBJECT_ID(N'[dbo].[物料管理_物理删除]', N'P') IS NOT NULL
|
||
DROP PROCEDURE [dbo].[物料管理_物理删除]
|
||
GO
|
||
|
||
CREATE PROCEDURE [dbo].[物料管理_物理删除]
|
||
@物料流水号 int=null
|
||
AS
|
||
BEGIN
|
||
SET NOCOUNT ON;
|
||
|
||
IF @物料流水号 IS NULL OR NOT EXISTS (SELECT 1 FROM dbo.库存管理_物料主文件_基本 WHERE 物料流水号 = @物料流水号)
|
||
BEGIN
|
||
SELECT '0' AS result, N'物料不存在' AS msg;
|
||
RETURN;
|
||
END
|
||
|
||
IF EXISTS (SELECT 1 FROM dbo.库存管理_物料主文件_基本 WHERE 物料流水号 = @物料流水号 AND ISNULL(是否禁用, 0) = 0)
|
||
BEGIN
|
||
SELECT '0' AS result, N'启用物料不能物理删除，请先删除禁用后再操作' AS msg;
|
||
RETURN;
|
||
END
|
||
|
||
BEGIN TRY
|
||
BEGIN TRAN;
|
||
|
||
DELETE FROM dbo.库存管理_物料_图片
|
||
WHERE 物料流水号 = @物料流水号; -- 修改人:Ld 修改时间:2026-08-04 08:34:47; 物理删除禁用物料时同步清理图片
|
||
|
||
DELETE FROM dbo.库存管理_物料主文件_基本
|
||
WHERE 物料流水号 = @物料流水号
|
||
AND ISNULL(是否禁用, 0) = 1; -- 修改人:Ld 修改时间:2026-08-04 08:34:47; 仅允许已禁用物料物理删除
|
||
|
||
COMMIT TRAN;
|
||
|
||
SELECT '1' AS result, N'永久删除成功' AS msg; -- 修改人:Ld 修改时间:2026-08-04 08:34:47; 返回前端可识别结果
|
||
END TRY
|
||
BEGIN CATCH
|
||
IF @@TRANCOUNT > 0
|
||
ROLLBACK TRAN;
|
||
|
||
SELECT '0' AS result, ERROR_MESSAGE() AS msg;
|
||
END CATCH
|
||
END
|
||
GO
|