USP_DATAFORMADD_PROGRAMSALESMETHOD

The save procedure used by the add dataform template "Add On-sale Information".

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.
@PROGRAMID	uniqueidentifier	IN	Input parameter indicating the context ID for the record being added.
@SALESMETHODID	uniqueidentifier	IN	Sales method
@ONSALETYPECODE	tinyint	IN	On-sale period begins
@ONSALEDATE	datetime	IN	Date
@ONSALETIME	char(4)	IN	Time
@ONSALETIMEBEFORE	int	IN	Time before
@ONSALEENDTYPECODE	tinyint	IN	On-sale period ends
@ONSALEENDINTERVAL	int	IN	Number of minutes

Definition

Copy



CREATE procedure dbo.USP_DATAFORMADD_PROGRAMSALESMETHOD
(
    @ID uniqueidentifier = null output,
    @CHANGEAGENTID uniqueidentifier = null,
    @PROGRAMID uniqueidentifier,
    @SALESMETHODID uniqueidentifier = null,
    @ONSALETYPECODE tinyint = 0,
    @ONSALEDATE datetime = null,
    @ONSALETIME char(4) = '0000',
    @ONSALETIMEBEFORE int = 0,
    @ONSALEENDTYPECODE tinyint = 0,
    @ONSALEENDINTERVAL int = 0
)
as
    set nocount on;

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

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

    declare @CURRENTDATE datetime
    set @CURRENTDATE = getdate()

    begin try
        insert into dbo.PROGRAMSALESMETHOD
        (
            ID,
            PROGRAMID,
            SALESMETHODID,
            ONSALETYPECODE,
            ONSALEDATE,
            ONSALETIME,
            ONSALETIMEBEFORE,
            ONSALEENDTYPECODE,
            ONSALEENDINTERVAL,
            ADDEDBYID,
            CHANGEDBYID,
            DATEADDED,
            DATECHANGED
        )
        values
        (
            @ID,
            @PROGRAMID,
            @SALESMETHODID,
            @ONSALETYPECODE,
            @ONSALEDATE,
            @ONSALETIME,
            @ONSALETIMEBEFORE,
            @ONSALEENDTYPECODE,
            @ONSALEENDINTERVAL,
            @CHANGEAGENTID,
            @CHANGEAGENTID,
            @CURRENTDATE,
            @CURRENTDATE
        )
    end try
    begin catch
        exec dbo.USP_RAISE_ERROR
        return 1
    end catch

    return 0;