USP_REVENUE_GETSPLITS_ADDFROMXML

USP_REVENUE_GETSPLITS_ADDFROMXML

Parameters

Parameter Parameter Type Mode Description
@REVENUEID uniqueidentifier IN
@XML xml IN
@CHANGEAGENTID uniqueidentifier IN
@CHANGEDATE datetime IN

Definition

Copy


CREATE PROCEDURE [dbo].[USP_REVENUE_GETSPLITS_ADDFROMXML] 
(
@REVENUEID uniqueidentifier,
@XML xml,
@CHANGEAGENTID uniqueidentifier = null,
@CHANGEDATE datetime = null
)

as

set nocount on;

if @CHANGEAGENTID is null
    exec USP_CHANGEAGENT_GETORCREATECHANGEAGENT @CHANGEAGENTID output

if @CHANGEDATE is null
    set @CHANGEDATE = getdate()

declare @POSTSTATUSCODE tinyint;
declare @POSTDATE date;
select @POSTSTATUSCODE = case when FT.POSTSTATUSCODE = 2 then 1 else FT.POSTSTATUSCODE end, @POSTDATE = FT.POSTDATE
from dbo.FINANCIALTRANSACTION FT
where FT.ID = @REVENUEID;

-- build a temporary table containing the values from the XML

declare @TempTbl table (
   [AMOUNT] money,
   [APPLICATIONCODE] tinyint,
   [DESIGNATIONID] uniqueidentifier,
   [ID] uniqueidentifier,
   [TYPECODE] tinyint)

insert into @TempTbl select 
    [AMOUNT],
    [APPLICATIONCODE],
    [DESIGNATIONID],
    [ID],
    [TYPECODE] 
from dbo.UFN_REVENUE_GETSPLITS_FROMITEMLISTXML(@XML)

update @TempTbl set ID = newid() where (ID is null) or (ID = '00000000-0000-0000-0000-000000000000');

if @@Error <> 0
    return 1;

-- insert new items

insert into dbo.FINANCIALTRANSACTIONLINEITEM
    (FINANCIALTRANSACTIONID,
    BASEAMOUNT,
    ID,
    TYPECODE,
    ADDEDBYID,
    CHANGEDBYID,
    DATEADDED,
    DATECHANGED,
    ORGAMOUNT,
    TRANSACTIONAMOUNT,
    POSTDATE,
    POSTSTATUSCODE)
select @REVENUEID,
    AMOUNT,
    ID,
    0,
    @CHANGEAGENTID
    @CHANGEAGENTID
    @CHANGEDATE
    @CHANGEDATE,
    AMOUNT,
    AMOUNT,
    @POSTDATE,
    @POSTSTATUSCODE
from @TempTbl

insert into dbo.REVENUESPLIT_EXT
    (ID,
  TYPECODE,
    APPLICATIONCODE,
    DESIGNATIONID,
    ADDEDBYID,
    CHANGEDBYID,
    DATEADDED,
    DATECHANGED)
select ID,
  TYPECODE,
    APPLICATIONCODE,
    DESIGNATIONID,
    @CHANGEAGENTID
    @CHANGEAGENTID
    @CHANGEDATE
    @CHANGEDATE
from @TempTbl        

if @@Error <> 0
    return 2;

return 0;