这个sql如何也编译不过去，跪求

这个sql怎么也编译不过去，跪求
CREATE OR REPLACE FUNCTION "HHYH"."CRF_GETPACTSTART" (ipactno varchar2) --输入的合同号
  return varchar2
  is rstastflag varchar2(25) ;--返回的状态
  begin
  select pactstats into rstastflag from cr_pactmanage where pactno = ipactno;
  return rstastflag;
  Exception
  when no_data_found then rstastflag:='';
  when too_many_rows then rstastflag:='many';
  end;

------解决方案--------------------------------------------------------
DB2里面没有varchar2类型，可以换成varchar类型