Re: Journal not showing update - DB won't update if nothing has changed?

[Charles Wilt <charles.wilt@xxxxxxxxx>]

Yeah, after I posted the message i realized it probably should have been
"RPG (or the DB)"...

I also should have mentioned I'm using RPG IV.

I suspect it is in the DB.

I'm only trying to clarify this to ensure that how I think the code is
working is how it's working.  I don't really care that there's no record of
the update operation.

Charles


On Thu, Mar 5, 2015 at 11:33 AM, <darren@xxxxxxxxx> wrote:

> Its not an RPG thing necessarily.  SQL update will do this too.  I suspect
> its done at the journal level.  If you run an update against a file,
> something like:
> update USRLST set USR=USR
>
> The above statement will generate now journal entries even though SQL will
> report that it updated records.
>
> There is a journal setting where you can journal open and close operations,
> if you want that kind of data.
>
>
>
>
>
>
> From:   Charles Wilt <charles.wilt@xxxxxxxxx>
> To:     "RPG programming on the AS400 / iSeries"
>             <rpg400-l@xxxxxxxxxxxx>
> Date:   03/05/2015 11:06 AM
> Subject:        Journal not showing update - DB won't update if nothing has
>             changed?
> Sent by:        "RPG400-L" <rpg400-l-bounces@xxxxxxxxxxxx>
>
>
>
> All,
>
> Been looking into a issue and thought I had a handle on it.
>
> Till I realized for certain records, I don't see an update entry in the
> journal as I expected.
>
> Back to the code...after spending a an hour or so looking.  I really can't
> see how the UPDATE wouldn't have have been hit.
>
> Then it hits me, for a few records, none of the values in the fields of the
> file would have actually changed between READ and UPDATE.
>
> IIRC, RPG by design won't actually do an update unless the buffer's
> changed.
>
> In other words:
>   read myfile;
>   wFld1 = fFld1;
>   wFld2 = fFld2;
>   fFld1 = wFld1;
>   fFld2 = wFld2;
>   update myfileR;
>
> Wound't actually update the record in myfile.
>
> Can anyone confirm that I'm not misremembering?
>
> Thanks!
> Charles
> --
> 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.
>
>
>
> --
> 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.