• The Four Hundred
  • Subscribe
  • Media Kit
  • Contributors
  • About Us
  • Contact
Menu
  • The Four Hundred
  • Subscribe
  • Media Kit
  • Contributors
  • About Us
  • Contact
  • A Helpful Tool for Dealing with Unexpected Problems

    January 6, 2010 Ted Holt

    In the Pink Panther movies, Chief Inspector Dreyfus dreaded to hear the name Clouseau. Just the mention of that name was enough to cause Dreyfus to lose control of himself, and even landed him several stays in psychiatric hospitals. In the same way, there are certain words I hate to hear when I’m at work.

    In my day job, the words I hate to hear are “There’s a message on QSYSOPR.” A message on the QSYSOPR message queue is rarely good news. It means I’ve got to stop what I’m doing and deal with a problem. (I am proud to say, however, that I do bear bad news much better than Monsieur Dreyfus did.)

    When dealing with an unexpected problem, several questions must be addressed:

    • What went wrong?
    • What caused the problem?
    • How do we fix it?
    • How do we recover?

    One good but underused investigation tool is CL’s Start Service Job (STRSRVJOB) command. STRSRVJOB allows you to see a program’s data values, and under certain conditions, the program’s source code, before you cancel the program. Here’s an example.

    Suppose the following message shows up on the system operator message queue:

    Decimal-data error occurred (C G D F).
    

    The first thing to do is to determine the identifiers of the job that is in error. There are several ways to do this, but one easy one is to place the cursor on the error message, press F1 (for help text), then F9 (to display the message details). The “From job” field tells the job name, user name, and job number.

    From a CL command line, run STRSRVJOB.

    STRSRVJOB JOB(542335/SOMEUSER/TED41)
    

    Use Work with Job (WRKJOB), option 11, to find the name of the program that has halted.

    WRKJOB JOB(542335/SOMEUSER/TED41)
    

    Next, start the debugger, referencing the program name.

    STRDBG PGM(SOMELIB/SOMEPGM) UPDPROD(*YES) OPMSRC(*YES)
    

    Depending on how the program was compiled, you may or may not see the source code. The big advantage to seeing the code is that you immediately determine the location of the error.

    Whether the source code is visible or not, you can use the debugger’s EVAL command to view the values of fields and variables. If the source code is visible, you can also use the F11 key to display data values.

    When you have finished your investigation, run the End Debug Mode (ENDDBG) and End Service Job (ENDSRVJOB) commands to tidy up.



                         Post this story to del.icio.us
                   Post this story to Digg
        Post this story to Slashdot

    Share this:

    • Reddit
    • Facebook
    • LinkedIn
    • Twitter
    • Email

    Tags:

    Sponsored by
    Maxava

    Migrate IBM i with Confidence

    Tired of costly and risky migrations? Maxava Migrate Live minimizes disruption with seamless transitions. Upgrading to Power10 or cloud hosted system, Maxava has you covered!

    Learn More

    Share this:

    • Reddit
    • Facebook
    • LinkedIn
    • Twitter
    • Email

    Sponsored Links

    10ZiG Technology:  Ask us about our new Ethernet Terminal for only $195!
    Bytware StandGuard Security:  Are you monitoring and auditing your System i security? FREE trial.
    Manta Technologies:  Year-End SALE! 40% off the complete library and all combo packs. Ends Jan 15

    IT Jungle Store Top Book Picks

    Easy Steps to Internet Programming for AS/400, iSeries, and System i: List Price, $49.95
    The iSeries Express Web Implementer's Guide: List Price, $49.95
    The System i RPG & RPG IV Tutorial and Lab Exercises: List Price, $59.95
    The System i Pocket RPG & RPG IV Guide: List Price, $69.95
    The iSeries Pocket Database Guide: List Price, $59.00
    The iSeries Pocket SQL Guide: List Price, $59.00
    The iSeries Pocket Query Guide: List Price, $49.00
    The iSeries Pocket WebFacing Primer: List Price, $39.00
    Migrating to WebSphere Express for iSeries: List Price, $49.00
    Getting Started With WebSphere Development Studio Client for iSeries: List Price, $89.00
    Getting Started with WebSphere Express for iSeries: List Price, $49.00
    Can the AS/400 Survive IBM?: List Price, $49.00
    Chip Wars: List Price, $29.95

    Wolf Construction Taps CGC for Outsourced ERP Power Systems i: The Word From On High

    Leave a Reply Cancel reply

Volume 10, Number 1 -- January 6, 2010
THIS ISSUE SPONSORED BY:

SEQUEL Software
WorksRight Software
System i Developer

Table of Contents

  • Let’s Start Over With a New Beginning
  • A Helpful Tool for Dealing with Unexpected Problems
  • Admin Alert: Upgrading a 550 to a 520 with V5R4?

Content archive

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

Recent Posts

  • Public Preview For Watson Code Assistant for i Available Soon
  • COMMON Youth Movement Continues at POWERUp 2025
  • IBM Preserves Memory Investments Across Power10 And Power11
  • Eradani Uses AI For New EDI And API Service
  • Picking Apart IBM’s $150 Billion In US Manufacturing And R&D
  • FAX/400 And CICS For i Are Dead. What Will IBM Kill Next?
  • Fresche Overhauls X-Analysis With Web UI, AI Smarts
  • Is It Time To Add The Rust Programming Language To IBM i?
  • Is IBM Going To Raise Prices On Power10 Expert Care?
  • IBM i PTF Guide, Volume 27, Number 20

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