USP_DATAFORMTEMPLATE_EDIT_COURSEGRADING

The save procedure used by the edit dataform template "Course Grading Edit Data Form".

Parameters

Parameter	Parameter Type	Mode	Description
@ID	uniqueidentifier	IN	The input ID parameter indicating the ID of the record being edited.
@CHANGEAGENTID	uniqueidentifier	IN	Input parameter indicating the ID of the change agent invoking the procedure.
@COURSEID	uniqueidentifier	IN	Course ID
@SESSIONSTARTDATE	date	IN	Session
@SESSIONENDDATE	date	IN	Session
@COURSEGRADINGMARKINGCOLUMNS	xml	IN	Marking columns

Definition

Copy



CREATE procedure dbo.USP_DATAFORMTEMPLATE_EDIT_COURSEGRADING (
    @ID uniqueidentifier,
    @CHANGEAGENTID uniqueidentifier = null,
    @COURSEID uniqueidentifier,
    @SESSIONSTARTDATE date,
    @SESSIONENDDATE date,
    @COURSEGRADINGMARKINGCOLUMNS xml
)
as
    set nocount on;

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

    declare @CURRENTDATE datetime
    set @CURRENTDATE = getdate()

    if not exists(select ID from dbo.COURSEGRADING where (ID = @ID) and ((STARTDATE = @SESSIONSTARTDATE) and (ENDDATE = @SESSIONENDDATE)))
        raiserror('BBERR_COURSEGRADING_SESSIONCANNOTBECHANGED', 13, 1)

    begin try
        --Shouldn't need any of this. The Session can't be changed, which means the dates can't be changed.

        -- handle updating the data

        --update dbo.COURSEGRADING set

        --    STARTDATE = (select STARTDATE from dbo.SESSION where ID = @SESSIONID),

        --    ENDDATE = (select ENDDATE from dbo.SESSION where ID = @SESSIONID),

        --    CHANGEDBYID = @CHANGEAGENTID,

        --    DATECHANGED = @CURRENTDATE

        --where ID = @ID


        exec dbo.USP_COURSEGRADING_GETMARKINGCOLUMNS_UPDATEFROMXML @ID, @COURSEID, @SESSIONSTARTDATE, @SESSIONENDDATE, @COURSEGRADINGMARKINGCOLUMNS, @CHANGEAGENTID, @CURRENTDATE        

        if not exists(select ID from dbo.COURSEGRADINGMARKINGCOLUMN where COURSEGRADINGID = @ID)
            raiserror('BBERR_COURSEGRADING_ATLEASTONEMARKINGCOLUMN', 13, 1)

    end try
    begin catch
        exec dbo.USP_RAISE_ERROR
        return 1
    end catch

return 0;