USP_CURRENCYSET_VALIDATETRANSACTIONCURRENCIES

            create procedure dbo.USP_CURRENCYSET_VALIDATETRANSACTIONCURRENCIES
            (
                @BASECURRENCYID uniqueidentifier,
                @TRANSACTIONCURRENCIES xml
            )
            with execute as caller
            as
                if not exists
                (
                    select
                        1
                    from
                        @TRANSACTIONCURRENCIES.nodes('/TRANSACTIONCURRENCIES/ITEM') TRANSACTIONCURRENCY(ITEM)
                    where
                        TRANSACTIONCURRENCY.ITEM.value('CURRENCYID[1]', 'uniqueidentifier') = @BASECURRENCYID
                )
                    begin
                        raiserror('BBERR_BASECURRENCYMUSTBETRANSACTIONCURRENCY : The base currency must be a transaction currency.', 13, 1);
                        return 1;
                    end

                return 0;