USP_STEWARDSHIPPLAN_DELETE

Executes the "Stewardship Plan Delete" record operation.

Parameters

Parameter Parameter Type Mode Description
@ID uniqueidentifier IN Input parameter indicating the ID of the record being deleted.
@CHANGEAGENTID uniqueidentifier IN Input parameter indicating the ID of the change agent invoking the delete.

Definition

Copy


CREATE procedure dbo.USP_STEWARDSHIPPLAN_DELETE(
    @ID uniqueidentifier,
    @CHANGEAGENTID uniqueidentifier
)
as begin
    begin try        
        declare @CHANGEDATE datetime;
        set @CHANGEDATE = getDate();

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

        -- StewardshipPlanStep table cascades delete from plan


        --clean up stewardship notes associated with this plan

           if exists(select object_id from sys.objects where type = 'U' and name = 'STEWARDSHIPNOTE')
        begin
            delete from dbo.STEWARDSHIPNOTE where
                STEWARDSHIPNOTE.PLANID = @ID
        end

    --clean up stewardship media links associated with this plan

    if exists(select object_id from sys.objects where type = 'U' and name = 'STEWARDSHIPMEDIALINK')
        begin
            delete from 
        dbo.STEWARDSHIPMEDIALINK
      where
                STEWARDSHIPMEDIALINK.PLANID = @ID
    end

    --clean up stewardship attachments associated with this plan

    if exists(select object_id from sys.objects where type = 'U' and name = 'STEWARDSHIPATTACHMENT')
        begin
            delete from 
        dbo.STEWARDSHIPATTACHMENT
      where
                STEWARDSHIPATTACHMENT.PLANID = @ID
    end 

        exec dbo.USP_STEWARDSHIPPLAN_DELETEBYID_WITHCHANGEAGENTID @ID, @CHANGEAGENTID
    end try
    begin catch
        exec dbo.USP_RAISE_ERROR;
        return 1;
    end catch

    return 0;
end