RE: Catch an error in ILE PRG

On Fri, 3 Dec 2004 rob@xxxxxxxxx wrote:
>
> If there's a command RLSIFSLCK, doesn't that imply that there would be an
> api to list ifs locks?  If there is no IFS lock then process the file?
> Don't know why I didn't think of this when receiving FTP from customers.
>

Yeah, there's an API called QP0LROR (Retrieve Object REferences) that will
list the locks on an IFS object.

Carsten Flensburg wrote a sample program that demonstrates this API at the
following link (requires a free "associate' membership to the iSeries
Network):
http://www.iseriesnetwork.com/article.cfm?ID=18313

An interesting way to determine when a new file is added (instead of
checking every 10 seconds) might be to journal an IFS directory.  Use the
RCVJRNE command in a NEP with an exit program that's called each time a
new file is created in the IFS. Have the exit program use QP0LROR to wait
until the file is unlocked, and then process it.

I think Carsten may have done an article on that as well, but I can't find
it...