• The Four Hundred
  • Subscribe
  • Media Kit
  • Contributors
  • About Us
  • Contact
Menu
  • The Four Hundred
  • Subscribe
  • Media Kit
  • Contributors
  • About Us
  • Contact
  • Take Two: Where Did I Come From?

    May 4, 2005 Hey, Ted

    The “Where Did I Come From?” tip is a good article. To expand upon it, we sometimes have cases where a job was submitted to job queue A and then moved to job queue B. The QUSRJOBI API will then return job queue B. The joblog will just show CPC1129, “Job number/user/jobname changed by userprofile”. I don’t know of any way to retrieve the value of job queue A from within the active program, but there are a couple of ways of tracking its true origins.

    1. This is what we use. Turn on auditing for the *JOBQ object, like this:

    CHGOBJAUD OBJ(QUSRSYS/QBATCH) OBJTYPE(*JOBD) OBJAUD(*CHANGE)
    

    System value QAUDLVL must have the value *SECURITY, and QAUDCTL may need both *OBJAUD and *AUDLVL–I’m not sure if both are needed. This will cause entries to be put on the system audit journal, QAUDJRN, when a job is put into or removed from that job queue. The entry will be journal code T, entry type ZC. Access type 1 is adding a job to the queue, 17 is deleting or moving the job.

    Make a copy of file QSYS/QASYZCJ4 and dump the journal entries:

    DSPJRN QAUDJRN JRNCDE((T)) ENTTYP(ZC) OUTPUT(*OUTFILE)
                     OUTFILFMT(*TYPE4) OUTFILE(MyLib/CopyOfFile) 
    

    Then just query the file.

    2. Use the QIBM_QWT_JOBNOTIFY exit point, which writes to a data queue.

    Both methods must manually be set up whenever a new job queue is created (unless you attach a program to the CRTJOBQ command, I suppose). There may be other methods as well.

    Best wishes,

    –Ken

    There is another, more versatile way to determine which job queue an active job is running from.

    WRKUSRJOB USER(*ALL) JOBTYPE(*BATCH) ASTLVL(*BASIC)
    

    This command shows all active batch jobs grouped by job queue. It also shows all waiting jobs and what sequence they will run in.

    Keep up the good work!

    –Tim

    RELATED STORY

    Where Did I Come From?


    Share this:

    • Reddit
    • Facebook
    • LinkedIn
    • Twitter
    • Email

    Tags:

    Sponsored by
    FalconStor

    Begin Your Journey to the Cloud with Hybrid Cloud Date Protection and Disaster Recovery

    FalconStor StorSafe optimizes and modernizes your IBM i on-premises and in the IBM Power Virtual Server Cloud

    FalconStor powers secure and encrypted IBM i backups on-premise and now, working with IBM, powers migration to the IBM PowerVS cloud and on-going backup to IBM cloud object storage.

    Now you can use the IBM PowerVS Cloud as your secure offsite copy and take advantage of a hybrid cloud architecture or you can migrate workloads – test & development or even production apps – to the Power VS Cloud with secure cloud-native backup, powered by FalconStor and proven IBM partners.

    Learn More

    Share this:

    • Reddit
    • Facebook
    • LinkedIn
    • Twitter
    • Email

    Kisco Launches Spool File Distribution Software SSA Delivers New ERP LX Platform for iSeries

    Leave a Reply Cancel reply

Volume 5, Number 18 -- May 4, 2005
THIS ISSUE
SPONSORED BY:

iTera
WorksRight Software
Patrick Townsend & Associates

Table of Contents

  • Use Special Files to Access the IFS
  • Take Two: Where Did I Come From?
  • Admin Alert: Configuring i5/OS and a Windows Network Server for SSO

Content archive

  • The Four Hundred
  • Four Hundred Stuff
  • Four Hundred Guru

Recent Posts

  • With Power11, Power Systems “Go To Eleven”
  • With Subscription Price, IBM i P20 And P30 Tiers Get Bigger Bundles
  • Izzi Buys CNX, Eyes Valence Port To System Z
  • IBM i Shops “Attacking” Security Concerns, Study Shows
  • IBM i PTF Guide, Volume 27, Number 26
  • Liam Allan Shares What’s Coming Next With Code For IBM i
  • From Stable To Scalable: Visual LANSA 16 Powers IBM i Growth – Launching July 8
  • VS Code Will Be The Heart Of The Modern IBM i Platform
  • The AS/400: A 37-Year-Old Dog That Loves To Learn New Tricks
  • IBM i PTF Guide, Volume 27, Number 25

Subscribe

To get news from IT Jungle sent to your inbox every week, subscribe to our newsletter.

Pages

  • About Us
  • Contact
  • Contributors
  • Four Hundred Monitor
  • IBM i PTF Guide
  • Media Kit
  • Subscribe

Search

Copyright © 2025 IT Jungle