Page 9304 Sales Return Order List
- App
- Base Application
- Namespace
- Microsoft.Sales.Document
- Versions
- 17-28
- Source table
- 36
Versions171819202122232425262728
Source29
Source in 29
src/Layers/W1/BaseApp/Sales/Document/SalesReturnOrderList.Page.al894 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.Sales.Document;
using Microsoft.Finance.Dimension;
using Microsoft.Foundation.Attachment;
using Microsoft.Foundation.BatchProcessing;
using Microsoft.Foundation.Reporting;
using Microsoft.Intercompany;
using Microsoft.Intercompany.GLAccount;
using Microsoft.Sales.Comment;
using Microsoft.Sales.Customer;
using Microsoft.Sales.History;
using Microsoft.Sales.Posting;
using Microsoft.Sales.Setup;
using Microsoft.Warehouse.Activity;
using Microsoft.Warehouse.Document;
using Microsoft.Warehouse.InventoryDocument;
using Microsoft.Warehouse.Request;
using System.Automation;
using System.Text;
using System.Threading;
/// <summary>
/// Displays a list of sales return orders for managing customer returns and refunds.
/// </summary>
page 9304 "Sales Return Order List"
{
ApplicationArea = SalesReturnOrder;
Caption = 'Sales Return Orders';
CardPageID = "Sales Return Order";
DataCaptionFields = "Sell-to Customer No.";
Editable = false;
PageType = List;
QueryCategory = 'Sales Return Order List';
RefreshOnActivate = true;
SourceTable = "Sales Header";
SourceTableView = where("Document Type" = const("Return Order"));
UsageCategory = Lists;
AboutTitle = 'About sales return orders';
AboutText = 'Use a sales return order when you want to track receipt and potential refund of items being returned from a customer. If you don''t want to track receipt of items on a return, you can use a [Sales Credit Memo](?page=9302 "Opens the Sales Credit Memos") instead.';
layout
{
area(content)
{
repeater(Control1)
{
ShowCaption = false;
field("No."; Rec."No.")
{
ApplicationArea = SalesReturnOrder;
ToolTip = 'Specifies the number of the involved entry or record, according to the specified number series.';
}
field("Sell-to Customer No."; Rec."Sell-to Customer No.")
{
ApplicationArea = SalesReturnOrder;
ToolTip = 'Specifies the number of the customer.';
}
field("Sell-to Customer Name"; Rec."Sell-to Customer Name")
{
ApplicationArea = SalesReturnOrder;
ToolTip = 'Specifies the name of the customer.';
}
field("External Document No."; Rec."External Document No.")
{
ApplicationArea = SalesReturnOrder;
}
field("Sell-to Post Code"; Rec."Sell-to Post Code")
{
ApplicationArea = SalesReturnOrder;
Visible = false;
}
field("Sell-to Country/Region Code"; Rec."Sell-to Country/Region Code")
{
ApplicationArea = SalesReturnOrder;
Visible = false;
}
field("Sell-to Contact"; Rec."Sell-to Contact")
{
ApplicationArea = SalesReturnOrder;
Visible = false;
}
field("Bill-to Customer No."; Rec."Bill-to Customer No.")
{
ApplicationArea = SalesReturnOrder;
Visible = false;
}
field("Bill-to Name"; Rec."Bill-to Name")
{
ApplicationArea = SalesReturnOrder;
Visible = false;
}
field("Bill-to Post Code"; Rec."Bill-to Post Code")
{
ApplicationArea = SalesReturnOrder;
Visible = false;
}
field("Bill-to Country/Region Code"; Rec."Bill-to Country/Region Code")
{
ApplicationArea = SalesReturnOrder;
Visible = false;
}
field("Bill-to Contact"; Rec."Bill-to Contact")
{
ApplicationArea = SalesReturnOrder;
Visible = false;
}
field("Ship-to Code"; Rec."Ship-to Code")
{
ApplicationArea = SalesReturnOrder;
Visible = false;
}
field("Ship-to Name"; Rec."Ship-to Name")
{
ApplicationArea = SalesReturnOrder;
Visible = false;
}
field("Ship-to Post Code"; Rec."Ship-to Post Code")
{
ApplicationArea = SalesReturnOrder;
Visible = false;
}
field("Ship-to Country/Region Code"; Rec."Ship-to Country/Region Code")
{
ApplicationArea = SalesReturnOrder;
Visible = false;
}
field("Ship-to Contact"; Rec."Ship-to Contact")
{
ApplicationArea = SalesReturnOrder;
Visible = false;
}
field("Posting Date"; Rec."Posting Date")
{
ApplicationArea = SalesReturnOrder;
ToolTip = 'Specifies the entry''s posting date.';
Visible = false;
}
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 = SalesReturnOrder;
ToolTip = 'Specifies the location where the items are to be placed when they are received. This field acts as the default location for new lines. You can update the location code for individual lines as needed.';
}
field("Salesperson Code"; Rec."Salesperson Code")
{
ApplicationArea = SalesReturnOrder;
ToolTip = 'Specifies which salesperson is associated with the shipment.';
Visible = false;
}
field("Assigned User ID"; Rec."Assigned User ID")
{
ApplicationArea = SalesReturnOrder;
}
field("Currency Code"; Rec."Currency Code")
{
ApplicationArea = SalesReturnOrder;
ToolTip = 'Specifies the currency that is used on the entry.';
Visible = false;
}
field("Document Date"; Rec."Document Date")
{
ApplicationArea = SalesReturnOrder;
Visible = false;
}
field(Status; Rec.Status)
{
ApplicationArea = SalesReturnOrder;
ToolTip = 'Specifies if the document is open, waiting to be approved, has been invoiced for prepayment, or has been released to the next stage of processing.';
StyleExpr = StatusStyleTxt;
}
field("Payment Terms Code"; Rec."Payment Terms Code")
{
ApplicationArea = SalesReturnOrder;
Visible = false;
}
field("Due Date"; Rec."Due Date")
{
ApplicationArea = SalesReturnOrder;
ToolTip = 'Specifies when the sales return order must be paid.';
Visible = false;
}
field("Payment Discount %"; Rec."Payment Discount %")
{
ApplicationArea = SalesReturnOrder;
Visible = false;
}
field("Shipping Agent Code"; Rec."Shipping Agent Code")
{
ApplicationArea = SalesReturnOrder;
Visible = false;
}
field("Shipping Agent Service Code"; Rec."Shipping Agent Service Code")
{
ApplicationArea = SalesReturnOrder;
Visible = false;
}
field("Package Tracking No."; Rec."Package Tracking No.")
{
ApplicationArea = SalesReturnOrder;
Visible = false;
}
field("Shipment Date"; Rec."Shipment Date")
{
ApplicationArea = SalesReturnOrder;
Visible = false;
}
field("Shipping Advice"; Rec."Shipping Advice")
{
ApplicationArea = SalesReturnOrder;
Visible = false;
}
field("Completely Shipped"; Rec."Completely Shipped")
{
ApplicationArea = SalesReturnOrder;
ToolTip = 'Specifies if all the items on the order have been shipped or, in the case of inbound items, completely received.';
Visible = false;
}
field("Job Queue Status"; Rec."Job Queue Status")
{
ApplicationArea = SalesReturnOrder;
Style = Unfavorable;
StyleExpr = Rec."Job Queue Status" = Rec."Job Queue Status"::ERROR;
ToolTip = 'Specifies the status of a job queue entry or task that handles the posting of sales return orders.';
Visible = JobQueueActive;
trigger OnDrillDown()
var
JobQueueEntry: Record "Job Queue Entry";
begin
if Rec."Job Queue Status" = Rec."Job Queue Status"::" " then
exit;
JobQueueEntry.ShowStatusMsg(Rec."Job Queue Entry ID");
end;
}
field("Campaign No."; Rec."Campaign No.")
{
ApplicationArea = SalesReturnOrder;
ToolTip = 'Specifies the campaign number that the document is linked to.';
Visible = false;
}
field("Applies-to Doc. Type"; Rec."Applies-to Doc. Type")
{
ApplicationArea = SalesReturnOrder;
Visible = false;
}
field(Amount; Rec.Amount)
{
ApplicationArea = SalesReturnOrder;
}
field("Amount Including VAT"; Rec."Amount Including VAT")
{
ApplicationArea = SalesReturnOrder;
}
field("Posting Description"; Rec."Posting Description")
{
ApplicationArea = Suite;
Visible = false;
}
}
}
area(factboxes)
{
part("Attached Documents List"; "Doc. Attachment List Factbox")
{
ApplicationArea = All;
Caption = 'Documents';
UpdatePropagation = Both;
SubPageLink = "Table ID" = const(Database::"Sales Header"), "No." = field("No."), "Document Type" = field("Document Type");
}
part(Control1902018507; "Customer Statistics FactBox")
{
ApplicationArea = SalesReturnOrder;
SubPageLink = "No." = field("Bill-to Customer No."),
"Date Filter" = field("Date Filter");
}
part(Control1900316107; "Customer Details FactBox")
{
ApplicationArea = SalesReturnOrder;
SubPageLink = "No." = field("Bill-to Customer No."),
"Date Filter" = field("Date Filter");
}
systempart(Control1900383207; Links)
{
ApplicationArea = RecordLinks;
Visible = false;
}
systempart(Control1905767507; Notes)
{
ApplicationArea = Notes;
Visible = false;
}
}
}
actions
{
area(navigation)
{
group("&Return Order")
{
Caption = '&Return Order';
Image = Return;
action(SalesOrderStatistics)
{
ApplicationArea = Basic, Suite;
Caption = 'Statistics';
Enabled = Rec."No." <> '';
Image = Statistics;
ShortCutKey = 'F7';
Visible = true;
ToolTip = 'View statistical information, such as the value of posted entries, for the record.';
RunObject = Page "Sales Order Statistics";
RunPageOnRec = true;
}
action(CustomerStatistics)
{
ApplicationArea = Basic, Suite;
Caption = 'Customer Statistics';
Image = Statistics;
RunObject = Page "Customer Statistics";
RunPageLink = "No." = field("Sell-to Customer No."),
"Date Filter" = field("Date Filter");
ToolTip = 'View statistical information, such as the value of posted entries, for the sell-to customer on the sales document.';
}
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(Approvals)
{
AccessByPermission = TableData "Approval Entry" = R;
ApplicationArea = Suite;
Caption = 'Approvals';
Image = Approvals;
ToolTip = 'View a list of the records that are waiting to be approved. For example, you can see who requested the record to be approved, when it was sent, and when it is due to be approved.';
trigger OnAction()
var
ApprovalsMgmt: Codeunit "Approvals Mgmt.";
begin
ApprovalsMgmt.OpenApprovalsSales(Rec);
end;
}
action("Co&mments")
{
ApplicationArea = Comments;
Caption = 'Co&mments';
Image = ViewComments;
RunObject = Page "Sales Comment Sheet";
RunPageLink = "Document Type" = const("Return Order"),
"No." = field("No."),
"Document Line No." = const(0);
ToolTip = 'View or add comments for the record.';
}
}
group(Documents)
{
Caption = 'Documents';
Image = Documents;
action("Return Receipts")
{
ApplicationArea = SalesReturnOrder;
Caption = 'Return Receipts';
Image = ReturnReceipt;
RunObject = Page "Posted Return Receipts";
RunPageLink = "Return Order No." = field("No.");
RunPageView = sorting("Return Order No.");
ToolTip = 'View a list of posted return receipts for the order.';
}
action("Cred&it Memos")
{
ApplicationArea = SalesReturnOrder;
Caption = 'Cred&it Memos';
Image = CreditMemo;
ToolTip = 'View a list of ongoing credit memos for the order.';
trigger OnAction()
var
TempSalesCrMemoHeader: Record "Sales Cr.Memo Header" temporary;
SalesGetReturnReceipts: Codeunit "Sales-Get Return Receipts";
begin
SalesGetReturnReceipts.GetSalesRetOrderCrMemos(TempSalesCrMemoHeader, Rec."No.");
Page.Run(Page::"Posted Sales Credit Memos", TempSalesCrMemoHeader);
end;
}
}
group(Warehouse)
{
Caption = 'Warehouse';
Image = Warehouse;
action("In&vt. Put-away/Pick Lines")
{
ApplicationArea = Warehouse;
Caption = 'In&vt. Put-away/Pick Lines';
Image = PickLines;
RunObject = Page "Warehouse Activity List";
RunPageLink = "Source Document" = const("Sales Return Order"),
"Source No." = field("No.");
RunPageView = sorting("Source Document", "Source No.", "Location Code");
ToolTip = 'View items that are inbound or outbound on inventory put-away or inventory pick documents for the sales return order.';
}
action("Whse. Receipt Lines")
{
ApplicationArea = Warehouse;
Caption = 'Whse. Receipt Lines';
Image = ReceiptLines;
RunObject = Page "Whse. Receipt Lines";
RunPageLink = "Source Type" = const(37),
#pragma warning disable AL0603
"Source Subtype" = field("Document Type"),
#pragma warning restore
"Source No." = field("No.");
RunPageView = sorting("Source Type", "Source Subtype", "Source No.", "Source Line No.");
ToolTip = 'View ongoing warehouse receipts for the document, in advanced warehouse configurations.';
}
action("Whse. Put-away Lines")
{
ApplicationArea = Warehouse;
Caption = 'Warehouse Put-away Lines';
Image = PutawayLines;
RunObject = page "Warehouse Activity Lines";
RunPageLink = "Source Document" = const("Sales Return Order"), "Source No." = field("No.");
RunPageView = sorting("Source Type", "Source Subtype", "Source No.");
ToolTip = 'View ongoing warehouse put-aways for the document, in advanced warehouse configurations.';
}
}
}
area(processing)
{
action("&Print")
{
ApplicationArea = SalesReturnOrder;
Caption = '&Print';
Ellipsis = true;
Image = Print;
ToolTip = 'Prepare to print the document. A report request window for the document opens where you can specify what to include on the print-out.';
trigger OnAction()
begin
DocPrint.PrintSalesHeader(Rec);
end;
}
action(AttachAsPDF)
{
ApplicationArea = Basic, Suite;
Caption = 'Attach as PDF';
Image = PrintAttachment;
ToolTip = 'Create a PDF file and attach it to the document.';
trigger OnAction()
var
SalesHeader: Record "Sales Header";
DocPrint: Codeunit "Document-Print";
begin
SalesHeader := Rec;
CurrPage.SetSelectionFilter(SalesHeader);
DocPrint.PrintSalesHeaderToDocumentAttachment(SalesHeader);
end;
}
group(Action7)
{
Caption = 'Release';
Image = ReleaseDoc;
action(Release)
{
ApplicationArea = SalesReturnOrder;
Caption = 'Re&lease';
Image = ReleaseDoc;
ShortCutKey = 'Ctrl+F9';
ToolTip = 'Release the document to the next stage of processing. You must reopen the document before you can make changes to it.';
trigger OnAction()
var
SalesHeader: Record "Sales Header";
begin
CurrPage.SetSelectionFilter(SalesHeader);
Rec.PerformManualRelease(SalesHeader);
end;
}
action(Reopen)
{
ApplicationArea = SalesReturnOrder;
Caption = 'Re&open';
Image = ReOpen;
ToolTip = 'Reopen the document to change it after it has been approved. Approved documents have the Released status and must be opened before they can be changed';
trigger OnAction()
var
SalesHeader: Record "Sales Header";
begin
CurrPage.SetSelectionFilter(SalesHeader);
Rec.PerformManualReopen(SalesHeader);
end;
}
}
group("F&unctions")
{
Caption = 'F&unctions';
Image = "Action";
action("Get Posted Doc&ument Lines to Reverse")
{
ApplicationArea = SalesReturnOrder;
Caption = 'Get Posted Doc&ument Lines to Reverse';
Ellipsis = true;
Image = ReverseLines;
ToolTip = 'Copy one or more posted sales document lines in order to reverse the original order.';
trigger OnAction()
begin
Rec.GetPstdDocLinesToReverse();
end;
}
separator(Action1102601021)
{
}
action("Send IC Return Order Cnfmn.")
{
AccessByPermission = TableData "IC G/L Account" = R;
ApplicationArea = Intercompany;
Caption = 'Send IC Return Order Cnfmn.';
Image = IntercompanyOrder;
ToolTip = 'Send the document to the intercompany outbox or directly to the intercompany partner if automatic transaction sending is enabled.';
trigger OnAction()
var
ICInboxOutboxMgt: Codeunit ICInboxOutboxMgt;
ApprovalsMgmt: Codeunit "Approvals Mgmt.";
begin
if ApprovalsMgmt.PrePostApprovalCheckSales(Rec) then
ICInboxOutboxMgt.SendSalesDoc(Rec, false);
end;
}
action("Delete Invoiced Orders")
{
ApplicationArea = SalesReturnOrder;
Caption = 'Delete Invoiced Orders';
Image = Delete;
RunObject = Report "Delete Invd Sales Ret. Orders";
}
}
group("Request Approval")
{
Caption = 'Request Approval';
action(SendApprovalRequest)
{
ApplicationArea = SalesReturnOrder;
Caption = 'Send A&pproval Request';
Enabled = not OpenApprovalEntriesExist;
Image = SendApprovalRequest;
ToolTip = 'Request approval of the document.';
trigger OnAction()
var
ApprovalsMgmt: Codeunit "Approvals Mgmt.";
begin
if ApprovalsMgmt.CheckSalesApprovalPossible(Rec) then
ApprovalsMgmt.OnSendSalesDocForApproval(Rec);
end;
}
action(CancelApprovalRequest)
{
ApplicationArea = SalesReturnOrder;
Caption = 'Cancel Approval Re&quest';
Enabled = CanCancelApprovalForRecord;
Image = CancelApprovalRequest;
ToolTip = 'Cancel the approval request.';
trigger OnAction()
var
ApprovalsMgmt: Codeunit "Approvals Mgmt.";
begin
ApprovalsMgmt.OnCancelSalesApprovalRequest(Rec);
end;
}
}
group(Action8)
{
Caption = 'Warehouse';
Image = Warehouse;
action("Create Inventor&y Put-away/Pick")
{
AccessByPermission = TableData "Posted Invt. Put-away Header" = R;
ApplicationArea = Warehouse;
Caption = 'Create Inventor&y Put-away/Pick';
Ellipsis = true;
Image = CreatePutawayPick;
ToolTip = 'Create an inventory put-away or inventory pick to handle items on the document according to a basic warehouse configuration that does not require warehouse receipt or shipment documents.';
trigger OnAction()
begin
Rec.PerformManualRelease();
Rec.CreateInvtPutAwayPick();
end;
}
action("Create &Whse. Receipt")
{
AccessByPermission = TableData "Warehouse Receipt Header" = R;
ApplicationArea = Warehouse;
Caption = 'Create &Whse. Receipt';
Image = NewReceipt;
ToolTip = 'Create a warehouse receipt to start a receive and put-away process according to an advanced warehouse configuration.';
trigger OnAction()
var
GetSourceDocInbound: Codeunit "Get Source Doc. Inbound";
begin
Rec.PerformManualRelease();
GetSourceDocInbound.CreateFromSalesReturnOrder(Rec);
end;
}
}
group("P&osting")
{
Caption = 'P&osting';
Image = Post;
action("Test Report")
{
ApplicationArea = SalesReturnOrder;
Caption = 'Test Report';
Ellipsis = true;
Image = TestReport;
ToolTip = 'View a test report so that you can find and correct any errors before you perform the actual posting of the journal or document.';
trigger OnAction()
begin
ReportPrint.PrintSalesHeader(Rec);
end;
}
action(Post)
{
ApplicationArea = All;
Caption = 'P&ost';
Ellipsis = true;
Image = PostOrder;
ShortCutKey = 'F9';
ToolTip = 'Finalize the document or journal by posting the amounts and quantities to the related accounts in your company books.';
trigger OnAction()
var
SalesHeader: Record "Sales Header";
SalesBatchPostMgt: Codeunit "Sales Batch Post Mgt.";
BatchProcessingMgt: Codeunit "Batch Processing Mgt.";
begin
CurrPage.SetSelectionFilter(SalesHeader);
OnAfterPostingSetSelectionFilter(SalesHeader, Rec);
if SalesHeader.Count > 1 then begin
BatchProcessingMgt.SetParametersForPageID(Page::"Sales Return Order List");
SalesBatchPostMgt.SetBatchProcessor(BatchProcessingMgt);
SalesBatchPostMgt.RunWithUI(SalesHeader, Rec.Count, ReadyToPostQst);
end else
Rec.SendToPosting(Codeunit::"Sales-Post (Yes/No)");
end;
}
action("Preview Posting")
{
ApplicationArea = SalesReturnOrder;
Caption = 'Preview Posting';
Image = ViewPostedOrder;
ShortCutKey = 'Ctrl+Alt+F9';
ToolTip = 'Review the different types of entries that will be created when you post the document or journal.';
trigger OnAction()
var
SelectedSalesHeader: Record "Sales Header";
SalesPostYesNo: Codeunit "Sales-Post (Yes/No)";
begin
CurrPage.SetSelectionFilter(SelectedSalesHeader);
SalesPostYesNo.MessageIfPostingPreviewMultipleDocuments(SelectedSalesHeader, Rec."No.");
SalesPostYesNo.Preview(Rec);
end;
}
action("Post and &Print")
{
ApplicationArea = SalesReturnOrder;
Caption = 'Post and &Print';
Ellipsis = true;
Image = PostPrint;
ShortCutKey = 'Shift+F9';
ToolTip = 'Finalize and prepare to print the document or journal. The values and quantities are posted to the related accounts. A report request window where you can specify what to include on the print-out.';
trigger OnAction()
begin
AssertSalesOrderNotEmpty();
Rec.SendToPosting(Codeunit::"Sales-Post + Print");
end;
}
action("Post and Email")
{
ApplicationArea = SalesReturnOrder;
Caption = 'Post and Email';
Ellipsis = true;
Image = PostMail;
ToolTip = 'Post the sales document and attach it to an email addressed to the customer.';
trigger OnAction()
var
SalesPostPrint: Codeunit "Sales-Post + Print";
begin
AssertSalesOrderNotEmpty();
SalesPostPrint.PostAndEmail(Rec);
end;
}
action("Post &Batch")
{
ApplicationArea = SalesReturnOrder;
Caption = 'Post &Batch';
Ellipsis = true;
Image = PostBatch;
ToolTip = 'Post several documents at once. A report request window opens where you can specify which documents to post.';
trigger OnAction()
var
SalesHeader: Record "Sales Header";
SelectionFilterManagement: Codeunit SelectionFilterManagement;
begin
CurrPage.SetSelectionFilter(SalesHeader);
SalesHeader.SetFilter("No.", SelectionFilterManagement.GetSelectionFilterForSalesHeader(SalesHeader));
REPORT.RunModal(REPORT::"Batch Post Sales Return Orders", true, true, SalesHeader);
CurrPage.Update(false);
end;
}
action("Remove From Job Queue")
{
ApplicationArea = SalesReturnOrder;
Caption = 'Remove From Job Queue';
Image = RemoveLine;
ToolTip = 'Remove the scheduled processing of this record from the job queue.';
Visible = JobQueueActive;
trigger OnAction()
begin
Rec.CancelBackgroundPosting();
end;
}
}
}
area(Promoted)
{
group(Category_Process)
{
Caption = 'Process', Comment = 'Generated from the PromotedActionCategories property index 1.';
actionref("Get Posted Doc&ument Lines to Reverse_Promoted"; "Get Posted Doc&ument Lines to Reverse")
{
}
}
group(Category_Category5)
{
Caption = 'Release', Comment = 'Generated from the PromotedActionCategories property index 4.';
ShowAs = SplitButton;
actionref(Release_Promoted; Release)
{
}
actionref(Reopen_Promoted; Reopen)
{
}
}
group(Category_Category7)
{
Caption = 'Posting', Comment = 'Generated from the PromotedActionCategories property index 6.';
ShowAs = SplitButton;
actionref(Post_Promoted; Post)
{
}
actionref("Post and Email_Promoted"; "Post and Email")
{
}
actionref("Post and &Print_Promoted"; "Post and &Print")
{
}
actionref("Preview Posting_Promoted"; "Preview Posting")
{
}
actionref("Post &Batch_Promoted"; "Post &Batch")
{
}
}
group(Category_Category6)
{
Caption = 'Print/Send', Comment = 'Generated from the PromotedActionCategories property index 5.';
actionref("&Print_Promoted"; "&Print")
{
}
actionref(AttachAsPDF_Promoted; AttachAsPDF)
{
}
}
group(Category_Category4)
{
Caption = 'Request Approval', Comment = 'Generated from the PromotedActionCategories property index 3.';
}
group(Category_Category8)
{
Caption = 'Return Order', Comment = 'Generated from the PromotedActionCategories property index 7.';
actionref(Dimensions_Promoted; Dimensions)
{
}
actionref(SalesOrderStatistics_Promoted; SalesOrderStatistics)
{
}
actionref("Co&mments_Promoted"; "Co&mments")
{
}
actionref(Approvals_Promoted; Approvals)
{
}
}
group(Category_Report)
{
Caption = 'Report', Comment = 'Generated from the PromotedActionCategories property index 2.';
}
}
}
trigger OnAfterGetCurrRecord()
begin
SetControlAppearance();
end;
trigger OnAfterGetRecord()
begin
StatusStyleTxt := Rec.GetStatusStyleText();
end;
trigger OnOpenPage()
var
SalesSetup: Record "Sales & Receivables Setup";
begin
Rec.SetSecurityFilterOnRespCenter();
JobQueueActive := SalesSetup.JobQueueActive();
Rec.CopySellToCustomerFilter();
end;
var
ReportPrint: Codeunit "Test Report-Print";
DocPrint: Codeunit "Document-Print";
JobQueueActive: Boolean;
OpenApprovalEntriesExist: Boolean;
CanCancelApprovalForRecord: Boolean;
ReadyToPostQst: Label 'The number of return orders that will be posted is %1. \Do you want to continue?', Comment = '%1 - selected count';
NoSalesOrderErr: Label 'You must select a sales return order before you can perform this action.';
StatusStyleTxt: Text;
local procedure SetControlAppearance()
var
ApprovalsMgmt: Codeunit "Approvals Mgmt.";
begin
OpenApprovalEntriesExist := ApprovalsMgmt.HasOpenApprovalEntries(Rec.RecordId);
CanCancelApprovalForRecord := ApprovalsMgmt.CanCancelApprovalForRecord(Rec.RecordId);
end;
local procedure AssertSalesOrderNotEmpty()
begin
if not Rec.Find() then
Error(NoSalesOrderErr);
end;
[IntegrationEvent(false, false)]
local procedure OnAfterPostingSetSelectionFilter(var SalesHeaderToPost: Record "Sales Header"; CurrPageSalesHeader: Record "Sales Header")
begin
end;
}