bumworld

DROP FUNCTION IF EXISTS htmlStrip;
CREATE FUNCTION htmlStrip(pmXml longtext)RETURNS longtext
DETERMINISTIC
htmlStrip:
BEGIN
DECLARE vStart INTEGER ;
DECLARE vEnd INTEGER ;
DECLARE vResult LONGTEXT;
DECLARE vCount1 INTEGER;
DECLARE vCount2 INTEGER;

SET vResult:=pmXml;
SET vCount1:=LENGTH(vResult)-LENGTH(REPLACE(vResult,’<’,”));
SET vCount2:=LENGTH(vResult)-LENGTH(REPLACE(vResult,’>’,”));
IF vCount1<>vCount2 THEN
RETURN ‘Input Error’;
END IF;

WHILE (LOCATE(‘<’,vResult) OR LOCATE(‘>’,vResult)) DO
SET vStart:=LOCATE(‘<’,vResult);
SET vEnd:=LOCATE(‘>’,vResult);
SET vResult:=REPLACE(vResult,SUBSTRING(vResult,vStart,vEnd-vStart+1),”);
END WHILE;
RETURN vResult;
END;