RE: CHAIN to a DS

Hi Tony,

Wouldn't using a prefix on the input file accomplish this?  As in

        FTRANS       IF    E           K DISK    Prefix(A_)

Then  A_Tracro and A_Trfam# would be populated and not Tracro and Trfam#. 

Just a thought.

Fred Underwood
North American Stainless
(502) 347-6187

mailto:funderwood@xxxxxxxxxxxxxxxxxxxxxxxxxx




CarollaT@xxxxxxxxxxxxxx 
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
09/03/2004 12:26 PM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
rpg400-l@xxxxxxxxxxxx
cc

Subject
RE: CHAIN to a DS






You know, I probably didn't make myself clear.  I had this idea on my way
into work, and I was excited, and probably blathering...

 

What I want to do is this:

 

When you CHAIN to a file, the found record is placed, field by field, in 
the
input buffer (the fields contained in the record format). 

 

Example, if you have a file 

 

R Trans

   Tracro  3A

   Trfam# 9P 0

K Tracro 3A

 

And you have this file specified as an update file, you then have the
following fields available to your module

Tracro

Trfam#

 

When you do a CHAIN to the TRANS format/file, and a record is found, the 
two
fields above now contain the values from the record found by the CHAIN.
_This_ is the action I am trying to avoid.  I thought if you specify a DS 
on
the CHAIN operation, that the DS would be updated, but the two fields 
above
would not be. 

 

Tony Carolla

MedAmerica Billing Services, Inc.

 

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