Help on defining field names using an array

FAB10LF  IF  F      69 15AI     1 DISK
E                    I          14 17 0 
IDSSRPF      DS                             69          
I                                        1  15 ABKEY    
I                                    P  16  240I,1      
I                                    P  25  330I,2      
I                                    P  34  420I,3      
I                                    P  43  510I,4      
I                                    P  52  600I,5      
I                                    P  61  690I,6 
========================================================================
I am trying to define the fields in positions 16 to 69 using an array in the
above program. But I am getting the following errors.
     
QRG4072 Severity:  30   Number:   26                                   
        Message . . . . :   Subfield-Name specified already defined as 
          Subfield-Name. Specification line ignored.                   
QRG4085 Severity:  30   Number:    2                                   
        Message . . . . :   Data Structure subfield name is invalid.   
          Specification line ignored.                                

Can anyone please help me to fix this problem.   

Regards,
S.Ramesh

____________________________________________________________________
Get free email and a permanent address at http://www.netaddress.com/?N=1
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---