{
PageType = CardPart;
ApplicationArea = All;
UsageCategory = Lists;
SourceTable = /Business Chart Buffer/;
Caption = 'Net to Pay per Department';
layout
{
area(Content)
{
usercontrol(Chart; /Microsoft.Dynamics.Nav.Client.BusinessChart/)
{
trigger DataPointClicked(point: JsonObject)
var
XValueString: text;
if point.get('XValueString', JsonTokenXvalueString) then begin
XValueString := Format(JsonTokenXvalueString);
XValueString := DelChr(XValueString, '=', '/');
PayPerDepChartMgt.DrillDown(XValueString);
end;
end;
var
end;
var
myInt: Integer;
begin
UpdateChart();
end;
}
}
}
{
area(Processing)
{
{
ApplicationArea = All;
trigger OnAction();
var
Page.RunModal(Page::/Pay Per Dep. Chart Setup/);
UpdateChart();
end;
}
{
action(/All/)
{
ApplicationArea = All;
begin
PayPerDepChartMgt.SetWorksheetFilters(FilterTypes::All, true);
UpdateChart();
end;
}
action(/This Month/)
{
ApplicationArea = All;
begin
PayPerDepChartMgt.SetWorksheetFilters(FilterTypes::/This Month/, true);
UpdateChart();
end;
}
action(/Previous Month/)
{
ApplicationArea = All;
begin
PayPerDepChartMgt.SetWorksheetFilters(FilterTypes::/Prev Month/, true);
UpdateChart();
end;
}
action(/This Year /)
{
ApplicationArea = All;
begin
PayPerDepChartMgt.SetWorksheetFilters(FilterTypes::/This Year/, true);
UpdateChart();
end;
}
action(/Previous Year/)
{
ApplicationArea = All;
var
T: Record System.Visualization./Business Chart Buffer/;
begin
PayPerDepChartMgt.SetWorksheetFilters(FilterTypes::/Perv Year/, true);
UpdateChart();
end;
}
}
}
var
myInt: Integer;
begin
PayPerDepChartMgt.GenerateData(rec);
Rec.Update(CurrPage.Chart);
PayPerDepChartMgt: Codeunit /XEE Pay Per Dept. Mgt./;
FilterTypes: enum /Pay Per Dep. Chart Filters/;
}
Page/Pag71148.NetPayPerDepartment.al (154,25) - Error AL0135: There is no argument given that corresponds to the required formal parameter 'BusinessChartAddIn' of 'UpdateChart(ControlAddIn System.Integration.BusinessChart)'