Find OUTQ’s without an associated printer device
Greetings.
We just completed a major system-i consolidation, and I need to generate a list of all outq in a particular library which do not have an associated printer DEVD. We are trying to clean up the system.
We had quite a number of OUTQ in QUSRSYS without an associated printer, and those didn't restore to the new system. We have the old libs from the old systems, and those contain all the outq.
How do I get a list of OUTQ without an associated printer in LIBA?
Thanks in advance!
Software/Hardware used:
i5OS V5R4M0 system-i 550
We just completed a major system-i consolidation, and I need to generate a list of all outq in a particular library which do not have an associated printer DEVD. We are trying to clean up the system.
We had quite a number of OUTQ in QUSRSYS without an associated printer, and those didn't restore to the new system. We have the old libs from the old systems, and those contain all the outq.
How do I get a list of OUTQ without an associated printer in LIBA?
Thanks in advance!
Software/Hardware used:
i5OS V5R4M0 system-i 550
ASKED:
March 5, 2010 4:35 PM
UPDATED:
April 16, 2010 6:34 AM
Answer Wiki:
<pre>
DSPOBJD OBJ(*ALL) OBJTYPE(*DEVD) OUTPUT(*OUTFILE) OUTFILE(QTEMP/PRT)
<i>SQL:</i> DELETE FROM prt WHERE not ODOBAT like '%PRT%'
DSPOBJD OBJ(*ALL) OBJTYPE(*OUTQ) OUTPUT(*OUTFILE) OUTFILE(QTEMP/OUTQ)
<i>SQL:</i> SELECT * FROM outq a WHERE a.ODOBNM [not] in (SELECT b.ODOBNM FROM prt b)</pre>
That uses DSPOBJD to create a file of all device descriptions. I named my example file PRT and put it in QTEMP. I then used interactive SQL to DELETE all devices that were not any kind of printer.
And it uses DSPOBJD again to create a file of all *OUTQs. (In my case, I chose all *OUTQs in my library list. You can set a library if you wish.) I named that file OUTQ and created it also in QTEMP. I then used interactive SQL to SELECT all *OUTQs from the file that had a matching *DEVD object name in the previous PRT file. You could insert the [not] operator if you wanted to list *OUTQs that <i>did not have</i> a matching *DEVD.
That's one basic outline of a possible procedure you could follow.
Tom
To see all answers submitted to the Answer Wiki: View Answer History.
Tom –
Thanks much for the information (and the code). I’ll use it for all 19 sites which are now consolidated.
One more 520 to wipe and deliver to IBM, and we can get on to configuring 6500 users, all the secuirty, etc etc ad infinitum.
Thank you again.
Bruce
@Bruce:
There are numerous possible ways. I would personally use appropriate APIs and significantly more detailed code. But the question was fairly basic, so it seemed that a basic sample of an overall method seemed best.
If any details beyond that (very) basic approach is needed, ask away.
Tom
BTW, it’s very likely a good thing to have a number of outq’s that are not associated with printers. At least some of them are explicitly intended not to be associated.
Tom