====== pears.GetQuestDate ======
<WRAP center round info>
Generated schema reference. Regenerate this page from the SQL unload; keep hand-maintained business notes in the narrative namespace.
</WRAP>

===== Original SQL =====
<code sql>
COMMENT TO PRESERVE FORMAT ON PROCEDURE "pears"."GetQuestDate" IS 
{create function GetQuestDate 

/* Application Maintained Function / Procedure - DO NOT EDIT*/

(in stagloc char(3),in stagid char(3),in sparentid char(20))
returns date
begin
  declare rv date;
  declare tagval double;
  set rv=null;
  select max(value) into tagval from tagvalue where taglocation = stagloc and id = sparentid and tagid = stagid;
  if isnull(tagval,0) <> 0 then
    set rv=dateadd(day,tagval,"date"('1899-12-30'))
  end if;
  return(rv)
end
}
</code>