Re: Detecting that a submitted batch job is ending from w/in an RPG program.

[Alan Campin <alan0307d@xxxxxxxxx>]

I am not sure the QIBM_QPOL_SCAN_CLOSE would work. I found this in the
documentation. The exit program is not called if


   - -or- the object being closed was opened for write access only.



On Tue, May 19, 2009 at 3:08 PM, Alan Campin <alan0307d@xxxxxxxxx> wrote:

> Yes, but the program only gets called if an entry is added to the journal
> and most of the time it is sitting in an OS function and if the program
> ends
> the next time you run it it picks up where it left off.
>
> Didn't know about the WRKREGINF QIBM_QP0L_SCAN_CLOSE. That might work
> better
> but how does it get fired? Would seem like you would have the same problem.
> Where does the program execute?
>
> On Tue, May 19, 2009 at 2:21 PM, <rob@xxxxxxxxx> wrote:
>
> > That's still a NEP.  Unless you discovered some sort of exit program to
> > fire off upon a journal entry creation.
> >
> > Rob Berendt
> > --
> > Group Dekko Services, LLC
> > Dept 01.073
> > Dock 108
> > 6928N 400E
> > Kendallville, IN 46755
> > http://www.dekko.com
> >
> >
> >
> >
> >
> > From:
> > Alan Campin <alan0307d@xxxxxxxxx>
> > To:
> > "RPG programming on the IBM i / System i" <rpg400-l@xxxxxxxxxxxx>
> > Date:
> > 05/19/2009 04:03 PM
> > Subject:
> > Re: Detecting that a submitted batch job is ending from w/in an RPG
> > program.
> > Sent by:
> > rpg400-l-bounces@xxxxxxxxxxxx
> >
> >
> >
> > You can also use journaling. That is way I set it up at last job. Each
> > time
> > that an IFS files was added to a folder it fired a journal entry. The
> > journal calls an exit program that processes the entry.
> >
> >  RCVJRNE JRN(IFS_AUDIT) EXITPGM(XV0015) JRNCDE((B))
> >    ENTTYP(JT) ENTFMT(*TYPE1)
> >
> > I have code that does this if you are interested.
> >
> > On Tue, May 19, 2009 at 1:45 PM, <rob@xxxxxxxxx> wrote:
> >
> > > If you're checking for the existence of a stream file in a particular
> > > directory I wonder if this could be used:
> > > QIBM_QP0L_SCAN_CLOSE (Integrated File System Scan on Close exit
> program)
> > > is called during close processing such as with the close() API. This
> > exit
> > > program must be provided by the user.
> http://publib.boulder.ibm.com/infocenter/iseries/v6r1m0/topic/apis/ifscloseexit.htm
> > > Theory being, if someone drops in a stream file into a particular
> > > directory (via ftp, netServer, etc) then execute your program.
> > >
> > > This way you do not have your NEP checking on a periodic basis.  As
> soon
> > > as the file is closed this program would be called.
> > >
> > > WRKREGINF QIBM_QP0L_SCAN_CLOSE
> > >
> > > Haven't played with it myself.
> > >
> > > Original intent is so that Bytware StandGuard anti-virus would scan
> > stream
> > > files immediately upon close.
> > >
> > > Rob Berendt
> > > --
> > > Group Dekko Services, LLC
> > > Dept 01.073
> > > Dock 108
> > > 6928N 400E
> > > Kendallville, IN 46755
> > > http://www.dekko.com
> > >
> > > --
> > > This is the RPG programming on the IBM i / System i (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 / System i (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 / System i (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 / System i (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.