I missed the *end if* ;-) (see below)
> 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 IF
> 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
_______________________________________________
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
