Re: Writing to multiple physical files with the same format

Hi Peter

You would need to have the relationships between the files and conditions coded somewhere, whether it's within the trigger program or as database records in a control file. Either way, the trigger program would still need to determine the relationship in order to know which files to update.

Personally I would create a control file with details of relationships and files in, and then use SQL to perform the updates. That way you can use PREPARE to specify which files you want to update accordingly.

I use a control file with file names, field names, parent key fields and status indicators and values in to control the building of SQL statements for my prompt window programs - it makes life a whole lot easier.

All the best

Jonathan

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