report 50103 "Vendor Collection"
{
DefaultLayout = RDLC;
RDLCLayout = 'VendorCollection.rdl';
UsageCategory = Administration;
ApplicationArea = All;
dataset
{
dataitem(VendLedgEntry; "Vendor Ledger Entry")
{
DataItemTableView = sorting("Vendor No.", "Entry No.");
RequestFilterFields = "Vendor No.", "Vendor Name", "Vendor Posting Group"; //RK added
// Example columns - no 'Caption' property here.
column(VendorNo; "Vendor No.")
{
}
column(VendorPostingDate; "Posting Date")
{
}
column(Amount; Amount)
{
}
column(CurrencyCode; "Currency Code")
{
}
column(RunningBalance; RunningBalance)
{
}
// Initialize and update RunningBalance
trigger OnPreDataItem()
begin
RunningBalance := 0;
end;
trigger OnAfterGetRecord()
begin
RunningBalance += Amount;
end;
}
}
// RK-start
requestpage
{
layout
{
area(Content)
{
group("Options")
{
field(ShowAmountsInLCY; ShowAmountsInLCY)
{
ApplicationArea = All;
Caption = 'Show Amounts in LCY';
}
field(NewPagePerVendor; NewPagePerVendor)
{
ApplicationArea = All;
Caption = 'New Page per Vendor';
}
field(ExcludeVendorsWithBalance; ExcludeVendorsWithBalance)
{
ApplicationArea = All;
Caption = 'Exclude Vendors That Have A Balance Only';
}
}
}
}
}
// RK-end
var
RunningBalance: Decimal;
// RK-start
ShowAmountsInLCY: Boolean;
NewPagePerVendor: Boolean;
ExcludeVendorsWithBalance: Boolean;
// RK-end
}
