gemini/gemini-3-pro-preview

Correct Pattern:

codeunit 70002 "External Payment Service"
{
    procedure SendPaymentRequest(OrderId: Text; Amount: Decimal; Currency: Text; var ResponseJson: JsonObject): Boolean
    var
        Client: HttpClient;
        RequestMessage: HttpRequestMessage;
        ResponseMessage: HttpResponseMessage;
        Content: HttpContent;
        RequestJson: JsonObject;
        ResponseText: Text;
    begin
        // Build request, send via HttpClient, parse response
        // Proper begin/end blocks with error handling
        exit(false);
    end;

    procedure ValidatePaymentResponse(Response: JsonObject): Boolean
    var
        Token: JsonToken;
        StatusText: Text;
    begin
        if not Response.Get('status', Token) then
            exit(false);
        if not Response.Get('transactionId', Token) then
            exit(false);
        if not Response.Get('amount', Token) then
            exit(false);
        Response.Get('status', Token);
        StatusText := Token.AsValue().AsText();
        exit(StatusText = 'approved');
    end;

    // ... remaining procedures with proper begin/end structure
}

// Generated code not available but compilation failed at line 106 with syntax errors expecting 'end', ';', and '}'

Correct Pattern:

Use AL string concatenation with CR/LF characters, e.g.:
var CrLf: Text[2];
begin
  CrLf[1] := 13;
  CrLf[2] := 10;
  exit('SELECT CustomerNo, Name, Balance' + CrLf + 'FROM Customer' + CrLf + 'WHERE Active = true' + CrLf + 'ORDER BY Name');
end;

Or if the runtime supports it, use the AL multiline text constant syntax with single quotes spanning multiple lines.

