On 21/05/2008, at 8:05 AM, Paul Jackson wrote:

Which seems normal

Yes. The pointer is NULL prior to being set then is set to the first WCBT.

but the based on WCBTBL-SPACE var is all hex zero
which means that the size is set to zero (it should be 16752384) which
causes the tables to be skipped hence the not found option. On the
other systems the size is correctly populated and so the table is
searched normally.

I've not seen that before. I guess it could mean that QWCBT01 is not used (damaged/skipped/empty).

What does DSPJOBTBL show on the failing system?

What does DMPSYSOBJ QWCBT01 QSYS show on the failing system (only need the first page)

When was the last time the job tables were compressed on the failing system? Perhaps arrange to have the tables compressed: CHGIPLA CPRJOBTBL(*ALL) CHKJOBTBL(*ALL) then IPL. Reset these values after the IPL. Then see if the program works.

NOTE: Good idea to ensure QTOTJOB, QACTJOB, QADLACTJ, QADLTOTJ, and QMAXJOB are set appropriately before the IPL.

NOTE: Collect the DSPJOBTBL and DMPSYSOBJ information first then compress the tables.

While it is interesting to pursue this particular problem I suggest that altering your approach would be better. Either:
a) Modify the MI program to use the job index to locate the given job
b) Use Mark's suggestion of the Interrupt Job API

The advantage of a) is that it will be much faster. The advantage of b) is that it will work without requiring system-state.

Not sure how to check Lic or cume levels.

For LIC:

DSPPTF 5722999

You should see something like:

Product ID . . . . . . . . . . . . . : 5722999
IPL source . . . . . . . . . . . . . : ##MACH#B ##SERV#T
Release of base option . . . . . . . : V5R4M0 L00

Opt ID Status Action
TL07226 Temporarily applied None

For OS:

You should see something like:

Product ID . . . . . . . . . . . . . : 5722SS1
IPL source . . . . . . . . . . . . . : ##MACH#B ##SERV#T
Release of base option . . . . . . . : V5R4M0 L00

Opt ID Status Action
TC07226 Temporarily applied None

The PTF ID is interpreted as: 07=Year == 2007, 226 is release date in Julian day format.

The other item of interest is the "Release of base option" value for LIC.

Simon Coulter.
FlyByNight Software OS/400, i5/OS Technical Specialists

Phone: +61 2 6657 8251 Mobile: +61 0411 091 400 /"\
Fax: +61 2 6657 8251 \ /
ASCII Ribbon campaign against HTML E-Mail / \

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2020 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].