mirror of
https://github.com/microsoft/BCQuality.git
synced 2026-10-07 15:46:55 +01:00
Expand Finance pilot into a source-verified review domain
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>
This commit is contained in:
parent
639b6d1870
commit
fa63d5526c
38 changed files with 1064 additions and 124 deletions
|
|
@ -0,0 +1,32 @@
|
|||
// Demonstration only; independently authored, not copied from BaseApp.
|
||||
codeunit 50101 "Correct Posted Transaction"
|
||||
{
|
||||
procedure RequestTransactionReversal(EntryNo: Integer)
|
||||
var
|
||||
GLEntry: Record "G/L Entry";
|
||||
begin
|
||||
if not GuiAllowed() then
|
||||
Error(InteractiveSessionErr);
|
||||
GLEntry.Get(EntryNo);
|
||||
GLEntry.TestField("Transaction No.");
|
||||
GLEntry.Amount := -GLEntry.Amount;
|
||||
GLEntry.Modify(true);
|
||||
end;
|
||||
|
||||
procedure UpdateDescription(EntryNo: Integer; NewDescription: Text[100])
|
||||
var
|
||||
GLEntry: Record "G/L Entry";
|
||||
begin
|
||||
GLEntry.Get(EntryNo);
|
||||
GLEntry.Description := NewDescription;
|
||||
Codeunit.Run(Codeunit::"G/L Entry-Edit", GLEntry);
|
||||
end;
|
||||
|
||||
procedure ClearSimulation(var TempGLEntry: Record "G/L Entry" temporary)
|
||||
begin
|
||||
TempGLEntry.DeleteAll();
|
||||
end;
|
||||
|
||||
var
|
||||
InteractiveSessionErr: Label 'Request the reversal from an interactive session.';
|
||||
}
|
||||
Loading…
Add table
Add a link
Reference in a new issue