USP_DATAFORMTEMPLATE_ADD_SCHEDULEDATEADJUSTMENT

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

Parameters

Parameter	Parameter Type	Mode	Description
@ID	uniqueidentifier	INOUT	The output parameter indicating the ID of the record added.
@SESSIONID	uniqueidentifier	IN	Input parameter indicating the context ID for the record being added.
@DATE	date	IN	Date
@NEXTTIMETABLEDAYID	uniqueidentifier	IN	Change to
@ADJUSTEDTIMETABLEDAYID	uniqueidentifier	IN	Change to
@DESCRIPTION	varchar(255)	IN	Notes
@CHANGEAGENTID	uniqueidentifier	IN	Input parameter indicating the ID of the change agent invoking the procedure.

Definition

Copy



CREATE procedure dbo.USP_DATAFORMTEMPLATE_ADD_SCHEDULEDATEADJUSTMENT
(
    @ID uniqueidentifier = null output,
    @SESSIONID uniqueidentifier,
    @DATE date = null,
    @NEXTTIMETABLEDAYID uniqueidentifier = null,
    @ADJUSTEDTIMETABLEDAYID uniqueidentifier = null,
    @DESCRIPTION varchar(255) = null,
    @CHANGEAGENTID uniqueidentifier = null
)
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()

declare @SCHOOLID uniqueidentifier
select @SCHOOLID = SCHOOLID 
from 
    SESSION 
inner join ACADEMICYEAR 
    on SESSION.ACADEMICYEARID = ACADEMICYEAR.ID 
where SESSION.ID = @SESSIONID

begin try
    declare @contextCache varbinary(128)

    -- cache current context information 

    set @contextCache = CONTEXT_INFO()

    -- set CONTEXT_INFO to @CHANGEAGENTID 

    if not @CHANGEAGENTID is null
        set CONTEXT_INFO @CHANGEAGENTID

    -- delete existing adjustment if present

    delete 
        SCHEDULEDATEADJUSTMENT
    from 
        SCHEDULEDATEADJUSTMENT
    where 
        DATE = @DATE AND SCHOOLID = @SCHOOLID

    -- reset CONTEXT_INFO to previous value 

    if not @contextCache is null
        set CONTEXT_INFO @contextCache

    -- handle inserting the data

    insert into dbo.SCHEDULEDATEADJUSTMENT
        (ID, DATE, SCHOOLID, NEXTTIMETABLEDAYID, ADJUSTEDTIMETABLEDAYID, DESCRIPTION, ADDEDBYID, CHANGEDBYID, DATEADDED, DATECHANGED)
        values
        (@ID, @DATE, @SCHOOLID, @NEXTTIMETABLEDAYID, @ADJUSTEDTIMETABLEDAYID, @DESCRIPTION, @CHANGEAGENTID, @CHANGEAGENTID, @CURRENTDATE, @CURRENTDATE)

    -- set this so the cleanup will see the new adjustment as valid

    if @ADJUSTEDTIMETABLEDAYID is null 
        update SCHEDULEDATE set INSESSION = 0, TIMETABLEDAYID = null where DATE = @DATE and SCHOOLID = @SCHOOLID
    else
        update SCHEDULEDATE set INSESSION = 1, TIMETABLEDAYID = @ADJUSTEDTIMETABLEDAYID where DATE = @DATE and SCHOOLID = @SCHOOLID

    declare @TERMID uniqueidentifier
    set @TERMID = dbo.UFN_SCHEDULEDATE_GETTERM (@DATE, @SCHOOLID)

    exec dbo.USP_SCHEDULEDATE_ADJUSTENTRIES @TERMID, @DATE, null, null, @CHANGEAGENTID

end try

begin catch
    exec dbo.USP_RAISE_ERROR
    return 1
end catch

return 0