RE: RPG & recursive call

[Mark Lazarus <mlazarus@xxxxxxxx>]

Brad,

At 08:28 AM 11/12/98 -0600, you wrote:
>
>> -----Original Message-----
>> From:        Mark Lazarus [SMTP:mlazarus@ttec.com]
>> Sent:        Wednesday, November 11, 1998 3:31 PM
>> To:  MIDRANGE-L@midrange.com
>> Subject:     RE: RPG & recursive call
>> 
>> Brad,
>> 
>> At 01:12 PM 11/10/98 -0600, you wrote:
>> 
>> >> >Is it possible to do a recursive call in an RPG III program ? If I
>> >> try to do
>> >> >that by a simple CALL I have the message RPG8888.
>> >> >
>> >> Some languages (CL) support recursion, but RPG and COBOL do not.  You
>> >> can
>> >> do a recursive call from a RPG program, but the call cannot be to
>> >> another
>> >> RPG program in the call stack.
>> >> 
>> >    [And Brad Said:]  Al, would this be considered recursion?  Just
>> >wondering... A recursive call would call itself, which would inherintly
>> >say that the program would already be in the call stack, correct?  So,
>> >how can an RPG/III program make a recursive call?  ;)
>> 
>>  If the call from the RPG program is to a CLP that is already in the
>> stack.
>> 
>>  -mark

>       [And Brad Said:]  That ain't recursion.  Recursion is a procedure
>calling itself. 

 Not according to the AS/400 definition!  If RPG PgmA --> PgmB --> PgmA
this will generate RPG8888.  Whether it's technically recursion or not (and
I'm not sure about the definitive answer to that) is irrelevant.  The /400
thinks that it is!

 -mark

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---