Skip to main content

Notifications

Announcements

No record found.

Dynamics 365 general forum
Answered

How to get the item price list display the unit price based on the customer discount group?

Posted on by 73
I'm trying to customize the /./Pricing/ItemPriceList.rdlc/ report so that it displays the /unit price/ AND the /unit price discounted/ column that would represent the /unit price/ minus the discount given by the /Customer Discount Group/ value.
Here are my options:
 
If my item with a unit price of 100 belongs to the Item Disc. Group: /DISCOUNT4/, I would like to display in my /unit price discounted/ column the value 68 (=100-32%).
Any help would be greatly appreciated.
 
  • Verified answer
    LLEV Profile Picture
    LLEV 73 on at
    How to get the item price list display the unit price based on the customer discount group?
    I actually was able to make this work by creating a record of a "Price List Line" and creating a new column based on it.
    Here is my code:
    reportextension 50107 ReportItemListExtension extends "Item Price List"
    {
        RDLCLayout = 'StandardItemPriceList-extended.rdlc';
    
        dataset
        {
            add(Item)
            {
                column(SearchDesc_Lbl; SearchDesc_Lbl) { }
                column(Search_Description; "Search Description") { }
                column(Description2_Item; "Description 2") { }
                column(IdentifierCode_Item; "Identifier Code") { }
                column(ItemCategoryCode_Lbl; ItemCategoryCode_Lbl) { }
                column(ItemCategoryCode_Item; "Item Category Code") { }
                column(ItemDiscGroup_Item; "Item Disc. Group") { }
                column(PriceIncludesVAT_Item; "Price Includes VAT") { }
                column(StandardCost_Item; "Standard Cost") { }
                column(UnitListPrice_Item; "Unit List Price") { }
                column(DecGPrixUnitaireNet_Lbl; DecGPrixUnitaireNet_Lbl) { }
                column(DecGPrixUnitaireNetHT_Item; DecGPrixUnitaireNetHT) { }
                column(DecGPrixUnitaireNetHT_Txt_Item; DecGPrixUnitaireNetHT_Txt) { }
            }
            modify(Item)
            {
                trigger OnAfterAfterGetRecord()
                begin
                    if not ItemRec.get(Item."No.") then
                        Clear(ItemRec);
    
                    // Calculate the PU with discount
                    if (ItemRec."Unit Price" > 0) then begin
                        Clear(PriceListLineRec);
                        if (PriceSource."Source No." <> '') then begin
                            PriceListLineRec.SetFilter("Source No.", PriceSource."Source No.");
                        end;
                        if (ItemRec."Item Disc. Group" <> '') then begin
                            PriceListLineRec.SetFilter("Asset No.", ItemRec."Item Disc. Group");
                        end;
                        if (PriceListLineRec.FindSet() and (PriceListLineRec."Line Discount %" <> 0)) then begin
                            DecGPrixUnitaireNetHT := Round(ItemRec."Unit Price" * (100 - PriceListLineRec."Line Discount %") / 100, 0.01);
                        end
                        else
                            DecGPrixUnitaireNetHT := Round(ItemRec."Unit Price", 0.01);
                    end
                    else
                        DecGPrixUnitaireNetHT := 0.00;
                    DecGPrixUnitaireNetHT_Txt := Format(DecGPrixUnitaireNetHT, 0, '<Precision,2:3><Standard Format,0>');
                end;
            }
        }
    
        trigger OnPreReport()
        var
        begin
            IntGBlocCounter := 0;
        end;
    
        var
            IntGBlocCounter : Integer;
            ItemCategoryCode_Lbl: Label 'Category', Comment = 'Foo', MaxLength = 999, Locked = false;
            SearchDesc_Lbl: Label 'Search Description', Comment = 'Foo', MaxLength = 999, Locked = false;
            DecGPrixUnitaireNet_Lbl: Label 'Discounted Unit Price', Comment = 'Foo', MaxLength = 999, Locked = false;
            DecGPrixUnitaireNetHT: Decimal;
            DecGPrixUnitaireNetHT_Txt: Text[30];
            ItemRec: Record "Item";
            PriceListLineRec: Record "Price List Line";
    }
     
     
     
     

Helpful resources

Quick Links

Replay now available! Dynamics 365 Community Call (CRM Edition)

Catch up on the first D365 Community Call held on 7/10

Community Spotlight of the Month

Kudos to Saurav Dhyani!

Congratulations to the June Top 10 community leaders!

These stars go above and beyond . . .

Leaderboard

#1
André Arnaud de Calavon Profile Picture

André Arnaud de Cal... 288,768 Super User

#2
Martin Dráb Profile Picture

Martin Dráb 225,985 Super User

#3
nmaenpaa Profile Picture

nmaenpaa 101,148

Leaderboard

Featured topics

Product updates

Dynamics 365 release plans