• 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
    Rocket Software

    Disrupt Without Disruption

    For over 35 years, Rocket Software’s solutions have empowered businesses to modernize their infrastructure, unlock data value, and drive transformation – all while ensuring modernization without disruption.

    Learn How

    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

  • To Comfort The Afflicted And Afflict The Comfortable
  • How FalconStor Is Reinventing Itself, And Why IBM Noticed
  • Guru: When Procedure Driven RPG Really Works
  • Vendors Fill In The Gaps With IBM’s New MFA Solution
  • IBM i PTF Guide, Volume 27, Number 27
  • 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

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