Is this a bug?

[Gurrieri Fabrizio <fabrizio.gurrieri@xxxxxxxxxxxx>]

This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
--
[ Picked text/plain from multipart/alternative ]
Hallo, I've a curious problem like that:
In an RPGLE *PGM I define an intenal table named "TABPGM"

D*------------
D TABPGM          S             12    DIM(10) CTDATA PERRCD(1)
D*------------

the RPG compiler recognize the TABPGM such as a table but when I try to use
TABPGM through index

C                   DOW       i<=%elem(TABPGM)
C                   IF        TABPGM(i) > *blanks
C                   EVAL      DSTABPGM = TABPGM(i)

the compiler stop and say that "i" isn't a valid index for TABPGM.

If I rename TABPGM into PGMTAB the compiler have not any problem and all
works fine.

Any ideas?





Fabrizio Gurrieri - BARTOLINI SPA
40138 BOLOGNA (Italy)