|
S R wrote: >======================================================================== Hi Ramesh Try this, I have tested it, i it compiled normally, should work. I am sorry for replying so late.I would like to do like this. I do not know your requirement about subfield. I am just modfying your code. >FAB10LF IF F 69 15AI 1 DISK >E I 14 17 0 >IDSSRPF DS 141 >I 1 15 ABKEY >I P 16 1410I >I P 16 240I1 >I P 25 330I2 >I P 34 420I3 >I P 43 510I4 >I P 52 600I5 >I P 61 690I6 >======================================================================== >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. +--- | 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 +---
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.