====== pears.CompanySalesStatusChangeAllowed ======
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"."CompanySalesStatusChangeAllowed" IS
{create function CompanySalesStatusChangeAllowed
(in compid char(20),in oldstatus char(20),in newstatus char(20))
returns long varchar
-- If change is disallowed you must set status back to oldstatus before returning an error message
begin
declare rv long varchar;
set rv='';
return(rv)
end
}