Page 99000815 Production Order List, source in 29
Source29
src/Layers/W1/BaseApp/Manufacturing/Document/ProductionOrderList.Page.al286 lines, Copyright (c) Microsoft Corporation. MIT
// ------------------------------------------------------------------------------------------------
// Copyright (c) Microsoft Corporation. All rights reserved.
// Licensed under the MIT License. See License.txt in the project root for license information.
// ------------------------------------------------------------------------------------------------
namespace Microsoft.Manufacturing.Document;
using Microsoft.Finance.Dimension;
using Microsoft.Inventory.Ledger;
using Microsoft.Manufacturing.Capacity;
using Microsoft.Warehouse.Ledger;
page 99000815 "Production Order List"
{
ApplicationArea = Manufacturing;
Caption = 'Production Order List';
DataCaptionFields = Status;
Editable = false;
PageType = List;
AboutTitle = 'About Production Order List';
AboutText = 'Monitor and manage production orders, track progress and status, analyze manufacturing costs and variances, and review key details such as quantities, dates, routing, and responsible users to optimize production efficiency and address potential issues.';
SourceTable = "Production Order";
UsageCategory = Lists;
layout
{
area(content)
{
repeater(Control1)
{
ShowCaption = false;
field("No."; Rec."No.")
{
ApplicationArea = Manufacturing;
Lookup = false;
}
field(Description; Rec.Description)
{
ApplicationArea = Manufacturing;
}
field("Description 2"; Rec."Description 2")
{
ApplicationArea = Manufacturing;
Visible = false;
}
field("Source No."; Rec."Source No.")
{
ApplicationArea = Manufacturing;
}
field("Routing No."; Rec."Routing No.")
{
ApplicationArea = Manufacturing;
}
field(Quantity; Rec.Quantity)
{
ApplicationArea = Manufacturing;
}
field("Shortcut Dimension 1 Code"; Rec."Shortcut Dimension 1 Code")
{
ApplicationArea = Dimensions;
Visible = false;
}
field("Shortcut Dimension 2 Code"; Rec."Shortcut Dimension 2 Code")
{
ApplicationArea = Dimensions;
Visible = false;
}
field("Location Code"; Rec."Location Code")
{
ApplicationArea = Location;
Visible = false;
}
field("Starting Date-Time"; Rec."Starting Date-Time")
{
ApplicationArea = Manufacturing;
}
field("Ending Date-Time"; Rec."Ending Date-Time")
{
ApplicationArea = Manufacturing;
}
field("Due Date"; Rec."Due Date")
{
ApplicationArea = Manufacturing;
}
field("Assigned User ID"; Rec."Assigned User ID")
{
ApplicationArea = Manufacturing;
}
field("Finished Date"; Rec."Finished Date")
{
ApplicationArea = Manufacturing;
Visible = false;
}
field(Status; Rec.Status)
{
ApplicationArea = Manufacturing;
}
field("Search Description"; Rec."Search Description")
{
ApplicationArea = Manufacturing;
}
}
}
area(factboxes)
{
systempart(Control1900383207; Links)
{
ApplicationArea = RecordLinks;
Visible = false;
}
systempart(Control1905767507; Notes)
{
ApplicationArea = Notes;
Visible = false;
}
}
}
actions
{
area(navigation)
{
group("Pro&d. Order")
{
Caption = 'Pro&d. Order';
Image = "Order";
action(ShowDocument)
{
ApplicationArea = Manufacturing;
Caption = 'Show Document';
Image = EditLines;
ShortCutKey = 'Return';
ToolTip = 'View or change detailed information about the record on the document or journal line.';
trigger OnAction()
begin
OpenSourceCard();
end;
}
group("E&ntries")
{
Caption = 'E&ntries';
Image = Entries;
action("Item Ledger E&ntries")
{
ApplicationArea = Manufacturing;
Caption = 'Item Ledger E&ntries';
Image = ItemLedger;
RunObject = Page "Item Ledger Entries";
RunPageLink = "Order Type" = const(Production),
"Order No." = field("No.");
RunPageView = sorting("Order Type", "Order No.");
ShortCutKey = 'Ctrl+F7';
ToolTip = 'View the item ledger entries of the item on the document or journal line.';
}
action("Capacity Ledger Entries")
{
ApplicationArea = Manufacturing;
Caption = 'Capacity Ledger Entries';
Image = CapacityLedger;
RunObject = Page "Capacity Ledger Entries";
RunPageLink = "Order Type" = const(Production),
"Order No." = field("No.");
RunPageView = sorting("Order Type", "Order No.");
ToolTip = 'View the capacity ledger entries of the involved production order. Capacity is recorded either as time (run time, stop time, or setup time) or as quantity (scrap quantity or output quantity).';
}
action("Value Entries")
{
ApplicationArea = Manufacturing;
Caption = 'Value Entries';
Image = ValueLedger;
RunObject = Page "Value Entries";
RunPageLink = "Order Type" = const(Production),
"Order No." = field("No.");
RunPageView = sorting("Order Type", "Order No.");
ToolTip = 'View the value entries of the item on the document or journal line.';
}
action("&Warehouse Entries")
{
ApplicationArea = Warehouse;
Caption = '&Warehouse Entries';
Image = BinLedger;
RunObject = Page "Warehouse Entries";
RunPageLink = "Source Type" = filter(83 | 5407),
"Source Subtype" = filter("3" | "4" | "5"),
"Source No." = field("No.");
RunPageView = sorting("Source Type", "Source Subtype", "Source No.");
ToolTip = 'View the history of quantities that are registered for the item in warehouse activities. ';
}
}
action("Co&mments")
{
ApplicationArea = Manufacturing;
Caption = 'Co&mments';
Image = ViewComments;
RunObject = Page "Prod. Order Comment Sheet";
RunPageLink = Status = field(Status),
"Prod. Order No." = field("No.");
ToolTip = 'View or add comments for the record.';
}
action(Dimensions)
{
AccessByPermission = TableData Dimension = R;
ApplicationArea = Dimensions;
Caption = 'Dimensions';
Image = Dimensions;
ShortCutKey = 'Alt+D';
ToolTip = 'View or edit dimensions, such as area, project, or department, that you can assign to sales and purchase documents to distribute costs and analyze transaction history.';
trigger OnAction()
begin
Rec.ShowDocDim();
CurrPage.SaveRecord();
end;
}
action(Statistics)
{
ApplicationArea = Manufacturing;
Caption = 'Statistics';
Image = Statistics;
RunObject = Page "Production Order Statistics";
RunPageLink = Status = field(Status),
"No." = field("No."),
"Date Filter" = field("Date Filter");
ShortCutKey = 'F7';
ToolTip = 'View statistical information, such as the value of posted entries, for the record.';
}
}
}
area(Promoted)
{
group(Category_Category4)
{
Caption = 'Entries', Comment = 'Generated from the PromotedActionCategories property index 3.';
actionref("Item Ledger E&ntries_Promoted"; "Item Ledger E&ntries")
{
}
actionref("Capacity Ledger Entries_Promoted"; "Capacity Ledger Entries")
{
}
actionref("Value Entries_Promoted"; "Value Entries")
{
}
actionref("&Warehouse Entries_Promoted"; "&Warehouse Entries")
{
}
}
group(Category_Category5)
{
Caption = 'Prod. Order', Comment = 'Generated from the PromotedActionCategories property index 4.';
actionref(Dimensions_Promoted; Dimensions)
{
}
actionref(Statistics_Promoted; Statistics)
{
}
actionref("Co&mments_Promoted"; "Co&mments")
{
}
}
group(Category_Report)
{
Caption = 'Report', Comment = 'Generated from the PromotedActionCategories property index 2.';
}
}
}
local procedure OpenSourceCard()
begin
case Rec.Status of
Rec.Status::Simulated:
Page.Run(Page::"Simulated Production Order", Rec);
Rec.Status::Planned:
Page.Run(Page::"Planned Production Order", Rec);
Rec.Status::"Firm Planned":
Page.Run(Page::"Firm Planned Prod. Order", Rec);
Rec.Status::Released:
Page.Run(Page::"Released Production Order", Rec);
Rec.Status::Finished:
Page.Run(Page::"Finished Production Order", Rec);
end;
end;
}