spTransactions_InsertDonation

CREATE PROCEDURE [dbo].[spTransactions_InsertDonation]
    (
    @ClientsID int,
    @ClientDonationsID int,
    @UserID int ,
    @xmlData ntext,
    @BackOfficeUserID int,
    @Status int
    )
    AS
    BEGIN

    if datalength(@xmlData)<8 begin
    RAISERROR ('Unable to insert transaction - DonationTransactions.XMLObjectData cannot be a zero-length string and must be well formed XML',16,1)
    return 0
    end

    begin tran    

    if @UserID=0 set @UserID=NULL

    insert into dbo.DonationTransactions
    (ClientsID,ClientDonationsID,AddedByUserID,XMLObjectData,[Status])
    values
    (@ClientsID,@ClientDonationsID,@UserID,@xmlData,@Status)

    --This will save the transaction into the BBNCTransactions Table
    Declare @BBNCTransactionsPKID int
    Set @BBNCTransactionsPKID = 0

    Declare @TransactionPKID int
    Set @TransactionPKID = @@identity

    Declare @TransactionType nvarchar(100)
    Set @TransactionType = '{5705B543-4033-4a3a-BBCD-A731403EE1E6}'

    if @Status = 1
    begin
        exec spTransactions_InsertTransaction @BBNCTransactionsPKID, @TransactionPKID, @TransactionType, @xmlData, @UserID, @BackOfficeUserID
    end

    if @@error = 0
    begin
    commit tran
    return @TransactionPKID
    end
    else
    begin
    rollback tran
    return 0
    end

    END