Index out of bounds

(0) Share

Report

Posted on by jsshivalik

3,027

Below is the code. Accountname,AccountValue has Dimensions = 10

AccountName is Text , AccountValue is Decimal. Secondly i have defined found as Text . What i need to change if i define it as Boolean.

G/L Entry - OnAfterGetRecord()
  Ctr := 0;
      WHILE Ctr <= 9 DO BEGIN
        IF GLEntry."G/L Account Name" =  AccountName[Ctr] THEN BEGIN
          AccountValue[Ctr] += GLEntry.Amount;
          found := 'TRUE';
        END;
        Ctr := Ctr + 1;
      END;
      
      IF found = 'False' THEN BEGIN
        AccountName[g_ctr] := GLEntry."G/L Account Name";
        AccountValue[g_ctr] := GLEntry.Amount;
        g_ctr := g_ctr + 1;
      END;

Thanks

*This post is locked for comments

All responses (2)

Answers (1)

Suggested answer

Binesh 7,885 on at

Like (0)

Report

RE: Index out of bounds

Hello,

as we suggested assign

Ctr := 1;
Verified answer

Mohana Yadav 59,137 Super User 2024 Season 2 on at

Like (0)

Report

RE: Index out of bounds

try

Ctr := 1;