pears.FirstWord

COMMENT TO PRESERVE FORMAT ON PROCEDURE "pears"."FirstWord" IS 
{CREATE FUNCTION FirstWord 
 
/* Application Maintained Function / Procedure - DO NOT EDIT*/
 
(IN sWords CHAR(50))
RETURNS CHAR(50)
BEGIN
  DECLARE i INTEGER;
  SET swords=TRIM(swords);
  SET i=charindex(' ',swords);
  IF i = 0 THEN
    RETURN swords
  ELSE
    RETURN("left"(swords,i-1))
  END IF
END
}