| View previous topic :: View next topic |
| Author |
Message |
vkphani
Intermediate
Joined: 05 Sep 2003
Posts: 483
Topics: 48
|
 Posted: Thu Oct 06, 2005 11:37 pm Post subject: Problem with INDEX |
 |
|
Hi,
I have a varible declared in my copybook as below.
| Quote: | 05 OAA0006-API-OUTPUT-DATA.
10 OAA0006-OUTPUT-BANKS OCCURS 100 TIMES INDEXED BY I.
15 OAA0006-SETT-BANK-ID PIC S9(3)V COMP-3.
15 OAA0006-CLG-BANK-ID PIC S9(3)V COMP-3. |
The following statements on index (I) are present in the COBOL program.
| Quote: | SET I TO 1
.......
IF I = 101
.......
SET I UP BY 1 |
I am using the copybook in my program.
During compilation I am getting the following errors:
| Quote: | | "OAA0006-SETT-BANK-ID OF OAA0006-API-OUTPUT-DATA" was a table element but was not subscripted or indexed. The first occurrence of the table element was assumed. |
| Quote: | | "OAA0006-CLG-BANK-ID OF OAA0006-API-OUTPUT-DATA" was a table element but was not subscripted or indexed. The first occurrence of the table element was assumed. |
Could anybody please help me with this. |
|
| Back to top |
|
 |
vkphani
Intermediate
Joined: 05 Sep 2003
Posts: 483
Topics: 48
|
| Posted: Fri Oct 07, 2005 12:15 am Post subject: |
|
|
Hi All,
I got the solution.
Earlier My code was like this:
| Quote: |
MOVE X OAA0006-SETT-BANK-ID(OAA0006-API-OUTPUT-DATA).
MOVE Y OAA0006-CLG-BANK-ID(OAA0006-API-OUTPUT-DATA).
|
Now I changed these statements as below:
| Quote: |
MOVE X OAA0006-SETT-BANK-ID(I).
MOVE Y OAA0006-CLG-BANK-ID(I).
|
|
|
| Back to top |
|
|
|
|
|
FAQ
Search
Quick Manuals
Register
Profile
Log in to check your private messages
Log in
