[WEB400] RE: WEB400 Digest, Vol 2, Issue 196

["Malchow, Grizzly" <GMalchow@xxxxxxxxxxxxxxxxxxxxx>]

> I demonstrated something like this on the RPG400-L list back in April.
I 
> wrote a subprocedure that you could call like this:

>   x = 0;
>   Array(*) = gettok( var1+var2 : x'25': x);

> For more information, see the following messages in the archive:

> http://archive.midrange.com/rpg400-l/200408/msg00372.html
> http://archive.midrange.com/rpg400-l/200408/msg00409.html

Thanks Scott, that link is exactly what I was looking for.