====== pears.SecAgencyStatusChangeAllowed ======
<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>
create function "pears"."SecAgencyStatusChangeAllowed"( 
  in "persid" char(20),in "oldstatus" char(1),in "newstatus" char(1) ) 
returns long varchar
-- If disallowed status change is blocked
begin
  declare "rv" long varchar;
  set "rv" = '';
  return("rv")
end
</code>