James,

in addition to my former message:

loRegExp = CREATEOBJECT('VBScript.RegExp')


lcUPC=ALLTRIM(cUPC)

lcTemp = ''
FOR lnloop = LEN(lcUPC)+1 TO 1 STEP -1
 lcUPC = STUFF(lcUPC,lnloop,0,'\s*')
ENDFOR &&lnLoop

loRegExp.PATTERN    = lcUPC

lcPart = loRegExp.REPLACE(cPart,'')

The only thing not included is:
>Occurs a few times:
>"Big Widget (1 12345 12345 1)" ==> "Big Widget (1 12345 12345 1)"
but this is a typo isn't it?

Agnes
>I want the UPC Code to disappear, regardless of the position of the white space.
>
>Now, I know there's gonna be some fun with punctuation as well in some of the less frequent case, but I'm sure I can handle that when I get to it. For now:
>
>Main ways:
>"Big Widget 1 12345 12345 1" ==> "Big Widget"
>"Big Widget - 1 12345 12345 1" ==> "Big Widget - "
>
>Occurs a few times:
>"Big Widget (1 12345 12345 1)" ==> "Big Widget (1 12345 12345 1)"
>
>Once only:
>"Big Widget 1 12345 12345 1 / China" ==> "Big Widget / China"
>"Big Widget Green:1 12345 12345 1" ==> "Big Widget Green:"
>
>As noted before, the spaces within the UPC code in the field can occur anywhere; the pattern used here is just the most frequent usage.
>
>
>>I see your "input" data, but what do you want as output?