USP_DATAFORMTEMPLATE_ADD_RECEIPTINGPROCESS_3

The save procedure used by the add dataform template "Receipting Process Add Form 3".

Parameters

Parameter Parameter Type Mode Description
@ID uniqueidentifier INOUT The output parameter indicating the ID of the record added.
@CHANGEAGENTID uniqueidentifier IN Input parameter indicating the ID of the change agent invoking the procedure.
@NAME nvarchar(100) IN Name
@IDSETREGISTERID uniqueidentifier IN Selection
@DESCRIPTION nvarchar(255) IN Description
@CREATEOUTPUTIDSET bit IN Create selection from results
@OUTPUTIDSETRECORDTYPEID uniqueidentifier IN Selection type
@OUTPUTIDSETNAME nvarchar(100) IN Selection name
@OVERWRITEOUTPUTIDSET bit IN Overwrite existing selection
@MARKRECEIPTED bit IN Mark revenue 'Receipted' when process completes
@BUSINESSPROCESSVIEWID uniqueidentifier IN Output format
@LETTERFILENAME nvarchar(255) IN Letter template
@LETTERFILE varbinary IN File
@LABELFILENAME nvarchar(255) IN Label template
@LABELFILE varbinary IN LABELFILE
@RECEIPTDATETYPECODE tinyint IN Receipt date
@RECEIPTDATE datetime IN Receipt date
@CURRENTAPPUSERID uniqueidentifier IN Input parameter indicating the ID of the current user.
@EXCLUSIONDATETYPECODE tinyint IN Consider exclusions as of
@EXCLUSIONASOFDATE datetime IN Consider exclusions as of
@EXCLUDEDECEASED bit IN Exclude deceased constituents
@EXCLUDEINACTIVE bit IN Exclude inactive constituents
@EXCLUSIONS xml IN Exclusions
@CUSTOMPARAMETERDATAFORMITEM xml IN
@RECEIPTTYPECODE tinyint IN Receipt type
@EXPORTDEFINITIONID uniqueidentifier IN Export definition
@RECEIPTSTACKID uniqueidentifier IN Receipt stack
@RERECEIPTSAMENUMBER bit IN Include re-receipt payments that use the same receipt number
@RERECEIPTNEWNUMBER bit IN Include re-receipt payments that receive a new receipt number
@DUPLICATENUMBERACTIONCODE tinyint IN If new receipt ID is a duplicate
@STARTINGNUMBERCREATESGAPACTIONCODE tinyint IN If new receipt ID leaves a gap
@SITEID uniqueidentifier IN Site

Definition

Copy


