USP_R68PROCESSCOMMITEXCEPTION_INSERT

Parameters

Parameter	Parameter Type	Mode
@MESSAGE	nvarchar(1024)	IN
@FULLMESSAGE	nvarchar(max)	IN
@R68PROCESSCOMMITPARAMETERSID	uniqueidentifier	IN
@REVENUESPLITID	uniqueidentifier	IN
@TYPE	tinyint	IN
@CHANGEAGENTID	uniqueidentifier	IN

Definition

Copy



CREATE PROCEDURE USP_R68PROCESSCOMMITEXCEPTION_INSERT
  --@ID uniqueidentifier = NULL OUT,

  @MESSAGE nvarchar(1024),
  @FULLMESSAGE nvarchar(max),
  @R68PROCESSCOMMITPARAMETERSID uniqueidentifier,
  @REVENUESPLITID uniqueidentifier,
  @TYPE tinyint,
  @CHANGEAGENTID uniqueidentifier = NULL
AS

BEGIN TRAN

if @CHANGEAGENTID is null  
    exec dbo.USP_CHANGEAGENT_GETORCREATECHANGEAGENT @CHANGEAGENTID output

INSERT INTO dbo.R68PROCESSCOMMITEXCEPTION
    (        [MESSAGE],
      [FULLMESSAGE],
      [R68PROCESSCOMMITPARAMETERSID],
      [REVENUESPLITID],
      [TYPECODE],
      [ADDEDBYID],
      [CHANGEDBYID],
      [DATEADDED],
      [DATECHANGED]
    )
VALUES
    (
      @MESSAGE,
      @FULLMESSAGE,
      @R68PROCESSCOMMITPARAMETERSID,
      @REVENUESPLITID,
      @TYPE,
      @CHANGEAGENTID,
      @CHANGEAGENTID,
      Getdate(),
      GetDate()
    )

IF @@ERROR <> 0
    ROLLBACK TRAN
ELSE
    COMMIT TRAN