George,

SET VAR varnmae TEXT = 'abcdefghij'
SET VAR vvaluelength INTEGER = (SLEN(.varname))
SET VAR vnewlength INTEGER = (.vvaluelength - 1)
SET VAR vnewvalue = (SGET(.varname,.vnewlength,2))

R>sho var v%
Variable           = Value                                   Type
------------------   ------------------------------          --------
varname            = abcdefghij                               TEXT 
vvaluelength       = 10                                       INTEGER 
vnewlength         = 9                                        INTEGER 
vnewvalue          = bcdefghij                                TEXT 

Dawn Hast


"George H Baker" <[EMAIL PROTECTED]> wrote on 06/19/2008 10:30:09 AM:

> Does anyone have a snipet of code that can be used to set up SGET to
> delete the first character of data in a text field?
> 
> I had this working as a pointer in 2.11 but progress marches on and 
> there must be a simpler was of doing it.This is my first need in 7.6.
> 
> Any idea would certainly be helpful and a time saver for me.
> 
> George Baker

Reply via email to