Interested to Buy Any Domain ? << Click Here >> for more details...
I have learnt through Net that Debugging a Batch job
involves
1. Submit the job with the HOLD (*YES) parameter:
SBMJOB HOLD(*YES) or Hold the job queue that before
submitting the job
by using the HLDJOBQ command.
2. Determine the job name, user, and number of the submitted
job by using the WRKSBMJOB command.
3. Type the Start Service Job command on your screen:
STRSRVJOB JOB(job name/user/number)
4. Type the Start Debug command on your screen: STRDBG
5. Release the job in the jobq. Type WRKSBMJOB and then put
a 6
beside the job to be released and press enter, or, if the
job queue was
put on hold, release the job queue with the RLSJOBQ command.
6. A display appears when the job is ready to start, saying
that you
can now begin debugging the job. Press F10 to show the
Command Entry
display.
7. Now you can start debugging by entering an Add Break
Point command:
ADDBKP
8.ENDDBG
9.ENDSRVJOB
I tried this for RPG/400 Program and up to six steps of the
above it's ok,but for me no source is displayed and i typed
DSPMODSRC in Command line but still i can't see the sourceif
i press F.10 and enter command ADDBKP i don't know how to
add break points through it,usually i add break points using
F.6 for Interactive job debugs,but since this is batch i
don't know sir,Please help me out.
I was asked this question in a interview,i know only RPG/400
and i’m asking for debugging of RPG/400 program only sir.
or is it only possible to debug BATCH RPG ILE JOB and it is
not possible to debug BATCH RPG/400 JOB kindly help me out
sir
- 4 Answers
- 10725 Views
- HSBC, I also Faced
- E-Mail Answers
Answer Posted / sakthi
If you are not getting the source after entering DSPMODSRC
means then you have to check whether the source is in the
right library. SOmetimes the control may point to someother
library and hence you won't get the source to add
breakpoint.
Also make sure that you have compiled the source with
*SRCDBG or *SOURCE.
| Is This Answer Correct ? | 10 Yes | 2 No |
Post New Answer View All Answers
what is the procedure and explain about real time scenario.
How to handle duplicate error handling in RPG?
explain sflclr, sflend, sfldlt, and sflcsrrrn?
What is ment by record level identifier?
How many program bind in one module....
How to define data area in RPG program? In which scenario multi occurrence DS is use in AS400?
1. What is bound-by-call and bound-by-reference? 2. Where and why is *Nomain used? 3. What are the difficulties faced by programmers when using service programs? 4. Explain the different ways of parsing and compiling XML in iSeries.
How to create a login screen using a command instead of display file.... intention is to get a password field on a command..... how do you achieve this...
can any one help in hawkeye and turnover or any change management system plzzzzz or send the documents to my mail id :gvsp.as4@gmail.com
what is a rpg?
When it is desirable to describe files Internally?
how do I preserve and clean the array?
Q:HI friends accually ihave one problem plesase let me know the alternate code of this code. Related field description of code: Add a field, CALvsPRD, "Calendar Day Starts Before/After Production Day" to the parameter set WRKORDER which accepts values 'A' or 'B' o B = Calendar Day Starts Before Production Day o A = Calendar Day Starts After Production Day o Any other value indicates the production and calendar dates are always the same. code: Automatic Execution Of *INZSR Subroutine /Z01 * retrieves WRKORDER field values. /Z01 * Calculate default Production Date and return it to caller. /Z01 * Production date defaults to system date /Z01 C Eval P@Pdate = %DATE() /Z01 * unless Calendar date starts Before PDN(production) date and /Z01 * system time is before PDN Start Time then /Z01 * PDN date is yesterday. /Z01 C If W@CALvsPRD = 'B' and /Z01 C %TIME() < %TIME (W@Strtime) /Z01 C Eval P@Pdate -= %Day(1) /Z01 * unless Calendar date starts After PDN date and /Z01 * system time is *GE PDN(production) Start Time then /Z01 * PDN date is tomorrow. /Z01 C ElseIf W@CALvsPRD = 'A' and W@Strtime > *Zero and /Z01 C %TIME() >= %TIME (W@STrtime) /Z01 C Eval P@Pdate += %Day(1) /Z01 C EndIf /Z01 C Eval *InLr = *On
How can we override a file during runtime in rpg?
What is the difference between iter and do?
