pears.SocialMediaResolve

COMMENT TO PRESERVE FORMAT ON PROCEDURE "pears"."SocialMediaResolve" IS 
{CREATE FUNCTION SocialMediaResolve 
 
/* Application Maintained Function / Procedure - DO NOT EDIT*/
 
(IN MediaName CHAR(2),IN NUMBER CHAR(100))
RETURNS CHAR(100)
BEGIN
  /* MediaName LI - LinkedIn TW - Twitter SK - Skype FB - Facebook */
  CASE MediaName
  WHEN 'TW' THEN
    CASE
    WHEN NUMBER LIKE 'https:%' THEN RETURN NUMBER
    WHEN NUMBER LIKE 'www.twitter%' THEN RETURN string('https://',NUMBER) ELSE
      RETURN string('https://www.twitter.com/',NUMBER)
    END CASE
  WHEN 'SK' THEN
    IF NUMBER LIKE 'skype://%' THEN RETURN string(NUMBER,'?call')
    ELSE RETURN string('skype://',NUMBER,'?call')
    END IF
  WHEN 'FB' THEN
    CASE
    WHEN NUMBER LIKE 'http:%' THEN RETURN NUMBER
    WHEN NUMBER LIKE 'www.facebook%' THEN RETURN string('http://',NUMBER) ELSE
      RETURN string('http://www.facebook.com/',NUMBER)
    END CASE
  WHEN 'LI' THEN
    CASE
    WHEN NUMBER LIKE 'http:%' THEN RETURN NUMBER
    WHEN NUMBER LIKE 'https:%' THEN RETURN NUMBER
    WHEN NUMBER LIKE 'uk.linkedin%' THEN RETURN string('http://',NUMBER)
    WHEN NUMBER LIKE 'www.linkedin%' THEN RETURN string('http://',NUMBER)
    WHEN NUMBER LIKE '%/%' THEN RETURN string('http://uk.linkedin.com/pub/',NUMBER) ELSE
      RETURN string('http://uk.linkedin.com/in/',NUMBER)
    END CASE ELSE
    RETURN NUMBER
  END CASE
END
}