RE: Joblogs for jobs in jobq: Not sure this is the right group, but if not I am sure Mr Gibbs will point me to the right one. -- RPG400-L

Jose,

We are on V7R2 and PTF level 13.

I did eventually figure out to substitute valid info for jobnumber#/userid/jobname.

I want to thank everyone who made suggestions.

The jobs in the queue are all mine and they are sequential in number, so I used Excel to generate a list of every job number and then used concat in Excel to generate 232,000+ lines of SQL statements.

SELECT '302791',MESSAGE_TEXT FROM TABLE(QSYS2.JOBLOG_INFO('302791/#DHAYES/LOGASNUPD')) A WHERE MESSAGE_TEXT LIKE '%ATL170408ATL050N0000%';

I did have to create a 150 byte cl source file so I could just paste in the results.

I tried the individual line before I did all of that. If it works correctly I should only get one hit back, the one with my job number in it, then I can delete the 232,000 - 1 jobs from the queue.

Is there a clrjobq command? :-)

Thanks again to everyone,
Danny

-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Jose Perez
Sent: Tuesday, April 18, 2017 9:30 AM
To: RPG programming on the IBM i (AS/400 and iSeries) <rpg400-l@xxxxxxxxxxxx>
Subject: Re: Joblogs for jobs in jobq: Not sure this is the right group, but if not I am sure Mr Gibbs will point me to the right one.

Danny two things to consider as other has pointed out 1. what version of OS are you? if you are on 7.2 at least your are lucky.
2. you should replace and I hope you are doing it jobnumber#/userid/jobname'
with your real jobnumber#/userid/jobname like for example
'866610/PEREZJ/QPADEV000T'

On Tue, Apr 18, 2017 at 9:16 AM, Rob Berendt <rob@xxxxxxxxx> wrote:

<snip>
The UDTF JOB_INFO() was introduced in
7.2 Group PTF level 14 and 7.3 Group PTF level 3.
</snip>

Not quite. It was introduced before then. It was enhanced at those
levels. The samples I gave him do not use the enhancement(s).

But you're right, he's SOL if he's running 7.1.

Rob Berendt
--
IBM Certified System Administrator - IBM i 6.1 Group Dekko Dept 1600
Mail to: 2505 Dekko Drive
Garrett, IN 46738
Ship to: Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com

From: MichaelQuigley@xxxxxxxxxx
To: rpg400-l@xxxxxxxxxxxx
Date: 04/18/2017 09:08 AM
Subject: Re: Joblogs for jobs in jobq: Not sure this is the right
group, but if not I am sure Mr Gibbs will point me to the right one.
Sent by: "RPG400-L" <rpg400-l-bounces@xxxxxxxxxxxx>

"RPG400-L" <rpg400-l-bounces@xxxxxxxxxxxx> wrote on 04/18/2017
08:17:35
AM:

----- Message from Danny Hayes <Danny_Hayes@xxxxxxxxx> on Tue, 18
Apr 2017 12:17:18 +0000 -----

To:

"RPG programming on the IBM i (AS/400 and iSeries)"

<rpg400-l@xxxxxxxxxxxx>

Subject:

RE: Joblogs for jobs in jobq: Not sure this is the right group, but
if not I am sure Mr Gibbs will point me to the right one.

Rob,

I tried this:
Tue Apr 18 08:13:54 EDT 2017 ] Run All... SELECT X.JOB_NAME FROM
TABLE(QSYS2.JOB_INFO(JOB_STATUS_FILTER => '*JOBQ', JOB_USER_FILTER
=> '*ALL')) X WHERE JOB_QUEUE_LIBRARY = 'QGPL' AND JOB_QUEUE_NAME =
'RPMOTMULT2'
SQL State: 42704 Vendor Code: -204 Message: [SQL0204] JOB_INFO in
QSYS2 type *N not found. Cause . . . . . : JOB_INFO in QSYS2 type
*N was not found. If the member name is *ALL, the table is not
partitioned. If this is an ALTER TABLE statement and the type is *N,
a constraint or partition was not found. If this is not an ALTER
TABLE statement and the type is *N, a function, procedure, trigger
or sequence object was not found. If a function was not found,
JOB_INFO is the service program that contains the function. The
function will not be found unless the external name and usage name
match exactly. Examine the job log for a message that gives more
details on which function name is being searched for and the name
that did not match. Recovery . . . : Change the name and try the
request again. If the object is a node group, ensure that the DB2
Multisystem product is installed on your system and create a
nodegroup with the CRTNODGRP CL command. If an external function was
not found, be sure that the case of the EXTERNAL NAME on the CREATE
FUNCTION statement exactly matches the case of the name exported by
the service program. Processing ended because the highlighted
statement did not complete successfully Failed statements: 1

If you're on 7.1 you're out of luck. The UDTF JOB_INFO() was
introduced in

7.2 Group PTF level 14 and 7.3 Group PTF level 3. Your error would be
consistent with the results on a 7.1 system.

Michael Quigley
Computer Services
The Way International
www.TheWay.org
--
This is the RPG programming on the IBM i (AS/400 and iSeries)
(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.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: http://amzn.to/2dEadiD

--
This is the RPG programming on the IBM i (AS/400 and iSeries)
(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.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: http://amzn.to/2dEadiD

--
This is the RPG programming on the IBM i (AS/400 and iSeries) (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.

Please contact support@xxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate link: http://amzn.to/2dEadiD

"This e-mail and any attachments, contain Genuine Parts Company confidential information that is proprietary, privileged, and protected by applicable laws. If you have received this message in error and are not the intended recipient, you should not retain, distribute, disclose or use any of this information and you should destroy this e-mail, any attachments or copies therein forthwith. Please notify the sender immediately by e-mail if you have received this e-mail in error."