====== pears.depttran ======
<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"."depttran" IS 
{create function pears.depttran(in deptu char(1))
returns char(2)
begin
  declare rv char(2);
  case deptu when '0' then
    set rv='0' when 'B' then
    set rv='CN' when 'H' then
    set rv='CT' when 'J' then
    set rv='CU' when 'G' then
    set rv='DR' when 'A' then
    set rv='EN' when 'C' then
    set rv='FA' when 'F' then
    set rv='MI' when 'E' then
    set rv='WR'
  else
    set rv='ZC'
  end case
  ;
  return(rv)
end
}
</code>