RE: Free form read into a data structure

[Paul Jackson <pjackson@xxxxxxxxxx>]

Here's what may be the problem:
(From the V5R3 RPG Reference)

READ{(EN)} name {data-structure}

"If name refers to an externally-described file or a record format from an
externally described file, the data structure must be a data structure
defined with EXTNAME(...:*INPUT) or LIKEREC(...:*INPUT)"

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of Dave Murvin
Sent: Thursday, April 14, 2005 1:02 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: Free form read into a data structure


I am having trouble determining how to code the free form read into a data 
structure;

FIIM       IF   E             Disk    ExtFile('*LIBL/IIM')

D IIMDS         E DS                  ExtName(IIM)

      Read IIM IIMDS ;

compiler complains:
  *RNF0202 20        011500  THE RESULT DATA STRUCTURE IIMDS DOES NOT 
INCLUDE A SUBFIELD
                             IN POSITION 1 FOR RECORD IPI100IM.

I can't figure out what this it trying to tell me.  The data structure in 
the compiled listing includes all the fields in the record.  I know I must 
be missing something, but have not been able to find a good example in the 
manual or in the archives (could not figure out what to search on to get 
the right results).

Thanks

Dave Murvin
DRM Enterprises, Inc.


-- 
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.