At 06:51 PM 10/19/97 -0400, you wrote:
>Brian & Dawn,
>In a message dated 97-10-18 08:28:36 EDT, you write:
>> I have a situation where I have a batch job that needs to know if another 
>> batch job is running, so that if it is, the first batch job will abort only
>> portion of the run.
>Unfortunately, the AS/400 doesn't provide an equivalent to the S/36 "IF
>ACTIVE" OCL function (much to the chagrin of many here, especially given that
>it is supported in the /36 environment).  Most of the books suggest creating
>a unique data area, and performing a *EXCL ALCOBJ on it when the job in
>question is running.  If other jobs cannot get a lock, then you know the job
>is running.  Given today's client/server environment, I personally find this
>solution inadequate.  However, it should work in your stated case...

Crazy idea—what about data queues? These fit in very nicely in
client/server environments. They can be keyed, and they don't suffer from
file I/O overhead. There are VB controls with Client Access that can
communicate through DQ's. Also, the AS/400 ToolKit for Java has the ability
to do the same.


Vernon Hamberg
Systems Software Programmer
Old Republic National Title Insurance Company
400 Second Avenue South
Minneapolis, MN  55401-2499
(612) 371-1111 x480

| This is the Midrange System Mailing List!
| To submit a new message, send your mail to "".
| To unsubscribe from this list send email to
|    and specify 'unsubscribe MIDRANGE-L' in the body of your message.
| Questions should be directed to the list owner/operator:

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2020 by and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].