RE: Scaning field JSLIBL from QAUDJRN outfile QASYJSJ5 -- MIDRANGE-L

Chuck,

Thanks again for all the help.
The QAUDJRN did its job, it prevented us from deleting a library that is still being used..
It revealed a library was being used in a library list, even though library last used date says never used.
The change date is from the nightly save, the library itself is was not changed.
A initial program is doing a CHGLIBL.
Using the QAUDJRN data, I was able to identify the job, user, etc.

Change/Usage information:
Change date/time . . . . . . . . . . : 07/17/14 23:00:25
Usage data collected . . . . . . . . : NO
Last used date . . . . . . . . . . . :
Days used count . . . . . . . . . . : 0
Reset date . . . . . . . . . . . . :

Paul

-----Original Message-----
From: MIDRANGE-L [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Steinmetz, Paul
Sent: Wednesday, July 16, 2014 10:08 PM
To: 'midrange-l@xxxxxxxxxxxx'
Subject: RE: Scaning field JSLIBL from QAUDJRN outfile QASYJSJ5

Chuck,

Changing the * to JSJOB reduced the number of spoolfiles to 1.

Thanks
Paul

-----Original Message-----
From: MIDRANGE-L [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of CRPence
Sent: Wednesday, July 16, 2014 9:56 PM
To: midrange-l@xxxxxxxxxxxx
Subject: Re: Scaning field JSLIBL from QAUDJRN outfile QASYJSJ5

On 16-Jul-2014 20:02 -0500, Steinmetz, Paul wrote:

<<SNIP>>

I changed the SQL slightly, to run in batch, via AJS.

Cause . . . . . : Command to execute is:
RUNSQL REQUEST('select * from qgpl/QASYJSJ5
where locate (''ARPINS2'',JSLIBL ) <> 0') OUTPUT(*PRINT).

But now I got 33 1 line spoolfiles (see below), not the expected
result.

Any suggestions for batch.

<<SNIP QMQRY report>>

The QMQRY spool output to QPQXPRTF is implemented as side-by-side, and a full report is generated even for zero records. Change the asterisk as column-list to some columns of interest, for which the default form [default *QMFORM] will not produce multiple SPLF, and the effect of a no-records result-set report will be more conspicuous.

There is no /easy/ way to cause the QM Query to fail for zero rows, although I recall discussing possible attempts at effecting a failure in such cases; on an\the Italian AS400 USENET group.

--
Regards, Chuck
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at http://archive.midrange.com/midrange-l.

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at http://archive.midrange.com/midrange-l.