create or replace function fn_check_org(p_code varchar2) return varchar2 is
  --校验全国组织机构代码编制( GB 11714-1997)
  --返回值： 1-正确 2-格式非法 3-校验位错误 4-计算时出现异常
  /*  
  组织机构代码是每一个机关、社会团体、企事业单位在全国范围内唯一的、始终不变的法定代码标识。
  最新使用的组织机构代码在1997年颁布实施，由8位数字（或大写拉丁字母）本体代码和1位数字（或大写拉丁字母）校验码组成。
  本体代