Share
Report
5Hello,
My excusses if this isnt on the right forum.
Let me get straight to the point.
I have an action on a listplus page that sits in area processing in a group called functions
actions
{
area(Processing)
{
group("F&unctions")
{
action("Transfer to Selected Table")
{
ApplicationArea = Basic, Suite;
Caption = 'Transfer to selected table';
Ellipsis = true;
Image = TransferToGeneralJournal;
Promoted = true;
PromotedCategory = Category4;
PromotedIsBig = true;
ToolTip = 'Transfer the lines from the current window to the selected window.';
trigger OnAction()
var
availablePage: Page "OPL AvailableOrdersForTour";
available: Record "OPL PreTourSelection";
selected: record "OPL TransportTourSelected";
begin
CurrPage.AvailableOrders.Page.GetSelection(available);
if available.FindSet() then begin
repeat
selected.Init();
selected."Entry No." := available."Entry No.";
selected."Destination Adress" := available."Destination Adress";
selected."Document Type" := available."Document Type";
selected.FromAdress := available.FromAdress;
selected."Location Code" := available."Location Code";
selected."Source Document Type" := available."Source Document Type";
selected.Volume := available.Volume;
selected.Weight := available.Weight;
selected.VolumeUoM := available.VolumeUoM;
selected.WeightUom := available.WeightUom;
selected.Insert();
until available.Next() = 0;
end;
CalculateTotals();
available.DeleteAll(rec.MarkedOnly);
Commit();
end;
}
action(Create)
{
ApplicationArea = Basic, Suite;
Caption = 'Create Trip';
Ellipsis = true;
Image = Create;
Promoted = true;
PromotedCategory = Category4;
PromotedIsBig = true;
ToolTip = 'Create a trip based on the selected orders';
trigger OnAction()
var
SelectedTable: Record "OPL TransportTourSelected";
TransportTourOrder: Record "OPL TransportTourOrder";
TransportTour: Record "OPL TransportTour";
TransportOrder: Record "OPL TransportOrder";
LoadRecord: Record "OPL TransportLoad";
TransportSourceDocType: enum "OPL TransportSourceDocType";
creatingTourFailedMsg: Label 'Creating Trip Failed';
NoOrderSelectedMsg: label 'You must select an order to create a trip.';
begin
if SelectedTable.FindSet() then begin
end
else begin
Message(NoOrderSelectedMsg);
exit;
end;
CreatedTourId := Rec."No.";
if SelectedTable.FindSet() then
repeat
TransportTourOrder.Init();
TransportTourOrder."Line No." = 10000;
TransportTourOrder."No." := CreatedTourId;
TransportTourOrder."Order No." := SelectedTable."Entry No.";
TransportTourOrder."Location Code" := SelectedTable."Location Code";
TransportTourOrder.TransportAdress := SelectedTable.FromAdress;
TransportTourOrder.TransportToAdress := SelectedTable."Destination Adress";
TransportTourOrder."Document Type" := SelectedTable."Document Type";
TransportTourOrder.Volume := SelectedTable.Volume;
TransportTourOrder.Weight := SelectedTable.Weight;
TransportTourOrder.SourceDocType := SelectedTable."Source Document Type";
TransportTourOrder.Insert(true);
if (SelectedTable."Source Document Type" = TransportSourceDocType::TransportOrder) then begin
TransportOrder.SetFilter(TransportOrder."No.", SelectedTable."Entry No.");
if TransportOrder.FindSet() then begin
TransportOrder.TourId := CreatedTourId;
TransportOrder.Modify();
end;
end else
if SelectedTable."Source Document Type" = TransportSourceDocType::Load then begin
LoadRecord.SetFilter(LoadRecord."No.", SelectedTable."Entry No.");
if LoadRecord.FindSet() then begin
LoadRecord.TourNo := CreatedTourId;
LoadRecord.Modify();
end;
end;
Commit();
until SelectedTable.Next() = 0;
//If the transporttourorder is created go to the transportOrderTourCreation page
PAGE.Run(PAGE::"OPL TransportOrderTourCreation");
end;
}
action(ReCalculate)
{
ApplicationArea = Basic, Suite;
Caption = 'Recalculate Trip';
Ellipsis = true;
Image = Create;
Promoted = true;
PromotedCategory = Category4;
PromotedIsBig = true;
ToolTip = 'Recalculates the Trip based on the selected orders';
trigger OnAction()
begin
CalculateTotals();
end;
}
}
}
}
I can promote the group and all, but what i want to do is put the individual actions also onto the actionbar
As shown in the image above i want to put Create Trip and Recalculate Trip next to actions.
Thank you in advance.
Pascal Engelen
All responses (
Answers (
