pears.TempShiftEditingAllowed

CREATE FUNCTION "pears"."TempShiftEditingAllowed"( IN "planid" CHAR(20),IN "shiftid" CHAR(20),IN "EditOrCancel" CHAR(1),IN "Source" CHAR(3) ) 
RETURNS long VARCHAR
BEGIN
  --  return nothing if allowed
  -- EditOrCancel E - Edit C - Cancel
  -- Source 
  -- TS - Tempdesk Shifts 
  -- VDD - Vacancy Diary Drag return value not shown
  -- VDM - Vacancy Diary menu
  -- VS - Vacancy Shifts
  -- PDD - Person Diary Drag return value not shown
  -- PDM - Person Diary Menu
  DECLARE "rv" long VARCHAR;
  SET "rv" = '';
  RETURN "rv"
END