Hi,

It is regarding the arrays TableID and No in function CreateDim in table 81 ”Gen. Journal Line”, and all the places where they are referenced.

If multiple extensions hook onto the OnAfterCreateDimTableIDs, then a length of 10 is too short. We need more space.

---

   var

    TableID: array[10] of Integer;

    No: array[10] of Code[20];

    IsHandled: Boolean;

  begin

    IsHandled := false;

    OnBeforeCreateDim(Rec, IsHandled, CurrFieldNo);

    if IsHandled then

      exit;

    TableID[1] := Type1;

    No[1] := No1;

    TableID[2] := Type2;

    No[2] := No2;

    TableID[3] := Type3;

    No[3] := No3;

    TableID[4] := Type4;

    No[4] := No4;

    TableID[5] := Type5;

    No[5] := No5;

    OnAfterCreateDimTableIDs(Rec, CurrFieldNo, TableID, No);

 It would be great, if the arrays could be reseized to something larger than 10, like 25 or 50 or something else, but 10 is not big enough.

Best regards

Per