"not uniquely defined" error in COBOL.

[Akshypal]

In a COBOL program I have the following defitions

Code: Select all

01  VCT11DCA EXTERNAL. 
    05  FGEHA         OCCURS 100 USAGE IS POINTER. 
    05  FILLER                   PIC X(4). 

and

Code: Select all

01  VCT11ACD EXTERNAL. 
    05  FGEHA         OCCURS 100 USAGE IS POINTER. 
    05  FILLER                   PIC X(4). 

Later in the programI use

Code: Select all

 SET FGEHA(001) OF VCT11DCA TO ADDRESS OF ADDRSVAR

But this ends in error with "FGEHA is not uniqiely defined". What should I do so the error does not occur.

[zprogrammer]

You need to inform to which 01 level you are trying to set

[William Collins]

It is the name that you are qualifying, so you qualify first and then subscript:

Code: Select all

 SET FGEHA OF VCT11DCA ( 001 )
                            TO ADDRESS OF ADDRSVAR

[Akshypal]

It is the name that you are qualifying, so you qualify first and then subscript:

Code: Select all

 SET FGEHA OF VCT11DCA ( 001 )
                            TO ADDRESS OF ADDRSVAR

Excellent! Thanks William.