====== pears.weekmonthenddate ======
<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"."weekmonthenddate" IS 
{create function weekmonthenddate 

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

(in perd integer,in worm char(1))
returns date
begin
  declare rv date;
  declare w integer;
  declare y integer;
  set y=truncnum(perd,-2);
  set w=perd-y;
  set y=y/100;
  if worm = 'W' then
    return weekenddate(y,w)
  end if;
  set rv=dateadd(Month,1+(select monthoneoffset from params),ymd(y,w,1))-1;
  return(rv)
end
}
</code>