pears.WPKLocalSwitchValue

CREATE FUNCTION "pears"."WPKLocalSwitchValue"( 
  /* Application Maintained Function / Procedure - DO NOT EDIT*/
  IN "SwitchID" CHAR(20),IN "SwitchLocation" CHAR(20),IN "SwitchSource" CHAR(1),IN "SwitchLocked" SMALLINT,IN "SwitchLocalisable" SMALLINT ) 
RETURNS long VARCHAR
BEGIN
  DECLARE "rv" long VARCHAR;
  SET "rv" = NULL;
  IF "switchlocked" = 1 OR "switchsource" NOT IN( 'L','P' ) THEN -- Only unlocked Literal and Params switches can be over-ridden in this way
    RETURN "rv"
  END IF;
  IF "switchlocation" IS NOT NULL AND "switchlocalisable" = 1 THEN
    SELECT FIRST "value" INTO "rv" FROM "wpkglobalswitchsetting" WHERE "wpkglobalswitchid" = "switchid" AND "location" = "switchlocation"
  END IF;
  IF "switchsource" = 'L' AND "rv" IS NULL THEN -- Params continue to have their global value stored in the params table
    SELECT FIRST "value" INTO "rv" FROM "wpkglobalswitchsetting" WHERE "wpkglobalswitchid" = "switchid" AND "location" = 'Global'
  END IF;
  RETURN "rv"
END