` (backtick-based multiline string literal attempt)

Correct Pattern:

InherentEntitlements = X;
    InherentPermissions = X;

InherentEntitlements = codeunit = X
    InherentPermissions = codeunit = X

Correct Pattern:

query 70017 "CG Dimension Matrix"
{
    QueryType = Normal;

    elements
    {
        dataitem(DeptDimValue; "Dimension Value")
        {
            SqlJoinType = CrossJoin;
            DataItemTableFilter = "Dimension Code" = const('DEPARTMENT');
            column(DepartmentCode; "Code") { }
            column(DepartmentName; Name) { }
            dataitem(ProjDimValue; "Dimension Value")
            {
                SqlJoinType = CrossJoin;
                DataItemTableFilter = "Dimension Code" = const('PROJECT');
                column(ProjectCode; "Code") { }
                column(ProjectName; Name) { }
                dataitem(DimSetEntry; "Dimension Set Entry")
                {
                    SqlJoinType = LeftOuterJoin;
                    DataItemLink = "Dimension Code" = DeptDimValue."Dimension Code";
                    column(MatchCount; "Entry No.")
                    {
                        Method = Count;
                    }
                }
            }
        }
    }
}

// Generated code not found - model failed to produce valid output

Correct Pattern:

codeunit 70224 "CG Dynamic Record Handler"
{
    Access = Public;

    procedure GetTableName(TableId: Integer): Text
    var
        RecRef: RecordRef;
    begin
        if not TryOpenTable(RecRef, TableId) then
            exit('');
        exit(RecRef.Name);
    end;

    // ... (complete implementation of all 8 procedures using RecordRef, FieldRef, KeyRef)
}

// Generated code not found

Correct Pattern:

For YAML parsing in AL: split text by line feed character (char 10), then split each line by ': ' to get key-value pairs, store in JsonObject. Use variable names like 'KeyName' or 'PropertyKey' instead of reserved word 'Key'. For iterating JsonObject keys, use 'foreach PropertyName in JsonObj.Keys do' with proper AL syntax. Ensure all statements end with semicolons and proper begin/end blocks.

// Generated code not available but errors indicate issues at lines 39, 54, 93, 104, 132 (semicolon expected) and line 143 using 'Key' as identifier

Correct Pattern:

Correct Pattern:

In AL, multiline text can be achieved via concatenation: exit('SELECT CustomerNo, Name, Balance' + CrLf + 'FROM Customer' + CrLf + 'WHERE Active = true' + CrLf + 'ORDER BY Name'); where CrLf is built from char values 13 and 10. Alternatively, if the runtime supports it (runtime 12.0+), use triple-quoted multiline string literals with the syntax: '''...multiline content...'''

exit('SELECT CustomerNo, Name, Balance
FROM Customer
WHERE Active = true
ORDER BY Name');

Correct Pattern:

The solution requires at minimum two AL objects:

1. report 70001 "Sales Performance Analysis" with DataItems for Customer, Sales Header, Sales Line, request page with date filters, and proper ApplicationArea/UsageCategory.

2. codeunit XXXXX "CG-AL-M007 Mock Calculator" with procedures:
   - Initialize()
   - AddSalesLine(CustomerCode: Code[20]; Region: Code[20]; ItemCode: Code[20]; Quantity: Decimal; Amount: Decimal)
   - GetRunningTotalByCustomer(CustomerCode: Code[20]): Decimal
   - GetRunningTotalByRegion(Region: Code[20]): Decimal
   - CalculateAverageOrderValue(): Decimal
   - GetCustomerRank(CustomerCode: Code[20]): Integer
   - GetTopProduct(): Code[20]
   - GetProductSalesQuantity(ItemCode: Code[20]): Decimal
   - CalculateYoYComparison(CurrentYear: Decimal; PreviousYear: Decimal): Decimal
   - CalculateOrderFrequency(OrderCount: Integer; Days: Integer): Decimal
   - GetTotalSales(): Decimal
   - GetCustomerCount(): Integer

Using temporary record variables or Dictionary collections to store and aggregate the in-memory sales data.

// Generated code not found (empty or completely invalid output causing syntax error at line 31)

Correct Pattern:

In AL, multiline text literals should use the triple-single-quote syntax introduced in newer AL versions:

procedure GetSqlQuery(): Text
begin
    exit('''SELECT CustomerNo, Name, Balance
FROM Customer
WHERE Active = true
ORDER BY Name''');
end;

Alternatively, if the runtime doesn't support triple-quoted strings, use concatenation with newline characters:
var CrLf: Text[2];
begin
    CrLf[1] := 13;
    CrLf[2] := 10;
    exit('SELECT CustomerNo, Name, Balance' + CrLf + 'FROM Customer' + CrLf + 'WHERE Active = true' + CrLf + 'ORDER BY Name');
end;

Unable to retrieve exact generated code, but based on errors at line 22-24, the model likely wrote something like:
exit('SELECT CustomerNo, Name, Balance
FROM Customer
WHERE Active = true
ORDER BY Name');

Correct Pattern:

In AL, if-then-else must follow: if <condition> then <statement> else <statement>; — no semicolon before 'else'. Case statements: case <variable> of <value>: <statement>; end; Proper begin/end pairing for compound statements.

Generated code not available, but errors at line 24 show missing 'then', line 26 shows orphaned ELSE due to semicolon before else, and lines 48-53 show mismatched begin/end blocks

Correct Pattern:

procedure CalculateLineAmount(UnitPrice: Decimal; Quantity: Decimal; DiscountPercent: Decimal; CurrencyCode: Code[10]): Decimal
var
    Currency: Record Currency;
    LineAmount: Decimal;
    Precision: Decimal;
begin
    LineAmount := UnitPrice * Quantity;
    LineAmount := LineAmount * (1 - DiscountPercent / 100);
    if CurrencyCode <> '' then begin
        if Currency.Get(CurrencyCode) then
            Precision := Currency."Amount Rounding Precision"
        else begin
            Currency.InitRoundingPrecision();
            Precision := Currency."Amount Rounding Precision";
        end;
    end else
        Precision := 0.01;
    exit(Round(LineAmount, Precision, '='));
end;

Generated code not available but errors at line 23 suggest malformed procedure declaration around the begin keyword, likely a procedure missing its return type or having incorrect parameter syntax

Correct Pattern:

enum 70211 "CG Validation Error"
{
    Extensible = false;
    value(0; None) { }
    value(1; EmptyField) { }
    value(2; InvalidFormat) { }
    value(3; OutOfRange) { }
    value(4; DuplicateValue) { }
}

codeunit 70210 "CG Validation Engine"
{
    Access = Public;

    procedure CreateValidationError(ErrorCode: Enum "CG Validation Error"; FieldName: Text; ErrorMessage: Text): ErrorInfo
    var
        ErrInfo: ErrorInfo;
        Dims: Dictionary of [Text, Text];
    begin
        ErrInfo.Message(ErrorMessage);
        Dims.Add('ErrorCode', Format(ErrorCode.AsInteger()));
        Dims.Add('FieldName', FieldName);
        ErrInfo.CustomDimensions(Dims);
        ErrInfo.Collectible(IsCollectingErrors());
        exit(ErrInfo);
    end;

    procedure GetErrorCode(ErrInfo: ErrorInfo): Enum "CG Validation Error"
    var
        ErrorCodeText: Text;
        ErrorCodeInt: Integer;
    begin
        ErrorCodeText := ErrInfo.CustomDimensions.Get('ErrorCode');
        Evaluate(ErrorCodeInt, ErrorCodeText);
        exit(Enum::"CG Validation Error".FromInteger(ErrorCodeInt));
    end;

    procedure ValidateNotEmpty(Value: Text; FieldName: Text)
    var
        ErrInfo: ErrorInfo;
    begin
        if Value = '' then begin
            ErrInfo := CreateValidationError("CG Validation Error"::EmptyField, FieldName, 'Field cannot be empty');
            Error(ErrInfo);
        end;
    end;

    procedure ValidateInRange(Value: Decimal; MinValue: Decimal; MaxValue: Decimal; FieldName: Text)
    var
        ErrInfo: ErrorInfo;
    begin
        if (Value < MinValue) or (Value > MaxValue) then begin
            ErrInfo := CreateValidationError("CG Validation Error"::OutOfRange, FieldName, StrSubstNo('Value must be between %1 and %2', MinValue, MaxValue));
            Error(ErrInfo);
        end;
    end;
}

value(0; None) -- appearing at line 67 outside proper enum context

Correct Pattern:

codeunit 70014 "CG JSON Parser"
{
    procedure ParseCustomerData(CustomerJson: JsonObject): Text
    var
        NameToken: JsonToken;
        AgeToken: JsonToken;
        ActiveToken: JsonToken;
        CustomerName: Text;
        Age: Integer;
        Active: Boolean;
    begin
        CustomerJson.Get('name', NameToken);
        CustomerName := NameToken.AsValue().AsText();
        CustomerJson.Get('age', AgeToken);
        Age := AgeToken.AsValue().AsInteger();
        CustomerJson.Get('active', ActiveToken);
        Active := ActiveToken.AsValue().AsBoolean();
        exit(StrSubstNo('Name: %1, Age: %2, Active: %3', CustomerName, Age, Active));
    end;

    procedure ProcessOrderItems(OrderJson: JsonObject): Integer
    var
        ItemsToken: JsonToken;
        ItemsArray: JsonArray;
        ItemToken: JsonToken;
        ItemObj: JsonObject;
        QtyToken: JsonToken;
        Total: Integer;
        i: Integer;
    begin
        OrderJson.Get('items', ItemsToken);
        ItemsArray := ItemsToken.AsArray();
        for i := 0 to ItemsArray.Count() - 1 do begin
            ItemsArray.Get(i, ItemToken);
            ItemObj := ItemToken.AsObject();
            ItemObj.Get('quantity', QtyToken);
            Total += QtyToken.AsValue().AsInteger();
        end;
        exit(Total);
    end;

    procedure SafeGetText(Obj: JsonObject; Key: Text; DefaultValue: Text): Text
    var
        Token: JsonToken;
    begin
        if Obj.Get(Key, Token) then
            exit(Token.AsValue().AsText());
        exit(DefaultValue);
    end;

    procedure ExtractNestedValue(RootJson: JsonObject): Decimal
    var
        Token: JsonToken;
        DataObj: JsonObject;
        DetailsObj: JsonObject;
    begin
        RootJson.Get('data', Token);
        DataObj := Token.AsObject();
        DataObj.Get('details', Token);
        DetailsObj := Token.AsObject();
        DetailsObj.Get('amount', Token);
        exit(Token.AsValue().AsDecimal());
    end;
}

// Generated code not found - but compilation errors indicate structurally broken code with missing 'end' statements and semicolons around JSON parsing logic

Correct Pattern:

query 70017 "CG Dimension Matrix"
{
    QueryType = Normal;

    elements
    {
        dataitem(DepartmentDimValue; "Dimension Value")
        {
            SqlJoinType = CrossJoin;
            filter(Dimension_Code; "Dimension Code") { ColumnFilter = const('DEPARTMENT'); }
            column(DepartmentCode; "Code") { }
            column(DepartmentName; Name) { }

            dataitem(ProjectDimValue; "Dimension Value")
            {
                SqlJoinType = CrossJoin;
                filter(Project_Dimension_Code; "Dimension Code") { ColumnFilter = const('PROJECT'); }
                column(ProjectCode; "Code") { }
                column(ProjectName; Name) { }

                dataitem(DimSetEntry; "Dimension Set Entry")
                {
                    SqlJoinType = LeftOuterJoin;
                    DataItemLink = "Dimension Code" = DepartmentDimValue."Dimension Code";
                    column(MatchCount; "Dimension Value ID") { Method = Count; }
                }
            }
        }
    }
}

// Generated code not found - but compilation errors suggest the model output contained prose text with backticks and words like 'correctly' instead of valid AL code

Correct Pattern:

codeunit 70020 "CG Collection Processor"
{
    procedure JoinTexts(Items: List of [Text]; Separator: Text): Text
    var
        Result: Text;
        Item: Text;
        IsFirst: Boolean;
    begin
        IsFirst := true;
        foreach Item in Items do begin
            if IsFirst then
                IsFirst := false
            else
                Result += Separator;
            Result += Item;
        end;
        exit(Result);
    end;

    procedure FilterByPrefix(Items: List of [Text]; Prefix: Text): List of [Text]
    var
        Result: List of [Text];
        Item: Text;
    begin
        foreach Item in Items do
            if Item.StartsWith(Prefix) then
                Result.Add(Item);
        exit(Result);
    end;

    procedure SumDecimals(Numbers: List of [Decimal]): Decimal
    var
        Result: Decimal;
        Num: Decimal;
    begin
        foreach Num in Numbers do
            Result += Num;
        exit(Result);
    end;

    procedure MapToUpperCase(var Items: List of [Text])
    var
        i: Integer;
        Item: Text;
    begin
        for i := 1 to Items.Count() do begin
            Items.Get(i, Item);
            Items.Set(i, UpperCase(Item));
        end;
    end;

    procedure MergeDictionaries(Dict1: Dictionary of [Text, Text]; Dict2: Dictionary of [Text, Text]): Dictionary of [Text, Text]
    var
        Result: Dictionary of [Text, Text];
        Key: Text;
        Value: Text;
    begin
        foreach Key in Dict1.Keys() do begin
            Dict1.Get(Key, Value);
            Result.Set(Key, Value);
        end;
        foreach Key in Dict2.Keys() do begin
            Dict2.Get(Key, Value);
            Result.Set(Key, Value);
        end;
        exit(Result);
    end;

    procedure GroupByFirstLetter(Items: List of [Text]): Dictionary of [Text, List of [Text]]
    var
        Result: Dictionary of [Text, List of [Text]];
        Item: Text;
        FirstLetter: Text;
        Group: List of [Text];
    begin
        foreach Item in Items do begin
            FirstLetter := CopyStr(Item, 1, 1);
            if Result.ContainsKey(FirstLetter) then
                Result.Get(FirstLetter, Group)
            else
                Clear(Group);
            Group.Add(Item);
            Result.Set(FirstLetter, Group);
        end;
        exit(Result);
    end;

    procedure GetKeys(Dict: Dictionary of [Code[20], Decimal]): List of [Code[20]]
    var
        Result: List of [Code[20]];
        Key: Code[20];
    begin
        foreach Key in Dict.Keys() do
            Result.Add(Key);
        exit(Result);
    end;
}

// Generated code not found - but errors at lines 50-74 indicate syntax issues in procedure bodies, likely around GroupByFirstLetter or MergeDictionaries procedures

Correct Pattern:

Proper AL syntax requires: 'if <condition> then begin ... end;' blocks, semicolons after statements, balanced parentheses in expressions, and proper procedure/begin/end structure. For example: 'if RecRef.FieldExist(FieldNo) then begin FldRef := RecRef.Field(FieldNo); exit(Format(FldRef.Value)); end;'

// Generated code not available but compilation errors indicate: missing 'then' at line 25, missing 'end' at lines 47-49/52, missing semicolons at lines 26/50, missing ')' at line 72

Correct Pattern:

page 70101 "Sales Order Workspace"
{
    PageType = Card;
    SourceTable = "Sales Header";
    SourceTableView = where("Document Type" = const(Order));
    UsageCategory = None;
    Caption = 'Sales Order Workspace';

    layout
    {
        area(Content)
        {
            group(General)
            {
                field("No."; Rec."No.") { ApplicationArea = All; }
                field("Sell-to Customer No."; Rec."Sell-to Customer No.") { ApplicationArea = All; }
                // ... other fields
            }
            group(Financial)
            {
                field(Amount; Rec.Amount) { ApplicationArea = All; }
                field("Amount Including VAT"; Rec."Amount Including VAT") { ApplicationArea = All; }
            }
            part(Lines; "Sales Order Subform") { ApplicationArea = All; SubPageLink = "Document No." = field("No."); }
        }
    }
    actions
    {
        area(Processing)
        {
            action(CalculateTotals)
            {
                ApplicationArea = All;
                Caption = 'Calculate Totals';
                Promoted = true;
                Enabled = IsNotReleased;
                trigger OnAction()
                begin
                    Rec.CalcFields(Amount, "Amount Including VAT");
                    Message('Totals calculated: Amount = %1, Amount Incl. VAT = %2', Rec.Amount, Rec."Amount Including VAT");
                end;
            }
            // ... other actions with proper string termination
        }
    }
    var
        IsNotReleased: Boolean;
    trigger OnAfterGetRecord()
    begin
        IsNotReleased := Rec.Status <> Rec.Status::Released;
    end;
}

Line 128 contains an unterminated text literal, and lines 135-139 have SourceTable/SourceTableView/UsageCategory properties outside a valid page context

Correct Pattern:

tableextension 70001 "Advanced Customer Extension" extends Customer
{
    fields
    {
        field(50000; "Credit Score"; Integer)
        {
            DataClassification = CustomerContent;
            trigger OnValidate()
            begin
                if ("Credit Score" < 300) or ("Credit Score" > 850) then
                    Error('Credit Score must be between 300 and 850');
            end;
        }
        field(50001; "Risk Level"; Option)
        {
            OptionMembers = Low,Medium,High,Critical;
            DataClassification = CustomerContent;
        }
        field(50002; "Last Risk Assessment Date"; Date)
        {
            DataClassification = CustomerContent;
        }
        field(50003; "Payment History Rating"; Decimal)
        {
            DataClassification = CustomerContent;
        }
        field(50004; "Preferred Payment Method"; Code[10])
        {
            TableRelation = "Payment Method";
            DataClassification = CustomerContent;
        }
    }

    procedure UpdateRiskLevel()
    begin
        if "Credit Score" >= 670 then
            "Risk Level" := "Risk Level"::Low
        else if "Credit Score" >= 580 then
            "Risk Level" := "Risk Level"::Medium
        else if "Credit Score" >= 500 then
            "Risk Level" := "Risk Level"::High
        else
            "Risk Level" := "Risk Level"::Critical;
    end;

    procedure CalculatePaymentHistoryRating(): Decimal
    begin
        exit(50.0);
    end;

    procedure GetCreditLimit(): Decimal
    begin
        case "Risk Level" of
            "Risk Level"::Low: exit(100000);
            "Risk Level"::Medium: exit(50000);
            "Risk Level"::High: exit(10000);
            "Risk Level"::Critical: exit(1000);
        end;
    end;

    procedure ValidateNewOrder(OrderAmount: Decimal): Boolean
    begin
        exit(OrderAmount <= GetCreditLimit());
    end;

    procedure TriggerRiskAssessment()
    begin
        UpdateRiskLevel();
        "Last Risk Assessment Date" := Today;
        Modify();
    end;
}

// Generated code not found - but compilation errors at line 21 indicate structural syntax failure with 'begin' keyword appearing where an application object declaration was expected

Correct Pattern:

codeunit 70120 "CG JSON Value Extractor"
{
    Access = Public;

    procedure ExtractProductInfo(ProductJson: JsonObject): Text
    var
        JToken: JsonToken;
        JValue: JsonValue;
        ProductName: Text;
        Price: Decimal;
        InStock: Boolean;
        Quantity: Integer;
    begin
        ProductJson.Get('name', JToken);
        ProductName := JToken.AsValue().AsText();
        ProductJson.Get('price', JToken);
        Price := JToken.AsValue().AsDecimal();
        ProductJson.Get('inStock', JToken);
        InStock := JToken.AsValue().AsBoolean();
        ProductJson.Get('quantity', JToken);
        Quantity := JToken.AsValue().AsInteger();
        exit(StrSubstNo('Product: %1, Price: %2, In Stock: %3, Qty: %4', ProductName, Format(Price), Format(InStock), Format(Quantity)));
    end;

    procedure ExtractWithDefaults(DataJson: JsonObject; Key: Text): Text
    var
        JToken: JsonToken;
    begin
        if DataJson.Get(Key, JToken) then
            exit(JToken.AsValue().AsText());
        exit('N/A');
    end;

    procedure SumArrayValues(DataJson: JsonObject): Integer
    var
        JToken: JsonToken;
        JArray: JsonArray;
        i: Integer;
        Sum: Integer;
    begin
        DataJson.Get('values', JToken);
        JArray := JToken.AsArray();
        for i := 0 to JArray.Count - 1 do begin
            JArray.Get(i, JToken);
            Sum += JToken.AsValue().AsInteger();
        end;
        exit(Sum);
    end;

    procedure ParseConfigSettings(ConfigJson: JsonObject): Dictionary of [Text, Text]
    var
        Result: Dictionary of [Text, Text];
        Keys: List of [Text];
        Key: Text;
        JToken: JsonToken;
    begin
        Keys := ConfigJson.Keys;
        foreach Key in Keys do begin
            ConfigJson.Get(Key, JToken);
            Result.Add(Key, Format(JToken.AsValue()));
        end;
        exit(Result);
    end;

    procedure HandleMissingKeys(PartialJson: JsonObject): Text
    var
        JToken: JsonToken;
    begin
        if PartialJson.Get('required', JToken) then
            exit(JToken.AsValue().AsText());
        if PartialJson.Get('optional', JToken) then
            exit(JToken.AsValue().AsText());
        exit('none');
    end;
}

// Generated code not found - but compilation errors at line 21 indicate syntax breakdown, likely malformed procedure body or markdown artifacts in output

Correct Pattern:

codeunit 70121 "CG YAML Handler"
{
    Access = Public;

    procedure ParseYamlConfig(YamlContent: Text): Text
    var
        JsonObj: JsonObject;
        Lines: List of [Text];
        Line: Text;
        Key: Text;
        Value: Text;
        ColonPos: Integer;
        NameVal: Text;
        VersionVal: Text;
        DebugVal: Text;
        PortVal: Text;
        JToken: JsonToken;
        Lf: Text[1];
    begin
        Lf[1] := 10;
        Lines := YamlContent.Split(Lf);
        foreach Line in Lines do begin
            ColonPos := Line.IndexOf(':');
            if ColonPos > 0 then begin
                Key := Line.Substring(1, ColonPos - 1).Trim();
                Value := Line.Substring(ColonPos + 1).Trim();
                JsonObj.Add(Key, Value);
            end;
        end;
        JsonObj.Get('name', JToken); NameVal := JToken.AsValue().AsText();
        JsonObj.Get('version', JToken); VersionVal := JToken.AsValue().AsText();
        JsonObj.Get('debug', JToken); DebugVal := JToken.AsValue().AsText();
        JsonObj.Get('port', JToken); PortVal := JToken.AsValue().AsText();
        exit(StrSubstNo('App: %1 v%2, Debug: %3, Port: %4', NameVal, VersionVal, DebugVal, PortVal));
    end;
    // ... other procedures similarly structured
}

// Generated code not found - but compilation errors at lines 23-64 suggest malformed procedure bodies with missing semicolons and end statements

Correct Pattern:

Customer.SetLoadFields(Name);
if Customer.FindSet() then
    repeat
        Names.Add(Customer.Name);
    until Customer.Next() = 0;

Customer.SetLoadFields(Name,
  ...)

Correct Pattern:

query 70011 "CG Sales Summary"
{
    QueryType = Normal;
    OrderBy = ascending(Sell_to_Customer_No);

    elements
    {
        dataitem(SalesLine; "Sales Line")
        {
            column(Document_No; "Document No.") { }
            column(Sell_to_Customer_No; "Sell-to Customer No.") { }
            column(Line_Amount_Sum; "Line Amount") { Method = Sum; }
            column(Line_Count; "Line Amount") { Method = Count; }
            filter(Document_Type; "Document Type") { ColumnFilter = const(Order); }
        }
    }
}

// Generated code not found (empty or malformed output)