pears.DocumentPackEmailBody

CREATE FUNCTION "pears"."DocumentPackEmailBody"( IN "persid" CHAR(20),IN "vacid" CHAR(20),IN "oldbody" long VARCHAR ) 
RETURNS long VARCHAR
BEGIN
  DECLARE "rv" long VARCHAR;
  DECLARE "CRLF" CHAR(2);
  DECLARE "deptid" CHAR(2);
  SELECT "departmentid" INTO "deptid" FROM "vacancy" WHERE "vacancyid" = "vacid";
  SET "crlf" = "char"(13)+"char"(10);
  SET "rv" = "string"('Dear ...',"CRLF","CRLF","oldbody");
  -- use persid to get person questions
  -- use vacid to get vacancy questions
  RETURN("rv")
END