RE: Prototype Field References

I have found that using an external data structure to base other
definitions on can greatly increase the program object size.  I have a
reference file with a record format size of 4748 bytes with 621 fields.
Using the following;

D TYPES_DS      E DS                  EXTNAME(RIMREFPF) BASED(@)
PREFIX(@)  
 
I checked the size of the program object and it was over 800K.  If I
removed the external data structure and use explicitly define the
reference fields in the program, my program object size dropped by over
100K.  

I have not totally stopped using external data structures for field
definition referencing, but it makes me stop and think about which one I
will use. 

Thank you,
Matt Tyler
WinCo Foods, LLC
mattt@xxxxxxxxxxxxxx

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Marco Facchinetti
Sent: Thursday, September 29, 2005 2:26 AM
To: RPG programming on the AS400 / iSeries
Subject: RE: Prototype Field References

About prototype definitions you can use the like keyword.
Our standard is to define the ds (dictionary) in all the programs, of
course
the ds is based on a pointer so there is no memory waste and since the
pointer is never set we cannot modify (and use) the fields.

E.g. d mydiz      e ds       based(p_mydiz)

This is working since we have a package and the srvpgm are for internal
use
only (we are not selling the service programs to somebody else). Of
course
if you have to distribute your programs this is not the right way.

HTH
Marco