create or replace package fpb as
  type t_array is table of varchar2(3900)   index by binary_integer;
  function split2array (p_in_string varchar2, p_delim varchar2) return t_array;
  function validate_person_card(avc_card_no varchar2) return number;
  function fill(avc_text varchar2, an_count number) return varchar2;  
  function right(avc_text varchar2, an_index1 number)return varchar2;
  function get_coopid(avc_coop_id varchar2, avc_coop_control varchar2) return varchar2;
  function cal_yearmonth(first_date date, last_date date) return varchar2;
  procedure throw(avc_error_message varchar2);
  function cal_period_payment(anum_loanrequest_amt number, anum_period number, lnum_intrate number, anum_roundpay number)  return number;
  function ex return varchar2;
  function len(avc_text varchar2) return number;
  function ifnull(avc_value varchar2, avc_replace varchar2) return varchar2;
  function ifnull(an_value number, an_replace number) return number;
end fpb;