mirror of
https://github.com/microsoft/BCQuality.git
synced 2026-10-05 06:36:55 +01:00
fa63d5526c
Move Finance knowledge to the Microsoft-owned layer, add nine scoped rules with eighteen AL samples, and register bounded Finance review with complete paired evaluation coverage. Co-authored-by: Copilot App <223556219+Copilot@users.noreply.github.com>
18 lines
607 B
AL
18 lines
607 B
AL
// Demonstration only; independently authored, not copied from BaseApp.
|
|
codeunit 50106 "Reverse Selected Posting"
|
|
{
|
|
procedure RequestReversal(SelectedEntryNo: Integer)
|
|
var
|
|
GLEntry: Record "G/L Entry";
|
|
ReversalEntry: Record "Reversal Entry";
|
|
begin
|
|
if not GuiAllowed() then
|
|
Error(InteractiveSessionErr);
|
|
GLEntry.Get(SelectedEntryNo);
|
|
GLEntry.TestField("Transaction No.");
|
|
ReversalEntry.ReverseTransaction(GLEntry."Entry No.");
|
|
end;
|
|
|
|
var
|
|
InteractiveSessionErr: Label 'Request the reversal from an interactive session.';
|
|
}
|