RE: data structure length problem

Did anyone else notice?  Someone is trying to learn how to write RPG!
Considering all the moaning and whining about people not knowing about the
400, here is someone who is trying to learn RPG.  This is refreshing!

About your coding issue, could I see some code?  I suspect that you need a
data structure over some fields and that one of the sub-fields needs to be
801 bytes.  There are some little coding tricks to make that easy.  It will
be a lot easier to explain if I can use your code as an example.

Richard Jackson
mailto:richardjackson@richardjackson.net
http://www.richardjacksonltd.com
Voice: 1 (303) 808-8058
Fax:   1 (303) 663-4325

-----Original Message-----
From: owner-rpg400-l@midrange.com [mailto:owner-rpg400-l@midrange.com]On
Behalf Of Jo-Anne Giblin
Sent: Thursday, September 14, 2000 3:02 PM
To: RPG400-L@midrange.com
Subject: Re: data structure length problem


Sporter

RPG III has a field limit of 256, however RPGIV does not. If you are using
RPG III you need
to split the one 801 character field into several fields.  I would convert
it to RPGIV, recompile and you will be OK.



>>> sporter@bestdist.com 09/14/00 04:34PM >>>
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
+---

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