RE: Writing to multiple physical files with the same format -- RPG400-L

Peter,

I don't think the open/close would be a problem.

Simply leave the file open, on the next call, check to see if it's for the same facility. If not,
then close the current file and reopen the correct one.

While you normally want a trigger program to avoid open/close, that's really only a consideration when
the trigger is fired for lots of records. As long as your trigger is fired for lots of records within
a single facility at a time, the extra open/closes when switching facilities should be insignificant.

Now if you update 1 record for Facility A, then one for B, one for C,...

You'd have a problem.

Charles Wilt
--
Software Engineer
CINTAS Corporation - IT 92B
513.701.1307

wiltc@xxxxxxxxxx

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Peter Dow (ML)
Sent: Friday, May 09, 2008 2:17 PM
To: RPG programming on the AS400 / iSeries
Subject: Re: Writing to multiple physical files with the same format

Hi James Pankratz,

No, there's no file defining the facilities on the system. If I go the
open/close route, I guess I'll have to make one.

And thanks James Lampert and Charles Wilt for responding. I was trying
to avoid doing a bunch of opens/closes in a trigger program; that's why
I was thinking of a multi-format logical.

When I think about it, the open/close route has a similar problem. Even
if I create a file containing a list of facilities on the system, that
file becomes one more thing that has to be modified if they ever
add/remove a facility. By the time that happens, odds are no one will
remember this.

I was hoping someone familiar with the record i/o apis might be able to
say whether they have a better way to do this. I'm having a hard time
tracking these apis down in the info center.

*Peter Dow* /
Dow Software Services, Inc.
909 793-9050
pdow@xxxxxxxxxxxxxxx <mailto:pdow@xxxxxxxxxxxxxxx> /

James Pankratz wrote:

Do you already have other files on your system that indicate which
facilities exist and how they are related?

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of Peter Dow (ML)
Sent: Thursday, May 08, 2008 6:18 PM
To: RPG programming on the AS400 / iSeries
Subject: Writing to multiple physical files with the same format

Hi Everyone,

I have a situation where multiple facilities are using a common file
that is related to individual files in separate libraries for each
facility. I would like to have a trigger program on the common file
that can write to one or more of the individual files based on some
condition. In other words,

COMMONFILE commonkey

FACILITY1 commonkey, facility1key
FACILITY2 commonkey, facility2key
FACILITY3 commonkey, facility3key

A trigger occurs due to an update on COMMONFILE, and based on some
condition, I want to write a record to FACILITY1 and FACILITY3.

Is there anyway to do this without having to hardcode knowledge of the
individual files? My first thought was a multiformat logical, but that
requires knowing specific format names that correspond to the physical
files. And although it is possible to create a logical file with a
single format that includes all the individual physical files, it is not
possible for an RPG program to use that file, at least not by defining
the file on an F-spec.

*Peter Dow* /
Dow Software Services, Inc.
909 793-9050
pdow@xxxxxxxxxxxxxxx <mailto:pdow@xxxxxxxxxxxxxxx> /

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

This e-mail transmission contains information that is intended to be confidential and privileged. If you receive this e-mail and you are not a named addressee you are hereby notified that you are not authorized to read, print, retain, copy or disseminate this communication without the consent of the sender and that doing so is prohibited and may be unlawful. Please reply to the message immediately by informing the sender that the message was misdirected. After replying, please delete and otherwise erase it and any attachments from your computer system. Your assistance in correcting this error is appreciated.