USP_PLANNEDGIFTREVENUE_GENERATEGLDISTRIBUTIONS

Generates GL distributions for planned gift revenue.

Parameters

Parameter Parameter Type Mode Description
@ID uniqueidentifier IN
@CHANGEAGENTID uniqueidentifier IN

Definition

Copy


create procedure dbo.USP_PLANNEDGIFTREVENUE_GENERATEGLDISTRIBUTIONS
(
  @ID uniqueidentifier,
  @CHANGEAGENTID uniqueidentifier
)
as begin
  set nocount on;

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

    declare @CURRENTDATE datetime = getdate();

    declare @PLANNEDGIFTID uniqueidentifier;
    declare @VEHICLECODE smallint;
    declare @ISADDITION bit;

    select
      @PLANNEDGIFTID = PLANNEDGIFTREVENUE.PLANNEDGIFTID,
      @VEHICLECODE = PLANNEDGIFT.VEHICLECODE,
      @ISADDITION = PLANNEDGIFTREVENUE.ISADDITION
    from
      dbo.V_PLANNEDGIFTREVENUE_WITHADDITIONS as PLANNEDGIFTREVENUE
    inner join
      dbo.PLANNEDGIFT on PLANNEDGIFTREVENUE.PLANNEDGIFTID = PLANNEDGIFT.ID
    where
      PLANNEDGIFTREVENUE.REVENUEID = @ID

    exec dbo.USP_SAVE_REVENUEGLDISTRIBUTION @ID, @CHANGEAGENTID, @CURRENTDATE;

    if (@VEHICLECODE = 0 or @VEHICLECODE = 5 or @VEHICLECODE = 6) and @ISADDITION = 0 and dbo.UFN_INSTALLEDPRODUCTS_PRODUCTIS('0E85C527-E6E9-4C5F-A8E8-105FD0E18FE7') = 1
      exec dbo.USP_SAVE_PLANNEDGIFTPAYOUTGLDISTRIBUTION @ID, @PLANNEDGIFTID, @CHANGEAGENTID, @CURRENTDATE;

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

  return 0
end