Re: ancient 36 ocl help needed

[thomas@xxxxxxxxxxx]

On Tue, 13 November 2001, "Jim Franz" wrote:

> do not understand this code (and can't find in reference)
> // evaluate P20Ñ
> // tag more
> // evaluate P20ß20? + 3
> // if ??20??Õ     GOTO   TAGL
>
> ?20? is parameter 20 and is used as a numeric counter
> what is IF ??20??Õ      ???
> cannot find any reference in OCL manual to "double question marks"

This might've been answered, but it's not quite true that "?20? is parameter 
20". I think it's more accurate to say "?20? means to substitute the value from 
parameter 20 here". And where you see the doubled question marks, it simply 
means that substitution is done twice -- nested substitution.

We used this back in S/34 OCL to code an 'addition' procedure once because S/34 
OCL didn't have anything like "?20? + 3". Stupid, of course, because it was 
much faster just to call an RPG pgm to do the addition; but what the heck... it 
made a fascinating piece of totally undecipherable code.

Tom Liotta

--
Tom Liotta
The PowerTech Group, Inc.
19426 68th Avenue South
Kent, WA 98032
Phone  253-872-7788
Fax  253-872-7904
http://www.400Security.com


___________________________________________________
The ALL NEW CS2000 from CompuServe
 Better!  Faster! More Powerful!
 250 FREE hours! Sign-on Now!
 http://www.compuserve.com/trycsrv/cs2000/webmail/