UFN_PDACCOUNT_GETPROGRAM_3

            create function dbo.UFN_PDACCOUNT_GETPROGRAM_3
            (
                @REVENUESPLITINFORMATION xml
            ) returns uniqueidentifier
            As 
            begin
                declare @RESULT as uniqueidentifier;

                select @RESULT = REVENUESPLITINFORMATION.ORDERPROGRAMID 
                from dbo.UFN_REVENUESPLITINFORMATION_FROMITEMLISTXML(@REVENUESPLITINFORMATION) as REVENUESPLITINFORMATION;

                RETURN @RESULT;
            end