Glen Bojsza wrote:
> Sorry to bother everyone but either I'm tired or brain dead.
>
> I have a field which has hundreds of lines.
>
> For all [ in the field I need to check to see if the character to it's
> immediate left is a number.
>
> If it is a number then the [ is to be converted into an _.
>
> If it is not a number then the [ is to be removed (no substitution or
> spaces).
>
> I need to be able to cycle through the entire field which each line may
> contain several [.
>
> Any thoughts would be appreciated as I have tried using a combination
> of
> find characters and foundchunk on the field without success.
Use the *offset()* function as in:
On replaceChar
Local tOffset, tCharsToSkip, tFieldText
----
put 0 into tCharsToSkip
put fld "theFieldName" into tFieldText
repeat
put offset("[",tFieldText,tCharsToSkip) into tOffset
if tOffset = 0 then exit repeat
if char (tOffset - 1) of tFieldText is an integer then
replace char tOffset of tFieldText with "_"
put tOffset + 1 into tCharsToSkip
else
replace char tOffset of tFieldText with empty
put tOffset into tCharsToSkip
end repeat
put tFieldText into fld "theFieldName"
end replaceChar
Aloha from Hawaii,
Jim Bufalini
_______________________________________________
use-revolution mailing list
[email protected]
Please visit this url to subscribe, unsubscribe and manage your subscription
preferences:
http://lists.runrev.com/mailman/listinfo/use-revolution