I have a page which display a Business Chart (Microsoft.Dynamics.Nav.Client.BusinessChart) and this is the Code for the page:
page 71148 /XEE Net Pay per Department/
{
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
JsonTokenXvalueString: JsonToken;
XValueString: text;
begin
if point.get('XValueString', JsonTokenXvalueString) then begin
XValueString := Format(JsonTokenXvalueString);
XValueString := DelChr(XValueString, '=', '/');
PayPerDepChartMgt.DrillDown(XValueString);
end;
end;
trigger AddInReady()
var
begin
UpdateChart();
end;
trigger Refresh()
var
myInt: Integer;
begin
UpdateChart();
end;
}
}
}
actions
{
area(Processing)
{
action(/Chart Setup/)
{
ApplicationArea = All;
Image = Setup;
trigger OnAction();
var
begin
Page.RunModal(Page::/Pay Per Dep. Chart Setup/);
UpdateChart();
end;
}
group(/Filtinring/)
{
action(/All/)
{
ApplicationArea = All;
trigger OnAction()
begin
PayPerDepChartMgt.SetWorksheetFilters(FilterTypes::All, true);
UpdateChart();
end;
}
action(/This Month/)
{
ApplicationArea = All;
trigger OnAction()
begin
PayPerDepChartMgt.SetWorksheetFilters(FilterTypes::/This Month/, true);
UpdateChart();
end;
}
action(/Previous Month/)
{
ApplicationArea = All;
trigger OnAction()
begin
PayPerDepChartMgt.SetWorksheetFilters(FilterTypes::/Prev Month/, true);
UpdateChart();
end;
}
action(/This Year /)
{
ApplicationArea = All;
trigger OnAction()
begin
PayPerDepChartMgt.SetWorksheetFilters(FilterTypes::/This Year/, true);
UpdateChart();
end;
}
action(/Previous Year/)
{
ApplicationArea = All;
trigger OnAction()
var
T: Record System.Visualization./Business Chart Buffer/;
begin
PayPerDepChartMgt.SetWorksheetFilters(FilterTypes::/Perv Year/, true);
UpdateChart();
end;
}
}
}
}
local procedure UpdateChart()
var
myInt: Integer;
begin
PayPerDepChartMgt.GenerateData(rec);
Rec.Update(CurrPage.Chart);
end;
var
PayPerDepChartMgt: Codeunit /XEE Pay Per Dept. Mgt./;
FilterTypes: enum /Pay Per Dep. Chart Filters/;
}
This is the error
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)'
