Dynamics Community Forum Thread Details

Listpart layout functions next to each other

Hi all,

I have created a custom page with several listpart as shown below. Like Verbruik, Output and Kenmerken & Instellingen. However, I can only access the functions like Nieuwe regel and Melden by clicking on the arrow next to Output (1). How can I make it possible to get the function directly on the screen (2). So that Nieuwe regel and Melden are next to Output. I have also added the layout below the printscreen.

actions
{
area(Processing)
{
group(/F&unctions/)
{
Caption = 'F&unctions';
Image = /Action/;
action(StartUsage)
{
CaptionML = ENU = 'Start', NLD = 'Start';
visible = not pulper and input;
trigger OnAction()

Var
lrec: Record /Mutaties Power Apps/;
OutputForm: page OutputCard;

begin
SetSelectionFilter(lrec);
if lrec.findset then
repeat
if lrec.Status = lrec.Status::Entered then error('%1: %2 nog niet gereedgemeld', lrec.EntryType, lrec.Identification);
//lrec.Start := CreateDateTime(WorkDate, Time);
lrec.Processstatus := rec.Processstatus::Selected;
lrec.Selectorder := lrec.lastorder + 1;
lrec.modify;

until lrec.Next() = 0;

end;

}
action(EndUsage)
{
CaptionML = ENU = 'End', NLD = 'Einde';
visible = not pulper and input;
trigger OnAction()

Var
lrec: Record /Mutaties Power Apps/;
OutputForm: page OutputCard;

begin
SetSelectionFilter(lrec);
if lrec.findset then
repeat
//lrec.Start := CreateDateTime(WorkDate, Time);
lrec.Processstatus := rec.Processstatus::Finished;
lrec.modify;
until lrec.Next() = 0;

end;

}

action(Newoutput)
{
CaptionML = ENU = 'New Output', NLD = 'Nieuwe regel';
visible = not pulper and not input;
Image = Line;
trigger OnAction()
begin
Newoutputline;
end;

}
action(Reportprod)
{
CaptionML = ENU = 'Report', NLD = 'Melden';
visible = not pulper and not input;
trigger OnAction()

Var
lrec: Record /Mutaties Power Apps/;
OutputForm: page OutputCard;
begin
SetSelectionFilter(lrec);
if lrec.Count = 0 then begin
lrec := REC.newrecord();
CurrPage.Update(true);

end;
//SetSelectionFilter(lrec);
OutputForm.SetTableView(lrec);
OutputForm.SetRecord(lrec);
OutputForm.RunModal();
end;
}
Action(Processed)
{
visible = outputcardsub;
CaptionML = ENU = 'Finish', NLD = 'Beeindigd';

trigger OnAction()

Var
lrec: Record /Mutaties Power Apps/;

begin
SetSelectionFilter(lrec);
if lrec.findset then
repeat
lrec.Processstatus := rec.Processstatus::Finished;
lrec.modify;
until lrec.Next() = 0;

end;

}
}
}
}

Categories:

Dynamics 365 Business Central

Quick Links

Leaderboard > Small and medium business | Business Central, NAV, RMS