topic Re: remove only first leading space in SAS Programming

remove only first leading space

Vijay77 — Mon, 12 Aug 2019 09:03:15 GMT

Hi i have values like 10( 92.9),12( 1.0), 15( 100),14( 87.7) i have to remove only one leading spaces from each i am using 5.1 format if i use 4.1 i am getting W.D note in log. output like 10(92.9),12( 1.0),15(100),14(87.7).

Thank you.

Re: remove only first leading space

Vijay77 — Mon, 12 Aug 2019 09:04:52 GMT

its 15( 100.0) not 15( 100).

Re: remove only first leading space

PeterClemmensen — Mon, 12 Aug 2019 09:14:46 GMT

Are these values numeric or character? What numeric value does 15( 100.0) represent?

Re: remove only first leading space

Jagadishkatam — Mon, 12 Aug 2019 09:22:15 GMT

Please try the picture format as below


proc format;
picture val (default=8)
low-9.9='009.9)' (prefix='(  ')
10-99.9='009.9)' (prefix='( ')
100-high='009.9)' (prefix='(');
run;

data want;
input cnt pct;
new=cats(put(cnt,best.),put(pct,val.));
cards;
10 92.9
12 1.0 
15 100
14 87.7 
;

proc print;
run;

Re: remove only first leading space

Vijay77 — Mon, 12 Aug 2019 09:54:42 GMT

all values are charcter

Re: remove only first leading space

Jagadishkatam — Mon, 12 Aug 2019 10:00:11 GMT

@Vijay77 , the best approach would be to use the picture format on the percentage separately which creates the character percentage and then concatenate the count with character percentage as i showed in my earlier post.

Re: remove only first leading space

PeterClemmensen — Mon, 12 Aug 2019 10:29:55 GMT

Try this

data have;
input value $9.;
datalines;
10( 92.9)
12(  1.0)
15( 100)
14( 87.7)
;

data want(drop=a i);
    set have;
    do i=1 to length(value);
        a=char(value, i);
        if a=' ' then do;
            newvalue=cat(substr(value, 1, i-1), substr(value, i+1, length(value)));
            leave;
        end;
    end;
run;

Re: remove only first leading space

KachiM — Mon, 12 Aug 2019 12:47:46 GMT

Can't a COMPRESS( ) function simplify the solution for dropping a SPACE?

data need;
   set have;
   value = compress(value);
run;

Re: remove only first leading space

Tom — Mon, 12 Aug 2019 13:02:14 GMT

@KachiM wrote:

Can't a COMPRESS( ) function simplify the solution for dropping a SPACE?
data need;
   set have;
   value = compress(value);
run;

No, since it removes ALL of the spaces.

More likely they just want to change some of them. perhaps like this:

value = tranwrd(value,'(  ','( ');

Re: remove only first leading space

data_null__ — Mon, 12 Aug 2019 13:14:30 GMT

@Vijay77 wrote:

Hi i have values like 10( 92.9),12( 1.0), 15( 100),14( 87.7) i have to remove only one leading spaces from each i am using 5.1 format if i use 4.1 i am getting W.D note in log. output like 10(92.9),12( 1.0),15(100),14(87.7).

Thank you.

Show the code you used to create these strings.

Re: remove only first leading space

andreas_lds — Mon, 12 Aug 2019 13:35:04 GMT

@Vijay77 wrote:

Hi i have values like 10( 92.9),12( 1.0), 15( 100),14( 87.7) i have to remove only one leading spaces from each i am using 5.1 format if i use 4.1 i am getting W.D note in log. output like 10(92.9),12( 1.0),15(100),14(87.7).

Thank you.

Please post the data you have before creating those strings. If the strings are the result of concatenating numbers, i am sure that creating multiple blanks can be avoided.

Re: remove only first leading space

ballardw — Mon, 12 Aug 2019 14:44:18 GMT

@Vijay77 wrote:

Hi i have values like 10( 92.9),12( 1.0), 15( 100),14( 87.7) i have to remove only one leading spaces from each i am using 5.1 format if i use 4.1 i am getting W.D note in log. output like 10(92.9),12( 1.0),15(100),14(87.7).

Thank you.

If you are using a PUT function somewhere you might want to consider using the -L alignment operator consider:

data example;
   x = 37.5;
   length string1 string2 $ 10;
   string1= catt('(',put(x,5.1),')');
   string2= catt('(',put(x,5.1 -L),')');
run;

String1 will have the leading space, String2 does not.

Re: remove only first leading space

Astounding — Mon, 12 Aug 2019 16:45:04 GMT

V = cat( scan(v, 1, '('), '(', scan(v, 2, ' ' ) ) ;