Page 99000867 Finished Production Order, source in 29
Source29
src/Layers/W1/BaseApp/Manufacturing/Document/FinishedProductionOrder.Page.al447 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.Foundation.Attachment;
using Microsoft.Foundation.Enums;
using Microsoft.Foundation.Reporting;
using Microsoft.Inventory.Ledger;
using Microsoft.Manufacturing.Capacity;
using Microsoft.Warehouse.Activity;
using Microsoft.Warehouse.Activity.History;
using Microsoft.Warehouse.InventoryDocument;
using Microsoft.Warehouse.Ledger;
page 99000867 "Finished Production Order"
{
Caption = 'Finished Production Order';
InsertAllowed = false;
ModifyAllowed = false;
PageType = Document;
RefreshOnActivate = true;
SourceTable = "Production Order";
SourceTableView = where(Status = const(Finished));
layout
{
area(content)
{
group(General)
{
Caption = 'General';
field("No."; Rec."No.")
{
ApplicationArea = Manufacturing;
Editable = false;
Importance = Promoted;
Lookup = false;
}
field(Description; Rec.Description)
{
ApplicationArea = Manufacturing;
Editable = false;
Importance = Promoted;
}
field("Description 2"; Rec."Description 2")
{
ApplicationArea = Manufacturing;
Editable = false;
ToolTip = 'Specifies an additional part of the production order description.';
}
field("Source Type"; Rec."Source Type")
{
ApplicationArea = Manufacturing;
Editable = false;
}
field("Source No."; Rec."Source No.")
{
ApplicationArea = Manufacturing;
Editable = false;
ToolTip = 'Specifies the item number or number of the source document that the entry originates from.';
}
field("Variant Code"; Rec."Variant Code")
{
ApplicationArea = Manufacturing;
Editable = false;
Visible = false;
}
field("Search Description"; Rec."Search Description")
{
ApplicationArea = Manufacturing;
Editable = false;
}
field(Quantity; Rec.Quantity)
{
ApplicationArea = Manufacturing;
Editable = false;
Importance = Promoted;
}
field("Due Date"; Rec."Due Date")
{
ApplicationArea = Manufacturing;
Editable = false;
}
field("Last Date Modified"; Rec."Last Date Modified")
{
ApplicationArea = Manufacturing;
Editable = false;
}
field(Reopened; Rec."Reopened")
{
ApplicationArea = Manufacturing;
Editable = false;
}
field("Manual Scheduling"; Rec."Manual Scheduling")
{
ApplicationArea = Manufacturing;
Importance = Additional;
}
}
part(ProdOrderLines; "Finished Prod. Order Lines")
{
ApplicationArea = Manufacturing;
SubPageLink = "Prod. Order No." = field("No.");
UpdatePropagation = Both;
}
group(Schedule)
{
Caption = 'Schedule';
field("Starting Date-Time"; Rec."Starting Date-Time")
{
ApplicationArea = Manufacturing;
Editable = false;
Importance = Promoted;
}
field("Ending Date-Time"; Rec."Ending Date-Time")
{
ApplicationArea = Manufacturing;
Editable = false;
Importance = Promoted;
}
}
group(Posting)
{
Caption = 'Posting';
field("Inventory Posting Group"; Rec."Inventory Posting Group")
{
ApplicationArea = Manufacturing;
Editable = false;
Importance = Promoted;
}
field("Gen. Prod. Posting Group"; Rec."Gen. Prod. Posting Group")
{
ApplicationArea = Manufacturing;
Editable = false;
}
field("Gen. Bus. Posting Group"; Rec."Gen. Bus. Posting Group")
{
ApplicationArea = Manufacturing;
Editable = false;
}
field("Shortcut Dimension 1 Code"; Rec."Shortcut Dimension 1 Code")
{
ApplicationArea = Dimensions;
Editable = false;
}
field("Shortcut Dimension 2 Code"; Rec."Shortcut Dimension 2 Code")
{
ApplicationArea = Dimensions;
Editable = false;
}
field("Location Code"; Rec."Location Code")
{
ApplicationArea = Location;
Editable = false;
Importance = Promoted;
}
field("Document Put-away Status"; Rec."Document Put-away Status")
{
ApplicationArea = Warehouse;
Visible = false;
}
}
}
area(factboxes)
{
systempart(Control1900383207; Links)
{
ApplicationArea = RecordLinks;
Visible = false;
}
systempart(Control1905767507; Notes)
{
ApplicationArea = Notes;
Visible = true;
}
part("Attached Documents List"; "Doc. Attachment List Factbox")
{
ApplicationArea = Manufacturing;
Caption = 'Documents';
UpdatePropagation = Both;
SubPageLink = "Table ID" = const(Database::"Production Order"),
"Document Type" = const("Finished Production Order"),
"No." = field("No.");
}
}
}
actions
{
area(navigation)
{
group("O&rder")
{
Caption = 'O&rder';
Image = "Order";
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();
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.';
}
action("Put-away Lines")
{
ApplicationArea = Warehouse;
Caption = 'Put-away Lines';
Image = PutawayLines;
RunObject = Page "Warehouse Activity Lines";
RunPageLink = "Source Type" = filter(5406 | 5407),
"Source Subtype" = const("4"),
"Source No." = field("No.");
RunPageView = sorting("Source Type", "Source Subtype", "Source No.", "Source Line No.", "Source Subline No.", "Unit of Measure Code", "Action Type", "Breakbulk No.", "Original Breakbulk")
where("Activity Type" = const("Put-away"));
ToolTip = 'View the list of ongoing put-aways for the order.';
}
action("Registered P&ick Lines")
{
ApplicationArea = Warehouse;
Caption = 'Registered P&ick Lines';
Image = RegisteredDocs;
RunObject = Page "Registered Whse. Act.-Lines";
RunPageLink = "Source Type" = const(5407),
"Source Subtype" = const("3"),
"Source No." = field("No.");
RunPageView = sorting("Source Type", "Source Subtype", "Source No.", "Source Line No.", "Source Subline No.");
ToolTip = 'View the list of warehouse picks that have been made for the order.';
}
action("<Action2>")
{
ApplicationArea = Warehouse;
Caption = 'Registered Invt. M&ovement Lines';
Image = RegisteredDocs;
RunObject = Page "Reg. Invt. Movement Lines";
RunPageLink = "Source Type" = const(5407),
"Source Subtype" = const("3"),
"Source No." = field("No.");
RunPageView = sorting("Source Type", "Source Subtype", "Source No.", "Source Line No.", "Source Subline No.");
ToolTip = 'View the list of inventory movements that have been made for the order.';
}
action("Registered Put-away Lines")
{
ApplicationArea = Warehouse;
Caption = 'Registered Put-away Lines';
Image = RegisteredDocs;
RunObject = Page "Registered Whse. Act.-Lines";
RunPageLink = "Whse. Document Type" = const(Production),
"Source Document" = const("Prod. Output"),
"Whse. Document No." = field("No.");
RunPageView = sorting("Whse. Document Type", "Whse. Document No.", "Whse. Document Line No.")
where("Activity Type" = const("Put-away"));
ToolTip = 'View the list of completed put-away activities.';
}
action(DocAttach)
{
ApplicationArea = Manufacturing;
Caption = 'Attachments';
Image = Attach;
ToolTip = 'Add a file as an attachment. You can attach images as well as documents.';
trigger OnAction()
var
DocumentAttachmentDetails: Page "Document Attachment Details";
RecRef: RecordRef;
begin
RecRef.GetTable(Rec);
DocumentAttachmentDetails.OpenForRecRef(RecRef);
DocumentAttachmentDetails.RunModal();
end;
}
}
}
area(Processing)
{
action(PrintLabel)
{
ApplicationArea = Manufacturing;
Image = Print;
Caption = 'Print Label';
ToolTip = 'Print labels for the items on the order lines.';
trigger OnAction()
var
ItemLedgerEntry: Record "Item Ledger Entry";
ReportSelections: Record "Report Selections";
begin
ItemLedgerEntry.SetRange("Order Type", Enum::"Inventory Order Type"::Production);
ItemLedgerEntry.SetRange("Order No.", Rec."No.");
ReportSelections.PrintWithCheckForCust(Enum::"Report Selection Usage"::"Prod. Output Item Label", ItemLedgerEntry, 0);
end;
}
action(ReopenFinishedProdOrder)
{
ApplicationArea = Manufacturing;
Caption = 'Reopen';
Image = ReOpen;
ToolTip = 'Reopen the production order to change it after it has been finished.';
trigger OnAction()
var
ProdOrderStatusManagement: Codeunit "Prod. Order Status Management";
begin
ProdOrderStatusManagement.ReopenFinishedProdOrder(Rec);
end;
}
action("Create Warehouse Put-Away")
{
ApplicationArea = Warehouse;
Caption = 'Create Warehouse Put-Away';
Image = CreatePutAway;
ToolTip = 'Create warehouse put-away documents for the production order lines.';
trigger OnAction()
var
MfgCreatePutAway: Codeunit "Mfg. Create Put-away";
begin
MfgCreatePutAway.CreateWhsePutAwayForProdOrder(Rec);
end;
}
}
area(Promoted)
{
group(Category_Category4)
{
Caption = 'Order', Comment = 'Generated from the PromotedActionCategories property index 3.';
actionref(Dimensions_Promoted; Dimensions)
{
}
actionref(Statistics_Promoted; Statistics)
{
}
actionref("Co&mments_Promoted"; "Co&mments")
{
}
actionref(DocAttach_Promoted; DocAttach)
{
}
}
group(Category_Entries)
{
Caption = 'Entries';
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_Report)
{
Caption = 'Report', Comment = 'Generated from the PromotedActionCategories property index 2.';
}
}
}
}