Files
DP44/DataPRO_sql/dbo.sp_MMEFiguresInsertUpdate.StoredProcedure.sql

116 lines
4.8 KiB
MySQL
Raw Permalink Normal View History

2026-04-17 14:55:32 -04:00
<EFBFBD><EFBFBD>IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[sp_MMEFiguresInsertUpdate]') AND type in (N'P', N'PC'))
DROP PROCEDURE [dbo].[sp_MMEFiguresInsertUpdate]
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_MMEFiguresInsertUpdate]') AND type in (N'P', N'PC'))
BEGIN
EXEC dbo.sp_executesql @statement = N'CREATE PROCEDURE [dbo].[sp_MMEFiguresInsertUpdate] AS'
END
GO
ALTER PROCEDURE [dbo].[sp_MMEFiguresInsertUpdate]
@ID int
,@txtShortName nvarchar(100)
,@txtDescription nvarchar(255)
,@txtRemarks nvarchar(255)
,@datRevision datetime
,@intAuthor int
,@intPage smallint
,@intPages smallint
,@txtImageFile nvarchar(50)
,@intVersion int
,@bolExpired bit
,@txtSortkey nvarchar(50)
,@bitStdPath bit
,@IntIDStdPath int
,@txtPath nvarchar(255)
,@LAST_CHANGE datetime
,@LAST_CHANGE_TEXT nvarchar(255)
,@HISTORY nvarchar(max)
,@errorNumber int output
,@errorMessage nvarchar(250) output
AS
BEGIN
set @errorNumber = 0
set @errorMessage = space(0)
if(exists(select ID from [dbo].[MMEFigures] where Id = @ID))
begin
exec dbo.sp_MMEFiguresUpdate @ID
,@txtShortName
,@txtDescription
,@txtRemarks
,@datRevision
,@intAuthor
,@intPage
,@intPages
,@txtImageFile
,@intVersion
,@bolExpired
,@txtSortkey
,@bitStdPath
,@IntIDStdPath
,@txtPath
,@LAST_CHANGE
,@LAST_CHANGE_TEXT
,@HISTORY
,@errorNumber output
,@errorMessage output
end
else
begin
exec dbo.sp_MMEFiguresInsert @ID
,@txtShortName
,@txtDescription
,@txtRemarks
,@datRevision
,@intAuthor
,@intPage
,@intPages
,@txtImageFile
,@intVersion
,@bolExpired
,@txtSortkey
,@bitStdPath
,@IntIDStdPath
,@txtPath
,@LAST_CHANGE
,@LAST_CHANGE_TEXT
,@HISTORY
,@errorNumber output
,@errorMessage output
end
END
GO