ENDMSGW QUSLJOB API

Hi, I have a job that runs every few minutes looking for *MSGW status of a job in a particular subsystem, and if it finds a job in MSGW it will automatically end it. This job has been working fine until we upgraded to V6R1M0.

The program creates a user space (QUSCRTUS), then List's the jobs to the user space (QUSLJOB using JOBL0200) then I read the entries in the user space. My problem is that when I read the entries, the job info DS (see below) is the same for every record. No job info, just numbers in a few fields.

Has anyone run into this on V6R1M0 and have a solution? This program is years old and has been working perfectly until now. Thanks!


JOBNAME OF JOB_INF = ' '
JOBUSER OF JOB_INF = ' '
JOBNUMBER OF JOB_INF = ' '
INTERNALID OF JOB_INF = ' '
STATUS OF JOB_INF = ' '
JOBTYPE OF JOB_INF = ' '
JOBSUBTYPE OF JOB_INF = ' '
SUBSYSTEM OF JOB_INF = ' '
JOBRUNPTY OF JOB_INF = 077952576.
SYSTEMPOOL OF JOB_INF = 077952576.
PROCESSUNIT OF JOB_INF = 077952576.
AUXREQUESTS OF JOB_INF = 077952576.
INTERACTTRANS OF JOB_INF = 077952576.
TOTRESPTIME OF JOB_INF = 077952576.
FUNCTIONTYPE OF JOB_INF = ' '
FUNCTIONNAME OF JOB_INF = ' '
ACTJOBSTATUS OF JOB_INF = ' '

________________________________
Important Confidentiality Notice: This email message, including all attachments is for the exclusive use by the person(s) to whom it is addressed, and may contain information that is confidential or privileged. Any unauthorized review, use, disclosure or distribution is prohibited under applicable law. If you have received this email in error, please notify me immediately by reply email and delete this message and any attachments. Thank you.