USP_DATAFORMTEMPLATE_ADD_PAYABLES_VENDOR

The save procedure used by the add dataform template "Payables Vendor Add Form".

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.
@CONSTITUENTID	uniqueidentifier	IN	Constituent
@CUSTOMERNUMBER	nvarchar(20)	IN	Customer number
@PAYMENTTERMID	uniqueidentifier	IN	Payment terms
@PAYMENTMETHODCODE	tinyint	IN	Payment method
@INCLUDEIN1099	bit	IN	Include in 1099 reporting

Definition

Copy



CREATE procedure dbo.USP_DATAFORMTEMPLATE_ADD_PAYABLES_VENDOR
(
    @ID uniqueidentifier = null output,
    @CHANGEAGENTID uniqueidentifier = null,
    @CONSTITUENTID uniqueidentifier,
    @CUSTOMERNUMBER nvarchar(20) = '',
    @PAYMENTTERMID uniqueidentifier = null,
    @PAYMENTMETHODCODE tinyint = 0,
    @INCLUDEIN1099 bit = 0
)
as

set nocount on;

if not @ID is null and @ID<>@CONSTITUENTID
  RAISERROR('When @ID is specified, it needs to match @CONSTITUENTID. They are the same key.',1,100)


set @ID =  @CONSTITUENTID;

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

declare @CURRENTDATE datetime
set @CURRENTDATE = getdate()

begin try
    -- handle inserting the data

    insert into dbo.VENDOR
        (ID, CUSTOMERNUMBER, PAYMENTTERMID, PAYMENTMETHODCODE, INCLUDEIN1099, TAXIDNUMBER, ADDEDBYID, CHANGEDBYID, DATEADDED, DATECHANGED)
    values
        (@ID, @CUSTOMERNUMBER, @PAYMENTTERMID, @PAYMENTMETHODCODE, @INCLUDEIN1099, '', @CHANGEAGENTID, @CHANGEAGENTID, @CURRENTDATE, @CURRENTDATE)

  if @INCLUDEIN1099 = 1
    insert into dbo.VENDOR1099SETTING
      (ID, CHECK1099BOX9, CHECK10992TIN, NAMEFIRSTLINEALIASTYPECODEID, NAMESECONDLINEALIASTYPECODEID, ADDRESSID, ADDEDBYID, CHANGEDBYID, DATEADDED, DATECHANGED)
    values
      (@ID, 0, 0, null, null, null, @CHANGEAGENTID, @CHANGEAGENTID, @CURRENTDATE, @CURRENTDATE)
end try

begin catch
    exec dbo.USP_RAISE_ERROR
    return 1
end catch

return 0