Re: RE: Recursive Calls

Tim:
We could post it on our web site if you need a home for it.
Carl Galgano
EDI Consulting Services, Inc.
540 Powder Springs Street
Suite C19
Marietta, GA  30064
770-422-2995
mailto: cgalgano@ediconsulting.com
http://www.ediconsulting.com
EDI, Communications and AS400 Technical Consulting

-----Original Message-----
From: Tim McCarthy <TimM@softwarejungle.com>
To: 'MIDRANGE-L@midrange.com' <MIDRANGE-L@midrange.com>
Date: Thursday, July 08, 1999 10:17 PM
Subject: RE: RE: Recursive Calls


>Hey, I have a little command that can check to see whether a given
>program is in the current jobs stack. I used to use it to prevent
>recursion for a menuing system I had once. Anyone want a copy?
>Tim
>
>> -----Original Message-----
>> From: zylka.marc@westpoint-stevens.com
>> [SMTP:zylka.marc@westpoint-stevens.com]
>> Sent: Thursday, July 08, 1999 10:29 AM
>> To: MIDRANGE-L@midrange.com
>> Subject: Re:RE: Recursive Calls
>>
>>
>>
>> We were thinking about doing the same thing.  If I could read the
>> stack, though,
>> I could
>> check to see if the program is already running before I call it.  That
>> would
>> make it quicker
>> for me to make the changes if that's not a big deal.
>>
>> Marc Zylka
>> WestPoint Stevens, Inc.
>>
>>
>> >We use a parm to tell when we call program b from another program,
>> say a.
>> >We disable the function keys in program b when not called from a menu
>> but
>> >from another program using a function key.  The users are forced to
>> return
>> >to program a.  This keeps the users from getting lost...  This is
>> much
>> >simpler than trying to read/control the program stack.  One level of
>> JUMP
>> >only.  You can also have your parm allow for several levels, each one
>> >holding the from program name, say 10 levels with a second parm being
>> an
>> >array of 10 element of 10 chars to hold each program name.
>> >
>> >Christopher K. Bipes                mailto:ChrisB@Cross-Check.com
>> >Sr. Programmer/Analyst                mailto:Chris_Bipes@Yahoo.com
>> >CrossCheck, Inc.                    http://www.cross-check.com
>> >6119 State Farm Drive                Phone: 707 586-0551 x 1102
>> >Rohnert Park  CA  94928                Fax: 707 586-1884
>>
>>
>>
>>
>> +---
>> | 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
>> +---
>+---
>| 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
>+---

+---
| 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
+---