×
The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.
18 Mars years ago, just starting work on the AS/400 , I looked for an
equivalent to the S/36 's
IF_ACTIVE OCL. (For younger folks, this feature lets you check if a program
is already running so you don't submit it a again)
I failed, then and on later tries.
However, seeing the (relative) new STACK_INFO and ACTIVE_JOB_INFO SQL
services
I thought I'd combine the two to finally get my IF_ACTIVE.
So here is an SQL that I think should accomplish it but does not:
SELECT PROGRAM_NAME, PROGRAM_LIBRARY_NAME
FROM TABLE(QSYS2.STACK_INFO((SELECT distinct JOB_NAME
FROM TABLE(QSYS2.ACTIVE_JOB_INFO(JOB_NAME_FILTER => '*ALL'))) ,'ALL')) A
where PROGRAM_NAME = 'NMFCTLLST'
I get a "Result of SELECT more than one row"
Any ideas, anyone?
TIA
Gad
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com 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].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.