====== pears.weekenddate ======
Generated schema reference. Regenerate this page from the SQL unload; keep hand-maintained business notes in the narrative namespace.
===== Original SQL =====
COMMENT TO PRESERVE FORMAT ON PROCEDURE "pears"."weekenddate" IS
{create function weekenddate
/* Application Maintained Function / Procedure - DO NOT EDIT*/
(in pyearno integer,in pweekno integer)
returns date
begin
declare rv date;
select week1friday into rv from payrollyear where yearnumber=pyearno;
if rv is null then
select week1friday+(numberofweeks*7) into rv from payrollyear where yearnumber=pyearno-1
end if
;
if rv is not null then
set rv=rv+((pweekno-1)*7)
end if
;
return(rv)
end
}