RE: Is there a BIF to remove spaces b/w letters

This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
--
[ Picked text/plain from multipart/alternative ]
Actually what we use is a routine used to build name match codes which uses
a file of titles, a file of honorifics and an apalling number of hard coded
exceptions. The routine has been a work in progress for over ten years and
it's still growing.  Real world pattern recognition is too hard for
computers. <g>

We dedupe mailing lists against our customer list in house with homegrown
software.  Saves us a pile of money.  Periodically someone in management
wants to replace the software we have with a package or a service bureau.
Every test I've seen has come out in favor of the home grown software or
been a draw.

> -----Original Message-----
> From: Jim Langston [mailto:jlangston@celsinc.com]
> Sent: Saturday, July 27, 2002 9:56 AM
> To: 'rpg400-l@midrange.com'
> Subject: RE: Is there a BIF to remove spaces b/w letters
>
>
> Ahhh, it looks like you need more than just getting rid of spaces.
>
> Here's some pseudo code for you.
>
> StateEngine = 1
> Namestring = Trim(Name)
> Title = "", FirstName = "", MiddleName = "", LastName = "",
> Suffix = "", Extra = ""
> While Length(Namestring <> 0)
>    Pos = Locate(" ", Namestring)
>    ThisPart = Left(Namestring, Pos - 1)
>    ThisPartLength = Length(ThisPart)
>    If Right(ThisPart, 1) = "."
NOTICE:
All e-mail sent to or from this e-mail address will be received or otherwise
recorded by The Sharper Image corporate e-mail system and is subject to
archival, monitoring, review by and/or disclosure to Sharper Image security
and other management. This message is intended only for the use of the
addressee and may contain information that is privileged and confidential.
If you are not the intended recipient, dissemination of this communication
is prohibited.