Date:         Tue, 13 Feb 2001 12:12:32 -0500
Reply-To:     Gerhard Hellriegel <ghellrieg@T-ONLINE.DE>
Sender:       "SAS(r) Discussion" <SAS-L@LISTSERV.UGA.EDU>
From:         Gerhard Hellriegel <ghellrieg@T-ONLINE.DE>
Subject:      Re: Compression in V6.

On Tue, 13 Feb 2001 11:20:27 -0500, Pleasant, David (CAP, CARD)
<David.Pleasant@GECAPITAL.COM> wrote:

Quick and dirty (without thinking too much about that...):

data test;
  length b $30 a $30 x $30;
  a="abc    cde  fgh fff";
  i=0;
  xall=1;
  do until (x="");
    i+1;
    x=scan(a,i);
    substr(b,xall)=x;
    xall=xall+length(x)+1;
  end;
  drop x i xall;
run;




>I am trying to compress a name field.  Th field contains the first, last,
>and sometimes the middle initial.  I need to eliminate all but one blank
>between each.  The function COMPBBL is unknown by my version of SAS.  How
>can I do this in SAS V6.
>
>Thank you for your help.
>
>
>> g            GE Card Services
>___________________________________________________________________________
_
>___________________________________________
>> David Pleasant
>> Programmer Analyst
>> GE Card Services
>> 4875 Higbee Ave. NW.
>> Canton, OH  44718
>> Phone:        (330) 493-5816 Dial Comm 8*360-5816
>> Fax:          (330) 649-7184 Dial Comm 8*360-4184
>> E-Mail:       David.Pleasant@gecapital.com
>>
>> "This email message is for the sole use of the intended recipient(s) and
>> may contain confidential and privileged information.  Any unauthorized
>> review, use, disclosure or distribution is prohibited.  If you are not
the
>> intended recipient, please contact the sender by reply email and destroy
>> all copies of the original message."
>>