Re: Reading journal entries in an RPG pgm

["Carsten Flensburg" <flensburg@xxxxxxxxxx>]

Hi Phil,

I assume that the journal entry sequence number is incremented by 1 prior to
subsequent calls to API, so to come up with a qualified guess I'd have to
see the code.  If you want, you can email me privately and I'll try and see
what I can find out.

Best regards,
Carsten Flensburg

----- Original Message -----
From: "Phil" <sublime78ska@attbi.com>
To: <rpg400-l@midrange.com>
Sent: Sunday, May 05, 2002 12:29 AM
Subject: RE: Reading journal entries in an RPG pgm


> Carsten,
>
> I got your sample, and have been able to get it to do what I need.
Thanks!
>
> I have only one problem - receiver chains.  When I select *CURRENT, or any
> receiver as long as the start receiver and the end receiver is the same, I
> have no problems.  But if I select *CURCHAIN or when the start and end
> receivers aren't the same, it processes the receivers over and over -
until
> a variable overflow.
>
> Any ideas?
>
> Thanks,
>
> Phil
>
> > -----Original Message-----
> > From: rpg400-l-admin@midrange.com [mailto:rpg400-l-admin@midrange.com]On
> > Behalf Of Carsten Flensburg
> > Sent: Friday, May 03, 2002 2:51 PM
> > To: rpg400-l@midrange.com
> > Subject: Re: Reading journal entries in an RPG pgm
> >
> >
> > Hello Phil,
> >
> > You can specify an (f.x. RPG) exit program on the RCVJRNE and retrieve
the
> > journal entries as they arrive - or you can use the
> > QjoRetrieveJournalEntries to retrieve journal entries based on a
> > variety of
> > selection criteria.  I can email you an RPG/IV sample of the Qjo... API
if
> > you're interested.
> >
> > Best regards,
> > Carsten Flensburg
> >
> > ----- Original Message -----
> > From: <sublime78ska@attbi.com>
> > To: <rpg400-l@midrange.com>
> > Sent: Friday, May 03, 2002 8:34 PM
> > Subject: Reading journal entries in an RPG pgm
> >
> >
> > > I have a file which is journaled.  I want to read the
> > > journal entries in an RPG pgm so I can see which fields
> > > were changed, and by whom.
> > >
> > > Are there any examples available for this?  I've found
> > > the IBM doc's '6.3.8 Using Journaling to Provide an
> > > Audit Trail'.  This is what I want to do but there're no
> > > examples other than CL.
> > >
> > > Thanks in advance for your help,
> > >
> > > Phil
> > > _______________________________________________
> > > This is the RPG programming on the AS400 / iSeries (RPG400-L)
> > mailing list
> > > To post a message email: RPG400-L@midrange.com
> > > To subscribe, unsubscribe, or change list options,
> > > visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> > > or email: RPG400-L-request@midrange.com
> > > 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@midrange.com
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> > or email: RPG400-L-request@midrange.com
> > 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@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> or email: RPG400-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>