CREATE procedure dbo.USP_DATAFORMTEMPLATE_ADD_RECEIPTINGPROCESS_3
(
  @ID uniqueidentifier = null output,                        
  @CHANGEAGENTID uniqueidentifier = null,    
  @NAME nvarchar(100)=''
  @IDSETREGISTERID uniqueidentifier = null
  @DESCRIPTION nvarchar(255)=''
  @CREATEOUTPUTIDSET bit = 0,
  @OUTPUTIDSETRECORDTYPEID uniqueidentifier = null
  @OUTPUTIDSETNAME nvarchar(100) = '' ,
  @OVERWRITEOUTPUTIDSET bit = 0,
  @MARKRECEIPTED bit = 0,
  @BUSINESSPROCESSVIEWID uniqueidentifier = null,
  @LETTERFILENAME nvarchar(255) = null,
  @LETTERFILE varbinary(max) = null,
  @LABELFILENAME nvarchar(255) = null,
  @LABELFILE varbinary(max) = null,
  @RECEIPTDATETYPECODE tinyint = 0,
  @RECEIPTDATE datetime = null,
  @CURRENTAPPUSERID uniqueidentifier,
  @EXCLUSIONDATETYPECODE tinyint = 0,
  @EXCLUSIONASOFDATE datetime = null,
  @EXCLUDEDECEASED bit = 1,
  @EXCLUDEINACTIVE bit = 1,
  @EXCLUSIONS xml = null,
  @CUSTOMPARAMETERDATAFORMITEM xml = null,
  @RECEIPTTYPECODE tinyint = 0,
  --@OVERRIDEREQUIREDEXCLUSIONS bit = 0,

  --@REQUIREDEXCLUSIONS xml = null,

  @EXPORTDEFINITIONID uniqueidentifier = null,
  @RECEIPTSTACKID uniqueidentifier = null
  @RERECEIPTSAMENUMBER bit = 1,
  @RERECEIPTNEWNUMBER bit =1,
  @DUPLICATENUMBERACTIONCODE tinyint = 1,
  @STARTINGNUMBERCREATESGAPACTIONCODE tinyint = 0,
  @SITEID uniqueidentifier = null
)
as
begin
  set nocount on

  declare @CURRENTDATE datetime                                        

  if @ID is null
    set @ID = newid()

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

  set @CURRENTDATE = getdate()

  if @RECEIPTSTACKID is null
    select @RECEIPTSTACKID = ID from RECEIPTSTACKINFO where ISDEFAULT = 1;

  begin try
    if (@SITEID is not null
    begin
      if dbo.UFN_SITEALLOWEDFORUSER(@CURRENTAPPUSERID, @SITEID) = 0 begin
        raiserror ('ERR_SITE_NOACCESS',13,1);
        return 1;
      end
    end
    /*
    else if (@SITEID is null)
    begin
      if dbo.UFN_SITEREQUIREDFORUSER(@CURRENTAPPUSERID) = 1
      begin
        raiserror('BBERR_SITEREQUIRED',13,1);
        return 1;
      end
    end
    */

    declare @RECORDTYPE nvarchar(100)
    if @EXPORTDEFINITIONID is not null
    begin
      select @RECORDTYPE = dbo.UFN_EXPORTDEFINITION_GETRECORDTYPE(@EXPORTDEFINITIONID)
        if @RECORDTYPE <> 'Revenue'
          raiserror('BBERR_RECEIPTINGPROCESS_EXPORTDEFINITIONINVALID', 13, 1);
    end

    insert into dbo.RECEIPTINGPROCESS
      (ID, NAME, DESCRIPTION, IDSETREGISTERID, CREATEOUTPUTIDSET, OUTPUTIDSETRECORDTYPEID, OUTPUTIDSETNAME, OVERWRITEOUTPUTIDSET, BUSINESSPROCESSVIEWID, MARKRECEIPTED, RECEIPTDATETYPECODE, RECEIPTDATE, LETTERFILENAME, LETTERFILE, LABELFILENAME, LABELFILE, RECEIPTTYPECODE, ADDEDBYID, CHANGEDBYID, DATEADDED, DATECHANGED, CUSTOMPARAMETERDATAFORMITEM, EXPORTDEFINITIONID, RECEIPTSTACKINFOID,RERECEIPTSAMENUMBER,RERECEIPTNEWNUMBER,DUPLICATENUMBERACTIONCODE,STARTINGNUMBERCREATESGAPACTIONCODE)
    values
      (@ID, @NAME, @DESCRIPTION, @IDSETREGISTERID, @CREATEOUTPUTIDSET, @OUTPUTIDSETRECORDTYPEID, @OUTPUTIDSETNAME, @OVERWRITEOUTPUTIDSET, @BUSINESSPROCESSVIEWID, @MARKRECEIPTED, @RECEIPTDATETYPECODE, @RECEIPTDATE, @LETTERFILENAME, @LETTERFILE, @LABELFILENAME, @LABELFILE, @RECEIPTTYPECODE, @CHANGEAGENTID, @CHANGEAGENTID, @CURRENTDATE, @CURRENTDATE, @CUSTOMPARAMETERDATAFORMITEM, @EXPORTDEFINITIONID, @RECEIPTSTACKID,@RERECEIPTSAMENUMBER,@RERECEIPTNEWNUMBER,@DUPLICATENUMBERACTIONCODE,@STARTINGNUMBERCREATESGAPACTIONCODE)

    exec dbo.USP_BUSINESSPROCESSINSTANCE_ADD @CHANGEAGENTID = @CHANGEAGENTID
            @BUSINESSPROCESSCATALOGID = '83048DED-208E-45c9-852C-E7D5C7317882'
            @BUSINESSPROCESSPARAMETERSETID = @ID
            @OWNERID = @CURRENTAPPUSERID, @SITEID = @SITEID;

    exec dbo.USP_BUSINESSPROCESSCOMMPREF_ADD @CHANGEAGENTID = @CHANGEAGENTID,
                          @BUSINESSPROCESSCATALOGID = '83048DED-208E-45c9-852C-E7D5C7317882',
                          @BUSINESSPROCESSPARAMETERSETID = @ID,
                          @EXCLUSIONDATETYPECODE = @EXCLUSIONDATETYPECODE,
                          @EXCLUSIONASOFDATE = @EXCLUSIONASOFDATE,
                          @EXCLUDEDECEASED = @EXCLUDEDECEASED,
                          @EXCLUDEINACTIVE = @EXCLUDEINACTIVE,
                          @EXCLUSIONS = @EXCLUSIONS,
                          --@OVERRIDEREQUIREDEXCLUSIONS = @OVERRIDEREQUIREDEXCLUSIONS,

                          --@REQUIREDEXCLUSIONS = @REQUIREDEXCLUSIONS,

                          @CURRENTAPPUSERID = @CURRENTAPPUSERID;

  end try

  begin catch
    exec dbo.USP_RAISE_ERROR
    return 1
  end catch

  return 0
end