pears.DeHead

COMMENT TO PRESERVE FORMAT ON PROCEDURE "pears"."DeHead" IS 
{CREATE FUNCTION DeHead 
 
/* Application Maintained Function / Procedure - DO NOT EDIT*/
 
(IN s long VARCHAR)
RETURNS long VARCHAR
BEGIN
  DECLARE i SMALLINT;
  IF s IS NULL THEN
    RETURN NULL
  END IF;
  SET i=charindex("char"(9),s);
  IF i > 0 THEN
    SET s=stuff(s,1,i,'')
  END IF;
  RETURN(s)
END
}