Interested to Buy Any Domain ? << Click Here >> for more details...
A pgm subroutine calling child subroutine, that child
subroutine again calling parent subroutine, u have 1000
lines of code, with out debugging , how can u find that error???
Is there any command to find errors in pgm???
- 3 Answers
- 8979 Views
- HSBC, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / uday bagadi
This Pgm actually getting run-time error not a compile time (compile time error we solved by spoon file) and run-time error handle by debug.As per my knowledge your pgm getting infinite loop so remove child subroutine calling to subroutine
| Is This Answer Correct ? | 8 Yes | 0 No |
Answer / karan patel
First of all create the pgm file and than and write SP in place of options and than find ur pgm file last one,than put 5 on that pgm file,it will open a window,type B to go bottom,and just one page up will take u to the code and line by line error in,and than u can resolve it,hopefully u can get all ur errors there....
| Is This Answer Correct ? | 4 Yes | 3 No |
Answer / dileep
we can find out error by specify Monitor opcode
Monitor
Parent subroutine
Exsr child subroutine
on Error
Display Subrouitne parent
End Monitor
Monitor
Chile subroutine
Monitor
On Error Child subroutine
Display Subroutine child
End Monitor
| Is This Answer Correct ? | 0 Yes | 0 No |
Suppose you have 3 members in a database file. How to read records from all the members without using CL (OVRDBF) i.e. Entire process should be handled exclusively in a RPG program?
are there any useful c runtime apis that I can call from rpg iv?
how do I play {insert rpg system here}?
what is the procedure and explain about real time scenario.
0 Answers Adhoc Technologies, Hanuman Automation, HSBC, IBM,
how we create binder member for updating service program and where we type this code on command line or in program ? strpgmexp pgmlvl(*current) export symbol (xyz0 endpgmexp. plz explain me this step by step .
Why there is invention of RPG if we can do insert update delete in CL through SQL.Why the rise of RPG?
what do you mean by an input subfile, what are the keywords required?
Interviewer asked me write down DDS for load all subfile .can anybody write dds
What are the necessary keywords required to code a message subfile?
How can we override a file during runtime in RPG? Without using OVRDBF or calling a CL program
1) How to retrieve RRN through RPG ? 2) How to pass parameter by value ? 3) How to trap the error through the RPG/400
10 Answers IBM, Tech Mahindra,
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
RPG400 
