RE: Updating Records

[Holden Tommy <Tommy.Holden@xxxxxxxxxxxxxxxxx>]

do you have more than 1 F spec for this file??

Thanks,
Tommy Holden


-----Original Message-----
From: D.W. Palme [mailto:dpalme@xxxxxxxxxxxxxxxxxxxxx]
Sent: Wednesday, November 17, 2004 9:55 PM
To: 'RPG programming on the AS400 / iSeries'
Subject: RE: Updating Records


I do have the A there already, but it is complaining that it is already
defined as an INPUT record


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Rich Duzenbury
Sent: Wednesday, November 17, 2004 9:47 PM
To: RPG programming on the AS400 / iSeries
Subject: Re: Updating Records


On Wed, 2004-11-17 at 21:40, D.W. Palme wrote:
> I have a program that I am trying to write and I have made some 
> progress with this, but now I have run into something of which I am 
> not sure how to handle.
> 
> I have an F spec for a file as an INPUT file....so I can read some 
> records from it.  When I try to define it as an Output file the 
> compiler burps and throws a fit LOL

You don't say which RPG you are using, but there is an 'Addition' flag
field:

 FMT F  FFilename++IPEASFRlen+LKlen+AIDevice+.Keywords
0001.00 Ffoo       if a e             disk

See the 'a' between the 'if' and 'e'?  This F spec can interpreted as:
Allow access to the disk file named foo, an externally described file,
opened as input, full procedural, with add support.

--
Regards,
Rich

Current Conditions in Des Moines, IA
Overcast
Temp 60.8F
Winds out of the South at 6mph
Moderate Mist 

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


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