USP_DATAFORMTEMPLATE_EDIT_SCHOOLDETAILS

The save procedure used by the edit dataform template "SchoolDetails 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.
@NAME nvarchar(100) IN Name
@GENDERCODE tinyint IN School gender
@WEBADDRESS UDT_WEBADDRESS IN Website
@SCHOOLGRADELEVELS xml IN
@COMMENTCODE tinyint IN Grade comment entry

Definition

Copy


          CREATE procedure dbo.USP_DATAFORMTEMPLATE_EDIT_SCHOOLDETAILS (
              @ID uniqueidentifier,
              @CHANGEAGENTID uniqueidentifier = null,
              @NAME nvarchar(100),
              @GENDERCODE tinyint,
              @WEBADDRESS dbo.UDT_WEBADDRESS,
              @SCHOOLGRADELEVELS xml,
              @COMMENTCODE tinyint
          )
          as

              set nocount on;

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

              declare @CURRENTDATE datetime
              set @CURRENTDATE = getdate()

              begin try
                  -- Update the organization data

                  update dbo.CONSTITUENT set
                      dbo.CONSTITUENT.WEBADDRESS = @WEBADDRESS,
                      dbo.CONSTITUENT.KEYNAME = @NAME,
                      CHANGEDBYID = @CHANGEAGENTID,
                      DATECHANGED = @CURRENTDATE
                  where ID = @ID

                  --Check to see if the name is still unique

                  if (dbo.UFN_SCHOOL_NAMEISUNIQUE(@ID)=0)
                      RAISERROR('UFN_SCHOOL_NAMEISUNIQUE', 16, 1);

                  -- update the school data

                  update dbo.SCHOOL set
                      GENDERCODE = @GENDERCODE,
                      CHANGEDBYID = @CHANGEAGENTID,
                      DATECHANGED = @CURRENTDATE,
                      COMMENTCODE = @COMMENTCODE
                  where ID = @ID

                  exec dbo.USP_SCHOOL_GETGRADELEVELS_UPDATEFROMXML @ID, @SCHOOLGRADELEVELS, @CHANGEAGENTID, @CURRENTDATE

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

          return 0;