No Subject

[owner-rpg400-l@xxxxxxxxxxxx]

<E4C0F071C1ADD211BFB00008C7B20EE007279C01@endeavor.bentlynevada.com>
From: "MCPARTLAND, Stan" <stanley.mcpartland@bently.com>
To: "'RPG400-L@midrange.com'" <RPG400-L@midrange.com>
Subject: RE: data structure length problem
Date: Thu, 14 Sep 2000 14:12:31 -0700
MIME-Version: 1.0
X-Mailer: Internet Mail Service (5.5.2448.0)
Content-Type: text/plain;
        charset="iso-8859-1"
Sender: owner-rpg400-l@midrange.com
Reply-To: RPG400-L@midrange.com
X-List-Name: RPG/400 Discussion Mailing List (RPG400-L@midrange.com)

Sean,

RPGIV will solve your problem.  However, you might be able to use RPGIII if
the error is occurring because you have specified the entire record as a
subfield in the data structure and not because one of your actual fields is
greater than 256 chars.  Assuming the name of the 801 character field is RCD
use this:

      IRCD         DS
      I                                        1  10 FLD01
      I                                       11  20 FLD02
      ...

instead of this:

      I            DS
      I                                        1 801 RCD
      I                                        1  10 FLD01
      I                                       11  20 FLD02
      ...

Defining a field as an entire data structure is a way around the 256
character field length limitation in RPGIII.

Regards,
Stan


-----Original Message-----
From: Sean Porterfield [mailto:sporter@bestdist.com]
Sent: Thursday, September 14, 2000 1:35 PM
To: rpg400-l@midrange.com
Subject: data structure length problem


Hi all, I'm new to the list and having a problem.  I've never had any
RPG training, so please forgive my ignorance.

I'm trying to write a record to a file that is one 801 character field.
It is made up of various different bits of information, so I created a
data structure based on the record format.  I've been getting all kinds
of errors and finally reduced it to one level 10 severity error:


  * QRG4140 Severity:  10   Number:    1
            Message . . . . :   Data-Structure-Subfield length exceeds
256.
              Subfield length defaults to 256.

I tried compiling anyway (changing the severity on the CRTRPGPGM
command) to see what would happen, but it wrote blank records to my
file.  Is there a trick to making it work?  Would it work in RPG IV
instead of RPG III?

I've tried many, many different ways of creating the data structure, but
nothing has worked.   The online manual wasn't very helpful to me.

I'd be happy to provide code if that will help.  Thanks!

+---
| 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
+--- 

+---
| 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
+---