RE: Two Questions.

["Joel Fritz" <JFritz@xxxxxxxxxxxxxxxx>]

DSPFFD to an outfile gives the record length in field WHRLEN in every
record.  I imagine there's an api that mirrors the command.

> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Shaheen Ahmed
> Sent: Wednesday, May 11, 2005 12:47 PM
> To: RPG programming on the AS400 / iSeries
> Subject: RE: Two Questions.
>
> I want to say thank you to all who reply my question.
> The reason I asked two questions is because we have some old
> RPG programs where we hard coded the length of the externally
> defined files in a data structure and then use this data
> structure to CALL RPG/CL programs. Whenever we add/change
> fields into these files we have to go to the individual
> programs (RPG/CL) to change the length of the data structures/Fields.
> Now I know I can change my RPG programs to get the current
> record length of the files instead of hard coded length but
> this can't be done in CL programs.
> Wouldn't it be a good idea to ask IBM to allow us to use a
> variable name to define the length of a field or data structur?
> For example in file information data structure (INFSR)
> position 125-126 (binary) keeps the record length of a file.
> (RecLength              125    126B 0) I wish somehow we can
> use the value of RecLength field to define the length of a field.
>     

*****************************
NOTICE:
All e-mail sent to or from this e-mail address will be received or otherwise 
recorded by
The Sharper Image corporate e-mail system and is subject to archival, 
monitoring,
and review by and/or disclosure to Sharper Image security and other management.
This message is intended only for the use of the addressee and may contain 
information
that is privileged and confidential.

The contents of this message may contain personal views which are not the views 
of The Sharper Image.
If you are not the intended recipient, dissemination of this communication is 
prohibited.
*****************************