🚀 go-pugleaf

In article <36758B4C.EA29368B@ibm.net>, kobi politely paraphrased...
> I am trying to figure how to make the below code working in to 7.0.  I
> am
> migrating from visual dbase 5.5 to visual dbase 7
> 
> select order
>       set filter to
>       go top
>       i=0
>       scan
>          i=i+1
>          if substr(dealer->filfild,i,1)="*"
>             replace curdealer with "*"
>          else
>             replace curdealer with " "
>          endif
>       endscan
> 
Just curious, what are you doing here exactly? Perhaps there is an 
easier way for _both_ versions. Since i is augmented for every record it 
can only be a small dealer table anyway.

Does your filfild look like this?


'*gfgfgfgfgffgfgf'
'g*fgfgfgfgffgfgf'
'gfg*fgfgfgffgfgf'
'gfgf*gfgfgffgfgf'
'gfgfg*fgfgffgfgf'

-- 
Romain Strieff [TeamB]
Please read this newsgroup guide below before 
posting on the private Inprise newsgroups.
http://www.inprise.com/newsgroups/guide.html
--