USP_DATAFORMTEMPLATE_EDIT_EDUCATIONALINVOLVEMENT

The save procedure used by the edit dataform template "Educational Involvement Edit 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.
@EDUCATIONALINVOLVEMENTTYPECODEID	uniqueidentifier	IN	Type
@NAME	nvarchar(150)	IN	Name
@DATEFROM	UDT_FUZZYDATE	IN	Date from
@DATETO	UDT_FUZZYDATE	IN	Date to
@EDUCATIONALINSTITUTIONID	uniqueidentifier	IN	Educational institution
@COMMENT	nvarchar(500)	IN	Comment
@EDUCATIONALINVOLVEMENTAWARDCODEID	uniqueidentifier	IN	Award

Definition

Copy



                    CREATE procedure dbo.USP_DATAFORMTEMPLATE_EDIT_EDUCATIONALINVOLVEMENT
                    (
                        @ID uniqueidentifier,
                        @CHANGEAGENTID uniqueidentifier = null,
                        @EDUCATIONALINVOLVEMENTTYPECODEID uniqueidentifier,
                        @NAME nvarchar(150),
                        @DATEFROM dbo.UDT_FUZZYDATE,
                        @DATETO dbo.UDT_FUZZYDATE,
                        @EDUCATIONALINSTITUTIONID uniqueidentifier,
                        @COMMENT nvarchar(500),
                        @EDUCATIONALINVOLVEMENTAWARDCODEID uniqueidentifier
                    )
                    as
                        set nocount on;

                        declare @CURRENTDATE datetime;
                        set @CURRENTDATE = getdate();

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

                        begin try
                            declare @EDUCATIONALINVOLVEMENTNAMEID uniqueidentifier;
                            select @EDUCATIONALINVOLVEMENTNAMEID = ID
                            from EDUCATIONALINVOLVEMENTNAME EIN
                            where EIN.NAME = @NAME and EIN.EDUCATIONALINVOLVEMENTTYPECODEID = @EDUCATIONALINVOLVEMENTTYPECODEID

                            if @EDUCATIONALINVOLVEMENTNAMEID is null
                            begin
                                set @EDUCATIONALINVOLVEMENTNAMEID = newid();
                                insert into EDUCATIONALINVOLVEMENTNAME
                                (
                                    NAME,
                                    EDUCATIONALINVOLVEMENTTYPECODEID,
                                    ADDEDBYID, 
                                    CHANGEDBYID, 
                                    DATEADDED, 
                                    DATECHANGED
                                )
                                values
                                (
                                    @NAME,
                                    @EDUCATIONALINVOLVEMENTTYPECODEID,
                                    @CHANGEAGENTID,
                                    @CHANGEAGENTID,
                                    @CURRENTDATE,
                                    @CURRENTDATE
                                )
                            end

                            update dbo.EDUCATIONALINVOLVEMENT
                            set
                                EDUCATIONALINVOLVEMENTTYPECODEID = @EDUCATIONALINVOLVEMENTTYPECODEID,
                                EDUCATIONALINVOLVEMENTNAMEID = @EDUCATIONALINVOLVEMENTNAMEID,
                                DATEFROM = @DATEFROM,
                                DATETO = @DATETO,
                                EDUCATIONALINSTITUTIONID = @EDUCATIONALINSTITUTIONID,
                                COMMENT = @COMMENT,
                                EDUCATIONALINVOLVEMENTAWARDCODEID = @EDUCATIONALINVOLVEMENTAWARDCODEID,
                                CHANGEDBYID = @CHANGEAGENTID, 
                                DATECHANGED = @CURRENTDATE
                            where
                                ID = @ID;
                        end try

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

                        return 0;