Did you try debugging it? Is it possible that the update isn't getting called? Hard to say more w/o seeing the code.
Kurt Anderson
Sr. Programmer/Analyst - Application Development, Service Delivery Platform
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of RPGLIST
Sent: Tuesday, March 25, 2014 12:11 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: Update in procedure not working
I know this is going to turn out to be pretty simple, but for the life of me I cannot see the issue.
This is all within a procedure:
I'm chaining out to a file with a key using a Ds named InDs defined as *INPUT. Works perfectly, get a hit and I have the record.
I copy InDs to a Ds named OutDs defined as an *OUTPUT, I update the OutDs with a variety of new values that are needed and then execute the following statement:
Update RdCobex OutDs;
Executes fine, no errors or anything... but the record is never updated.
Here are the DS definitions:
520 D InDs ds LikeRec(rdCobEx:*Input)
521 D OutDs ds LikeRec(RdCobex:*Output)
Here is the file declaration:
512 FDepndCobExuf e k Disk
--
This is the RPG programming on the IBM i (AS/400 and 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.
midrange.com
