RE: Finding where a job ran...

You could try using the routing entry on the SBMJOB command - they'll never
know about that. It will allow the job to run in QBATCH or wherever, but not
in other subsystems.

For instance a rtge of QCMDB would run QCMD in QBATCH, but QINTER/CTL etc
could be changed to run YOURPGM which just reroutes/transfers the job to
QBATCH. You can make YOURPGM do anything including sending a message to the
user saying he's been caught, and then rducing the priority of the job :)

I haven't thought out the details, but it seems workable. We used to use
something similar to allocate/deallocate pool storage on the S/38.

Brendan Bispham


~ -----Original Message-----
~ From: owner-midrange-l@midrange.com
~ [mailto:owner-midrange-l@midrange.com]On Behalf Of Graap, Ken
~ Sent: 21 September 1999 23:55
~ To: 'Midrange'
~ Subject: Finding where a job ran...
~
~
~ Hello -
~
~ I would like to know what subsystems and/or job queues are being used for
~ submitted batch jobs.
~
~ I know the name of the subsystem a job started in is included as
~ part of the
~ CPF1124 message on message queue QSYSOPR, but it is difficult to retrieve
~ this information, and it doesn't include the job queue name. I also know
~ that the WRKUSRJOB command displays the job queue a job was run
~ from when it
~ is executed with an "Assistance level" of *BASIC. However, this
~ information
~ is only available on the system while the job is still in the system, i.e.
~ ... on a job queue, active or has output on an output queue and it isn't
~ listed on the report when *PRINT is specified..
~
~ What I want to be able to do is create a process that will let me
~ find users
~ who "cheat" by doing things like submitting batch jobs to subsystem QINTER
~ or QCTL instead of QBATCH.
~
~ Has anyone written a program or know of one, that can gather up
~ this kind of
~ information?
~
~ If not, does anyone have any ideas on how I might begin to write one?
~
~ Kenneth
~
~ ****************************************
~ Kenneth E. Graap
~ IBM Certified Specialist
~ AS/400 Professional
~ Systems Administrator
~ NW Natural (Gas Services)
~ keg@nwnatural.com
~ Phone: 503-226-4211 x5537
~ FAX:    603-849-0591
~ ****************************************
~
~
~ +---
~ | This is the Midrange System Mailing List!
~ | To submit a new message, send your mail to MIDRANGE-L@midrange.com.
~ | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
~ | To unsubscribe from this list send email to
~ MIDRANGE-L-UNSUB@midrange.com.
~ | Questions should be directed to the list owner/operator:
~ david@midrange.com
~ +---
~

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---