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
- 9014 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 |
What is the difference between copybooks and subprocedures in as400?
Hi guys, anybody know How RPG/400 code can be converted to RPG IV code with a single command?
1. I have2 records in a PF. READ PF DO DSPLY EMPNO RETRN DSPLY EMPNO ENDDO What was the output 2. SETON LR vs RETURN 3. Primary File 4. How to delete a deleted spaces 5. How to read a PF in reverse order in CL 6. I have a object in Lib A, B and C. But it shows in D Lib..Why? 7.
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
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???
thanks mr.Harshad R Suryawaunshi,i'm new to as400 i think you are telling in rpgile i know only rpg400 if possible can you tell in rpg400
Difference between creating a report using Printer file and WRKQRY(Query Report) ?
I have two sessions S1 & S2 under this 3 jobs(say j1,j2,j3 under session S1) And 2 jobs(Say j4, j5 Under session S2)is running. How many QTEMP & how many LDA will create for the same.
what is the difference between SETON RT & RETURN?
program to find the number of objects used in a given program through a display.
What is the syntax of passing parameters to a procedure by value?
How to set on/off a group of indicators in a single statement?
RPG400 
