RPGLE/STRDBG vs RPG/STRISDB - Debug Problem

[Ammar Farooq]

Hi
I am trying to debug an RPGLE program XYZ which is being called from
ABC (dont have source, and it calls many other programs
before calling the XYZ).
Now in Old version the PFGM was in RPG and to debug the program , I
have to use STRISDB with following options
UPDPROD(*YES)
INVPGM(*NO)
SRVJOB(*SELECT) ===> now here I used to select the API/Job which in
turn calls the program XYZ

In this way I was able to debug the program in RPG

Now in the new release the Programs are in RPGLE and I have to use
STRDBG,
(Posted in Google: http://groups.google.com.pk/groups?dq=&hl=en&lr=&ie=UTF-8&oe=UTF-8&selm=1d4eafdf.0312020226.71660ad1%40posting.google.com)
I use the following options
UPDPROD(*YES)
OPMSRC(*YES) (used both *yes & *no, but did not work)
DSPMODSRC(*YES)

I compile the RPGLE program with option DBGVIEW(*ALL or *SOURCE)

The source of RPGLE does not stop at the breakpoint, then I wrote a
CLLE PGM being called from XYZ and simply used DSPMSG
in it. Now the error msg in QSYSOPR was

Cause . . . . . : ILE Control language (CL) procedure AF01 in
module AF01 in
program QC24B75360 in library QRPLOBJ detected an error at
statement number
0000000900. Message text for CPF2403 is: Message queue *WRKUSR in
not
found. Use F10 (if available) or the Display Job Log (DSPJOBLOG)
command to
see the messages in the job log for a more complete description of
what
caused the error. If you still are unable to solve the problem,
please
contact your technical support person.

Which is understandable, as the program is being called by API , and
cannot be used interactively, however, the same thing
was possible in older version (RPG)

Now my question is that what is alternative of STRISDB
...SRVJOB(*SELECT) in STRDBG
I have tried the JOB & Function values from the STRISDB
SRVJOB(*SELECT) in STRDBG ...SRVPGM
but got no fruitful results, rather got the msg that OBJECT IN LIBRARY
LIST NOT FOUND.

Any help in this regard will be higly appreciated, as I am unable to
proceed further in my task.

Thank you for your time

Regards
Ammar Farooq

[Joep Beckeringh]

Ammar,

It appears you are trying to debug a program that is running in another job.
To do this you must first use STRSRVJOB. Use F4 and fill in name, user and
number of the job you want to service. Then use STRDBG.

BTW: The error message you are getting shows that the job is running an
older version of the program you just compiled. When you compile a program
(succesfully) the old version is moved to library QRPLOBJ and gets a new,
interesting name.

Joep Beckeringh

"Ammar Farooq" <ammar...@yahoo.com> schreef in bericht
news:1d4eafdf.03120...@posting.google.com...