× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



You may want to put some sort of interrupt code in your RPG. Something
like checking a data area (the QWCRDTAA API is pretty quick) and, if it
is set to debug you send a request message. While the program waits on
the request message you can start a service job against the job running
the RPG program, put the program in debug and then answer the request
message.

Gary Monnier

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Tom Deskevich
Sent: Tuesday, February 22, 2011 8:12 AM
To: IBM System
Subject: Debug an RPG program in batch. QHTTPSVR sub system.

I found these instructions in the archives for debugging a program in
batch.

1. Submit job to run in batch with HOLD(*YES).
2. Use WRKSBMJOB to obtain information about the job you want to
debug,that is: ? Job Id ? User Name ? Job Number
3. Enter the command STRSRVJOB for the Job above using the information
thatyouretrieved via WRKSBMJOB.
4. Enter the STRDBG command for the program that the batch job is
running.Thesource view of the program is displayed.
5. Press F21 to obtain a command line.
6. Enter WRKSBMJOB from the command line to release the batch job -
aSystemMessage will appear allowing you to press F10 to enter Debug
commands orEnter to run the program.
7. Press F10 - a Command Entry screen will appear.
8. Use DSPMODSRC from the Command Entry display and set breakpoints
wheredesired.
9. Exit DSPMODSRC (F3).
10. Exit the Command Entry screen (F12) - the System Message from Step
6). willappear again.
11. Press enter to run the program.
12. Program will now halt at breakpoint.
13. Debug program as normal.14. When the program/Job has completed
execution, close out the processwithENDDBG and ENDSRVJOB.

But my job is running in a thread under the QHTTPSVR sub system.

The user will request to view an image using an internet application,
which will trigger RPG programs to execute.
I want to debug those RPG programs when they run.

Should the above instructions work for me also?

Tom Deskevich
INFOCON
814-472-6066
Fax 814-472-5019

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

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

This mailing list archive is Copyright 1997-2024 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].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.