Re: Subfield lenght cannot exceed 256 bytes

Hi,
     First, I'd like to say (just to get it out of the way) that the
silly 256-max length restriction was removed in RPG IV (ILE RPG/400)
and unless its NOT an option, I'd strongly suggest using RPG IV, its
a far more robust language.

Assuming that you can't use RPG IV:

Although a single field's length is limited to 256, data structures
and arrays are not.  This provides with some simple workarounds to
your problem.

You did not mention WHY you're using a data structure.  Depending on
what else you're doing with the data structure, you can simply define
multiple subfields in the DS, like so:

     ** Example for a 400 byte record length:
     IDSREC       DS
     I                                        1 256 PART1
     I                                      257 400 PART2
     .... then later in the program ...
     C                     CALL 'MYPGM'
     C                     PARM           DSREC

If for some reason, you can't do it that way, another method is to
use an array instead of a data structure:
     E                    REC       400  1
     I            DS
     I                                        1 400 REC
     .... then later in the program ...
     C                     CALL 'MYPGM'
     C                     PARM           REC


Good Luck...


Sanjiv Hati <hattys@yahoo.com> wrote:
>
> Hi all
>
> I am using a DS structure in RPG/400 to store a record
> from a physical file . The length of the record is
> more than 256 bytes. But when I declare the length of
> the subfield of the data structure as 9999 and then
> compile my program it give compilation error i.e.
> subfield length can't exceed 256. The basic purpose is
> to pass this subfield as parameter to another pgm.
>
> I want to pass charater data as parameter with length
> 9999 to another pgm (or more than 9999) specifically
> in RPG/400.
>
> Can anyone provide with a solution.
>
> Thank you in advance.
>
> Sanjiv Kumar Hati
> BFL software
> Bangalore
> India.
+---
| 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
+---