USP_DATAFORMTEMPLATE_ADD_PDACCOUNTCODEMAPDEVELOPMENTAUCTIONGAINLOSS

The save procedure used by the add dataform template "Map Development Auction Purchase Gain Loss Add Form".

Parameters

Parameter	Parameter Type	Mode	Description
@SYSTEMID	uniqueidentifier	IN	Input parameter indicating the context ID for the record being added.
@ID	uniqueidentifier	INOUT	The output parameter indicating the ID of the record added.
@CHANGEAGENTID	uniqueidentifier	IN	Input parameter indicating the ID of the change agent invoking the procedure.
@REVENUETYPES	xml	IN	Transaction types
@DEBITGLACCOUNTID	uniqueidentifier	IN	Account
@DEBITPDACCOUNTSEGMENTVALUEID	uniqueidentifier	IN	Account code
@CREDITGLACCOUNTID	uniqueidentifier	IN	Account
@CREDITPDACCOUNTSEGMENTVALUEID	uniqueidentifier	IN	Account code
@PDACCOUNTSYSTEMID	uniqueidentifier	IN
@PAYMENTMETHODS	xml	IN	Payment methods
@SUBTYPETWO	xml	IN	Credit card subtypes

Definition

Copy


    CREATE procedure dbo.USP_DATAFORMTEMPLATE_ADD_PDACCOUNTCODEMAPDEVELOPMENTAUCTIONGAINLOSS
    (
        @SYSTEMID uniqueidentifier,
        @ID uniqueidentifier = null output,
        @CHANGEAGENTID uniqueidentifier = null,
        @REVENUETYPES xml = null,
        @DEBITGLACCOUNTID uniqueidentifier = null,
        @DEBITPDACCOUNTSEGMENTVALUEID uniqueidentifier = null,
        @CREDITGLACCOUNTID uniqueidentifier = null,
        @CREDITPDACCOUNTSEGMENTVALUEID uniqueidentifier = null,
        @PDACCOUNTSYSTEMID uniqueidentifier = null,
        @PAYMENTMETHODS xml = null,
        @SUBTYPETWO xml = null
    )
    as

    set nocount on;

    if @ID is null
        set @ID = newid()

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

    declare @PaymentMethodsTable table (NameID int)

    declare @CURRENTDATE datetime
    set @CURRENTDATE = getdate()
    declare @PDACCOUNTCODEMAPOFFICEID uniqueidentifier
    set @PDACCOUNTCODEMAPOFFICEID = 'C4021214-DBB2-4FED-9CB0-6286C0A2DCAC'
    set @PDACCOUNTSYSTEMID = @SYSTEMID
    declare @OFFICEID int
    set @OFFICEID = 14
    begin try
        begin tran
            insert into @PaymentMethodsTable (NameID)
            select NameID from dbo.UFN_PDACCOUNTCODEMAPPING_PAYMENTMETHODS_FROMITEMLISTXML(@PAYMENTMETHODS)

            insert into dbo.PDACCOUNTCODEMAPPING
                (ID, REVENUETYPE, PAYMENTMETHOD, PDACCOUNTCODEMAPOFFICEID, OFFICEID, DEBITGLACCOUNTID, DEBITPDACCOUNTSEGMENTVALUEID, CREDITGLACCOUNTID, CREDITPDACCOUNTSEGMENTVALUEID,ADDEDBYID, CHANGEDBYID, DATEADDED, DATECHANGED,PDACCOUNTSYSTEMID)
            values
                (@ID, (select sum(NAMEID) from dbo.UFN_PDACCOUNTCODEMAPPING_REVENUETYPES_FROMITEMLISTXML(@REVENUETYPES)), (select sum(NAMEID) from @PaymentMethodsTable), @PDACCOUNTCODEMAPOFFICEID, @OFFICEID, @DEBITGLACCOUNTID, @DEBITPDACCOUNTSEGMENTVALUEID, @CREDITGLACCOUNTID, @CREDITPDACCOUNTSEGMENTVALUEID, @CHANGEAGENTID, @CHANGEAGENTID, @CURRENTDATE, @CURRENTDATE, @SYSTEMID)

            if exists(select * from @PaymentMethodsTable where NameID = 4)   --Credit card
              begin
              if not exists (select * from dbo.UFN_PDACCOUNTCODEMAPPINGSUBTYPE_SUBTYPETWO_FROMITEMLISTXML(@SUBTYPETWO) where SUBTYPETWOID = '99999999-9999-9999-9999-999999999999') 
                insert into dbo.PDACCOUNTCODEMAPPINGSUBTYPE (ADDITIONALSUBTYPE, PDACCOUNTCODEMAPPINGID, SUBTYPEID, ADDEDBYID, CHANGEDBYID, DATEADDED, DATECHANGED)
                select 2, @ID, SUBTYPETWOID, @CHANGEAGENTID, @CHANGEAGENTID, @CURRENTDATE, @CURRENTDATE from dbo.UFN_PDACCOUNTCODEMAPPINGSUBTYPE_SUBTYPETWO_FROMITEMLISTXML(@SUBTYPETWO)
              else
                insert into dbo.PDACCOUNTCODEMAPPINGSUBTYPE (ADDITIONALSUBTYPE, PDACCOUNTCODEMAPPINGID, SUBTYPEID, ADDEDBYID, CHANGEDBYID, DATEADDED, DATECHANGED)
                values 
                (2, @ID, '99999999-9999-9999-9999-999999999999', @CHANGEAGENTID, @CHANGEAGENTID, @CURRENTDATE, @CURRENTDATE)
              end

            --Original - before adding paymentmethods
            --insert into dbo.PDACCOUNTCODEMAPPING
            --    (ID, REVENUETYPE, PDACCOUNTCODEMAPOFFICEID, OFFICEID, DEBITGLACCOUNTID, DEBITPDACCOUNTSEGMENTVALUEID, CREDITGLACCOUNTID, CREDITPDACCOUNTSEGMENTVALUEID, ADDEDBYID, CHANGEDBYID, DATEADDED, DATECHANGED, PDACCOUNTSYSTEMID)
            --values
            --    (@ID, (select sum(NAMEID) from dbo.UFN_PDACCOUNTCODEMAPPING_REVENUETYPES_FROMITEMLISTXML(@REVENUETYPES)), @PDACCOUNTCODEMAPOFFICEID, @OFFICEID, @DEBITGLACCOUNTID, @DEBITPDACCOUNTSEGMENTVALUEID, @CREDITGLACCOUNTID, @CREDITPDACCOUNTSEGMENTVALUEID, @CHANGEAGENTID, @CHANGEAGENTID, @CURRENTDATE, @CURRENTDATE, @SYSTEMID)

        commit
    end try

    begin catch
        exec dbo.USP_RAISE_ERROR
        return 1
    end catch

    return 0