Files
DP44/DataPRO_sql/dbo.sp_MMEPhysicalDimensionsUpdateInsert.StoredProcedure.sql
2026-04-17 14:55:32 -04:00

124 lines
6.3 KiB
Transact-SQL
Raw Permalink Blame History

This file contains invisible Unicode characters
This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[sp_MMEPhysicalDimensionsUpdateInsert]') AND type in (N'P', N'PC'))
DROP PROCEDURE [dbo].[sp_MMEPhysicalDimensionsUpdateInsert]
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
IF NOT EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[sp_MMEPhysicalDimensionsUpdateInsert]') AND type in (N'P', N'PC'))
BEGIN
EXEC dbo.sp_executesql @statement = N'CREATE PROCEDURE [dbo].[sp_MMEPhysicalDimensionsUpdateInsert] AS'
END
GO
ALTER PROCEDURE [dbo].[sp_MMEPhysicalDimensionsUpdateInsert]
@s_GUID uniqueidentifier = null
,@PHYSICAL_DIMENSION nvarchar(50)
,@TEXT_L1 nvarchar(50)
,@TEXT_L2 nvarchar(50)
,@DEFAULT_UNIT nvarchar(50)
,@LENGTH_EXP int
,@TIME_EXP int
,@MASS_EXP int
,@ELECTRIC_CURRENT_EXP int
,@TEMPERATURE_EXP int
,@LUMINOUS_INTENSITY_EXP int
,@AMOUNT_OFSUBSTANCE_EXP int
,@VERSION int
,@DATE datetime
,@REMARKS nvarchar(50)
,@EXPIRED bit
,@SORTKEY nvarchar(50)
,@LAST_CHANGE datetime
,@LAST_CHANGE_TEXT nvarchar(50)
,@HISTORY nvarchar(50)
,@new_id int OUTPUT
,@errorNumber int output
,@errorMessage nvarchar(250) output
AS
BEGIN
set @errorNumber = 0
set @errorMessage = space(0)
if(exists(select * from [dbo].[MMEPhysicalDimensions] WHERE [s_GUID] = @s_GUID))
begin
set @new_id = 0
exec dbo.sp_MMEPhysicalDimensionsUpdate @s_GUID
,@PHYSICAL_DIMENSION
,@TEXT_L1
,@TEXT_L2
,@DEFAULT_UNIT
,@LENGTH_EXP
,@TIME_EXP
,@MASS_EXP
,@ELECTRIC_CURRENT_EXP
,@TEMPERATURE_EXP
,@LUMINOUS_INTENSITY_EXP
,@AMOUNT_OFSUBSTANCE_EXP
,@VERSION
,@DATE
,@REMARKS
,@EXPIRED
,@SORTKEY
,@LAST_CHANGE
,@LAST_CHANGE_TEXT
,@HISTORY
,@errorNumber output
,@errorMessage output
end
else
begin
exec dbo.sp_MMEPhysicalDimensionsInsert @s_GUID
,@PHYSICAL_DIMENSION
,@TEXT_L1
,@TEXT_L2
,@DEFAULT_UNIT
,@LENGTH_EXP
,@TIME_EXP
,@MASS_EXP
,@ELECTRIC_CURRENT_EXP
,@TEMPERATURE_EXP
,@LUMINOUS_INTENSITY_EXP
,@AMOUNT_OFSUBSTANCE_EXP
,@VERSION
,@DATE
,@REMARKS
,@EXPIRED
,@SORTKEY
,@LAST_CHANGE
,@LAST_CHANGE_TEXT
,@HISTORY
,@new_id OUTPUT
,@errorNumber output
,@errorMessage output
end
END
GO