Re: How to call a Informix 4gl rutine from another 4GL rutine .
Posted in 1998
I assume you mean function A calls function B which may end up calling function A again directly or indirectly. If this is the case you could define a modular variable (defined at the top of a module above the first function statement) to flag any recursion, something like: define r_flag char function my_func() if r_flag then error "already called" else let r_flag = true call my_func_norecurs() let r_flag = false end if end function function my_func_norecurs() ... the real function. end function The variable r_flag will be null the first time the function is called. Augusto Carnero wrote: > > Hello. > > I would like to know, if there is any way to avoid the recursive call of a > informix 4Gl rutine. I mean , my intention is to make a 4GL rutine from > another 4Gl rutine, without the use of the recursive method. > If anybody can response this question I would apreciate it. > > thanks in advance. > > Augusto. > > acarnero@ven.net ---------------------------------------------------------------------- John H. Frantz Power-4gl: Extending Informix-4gl john@rl.is http://www.rl.is/~john/pow4gl.html