ERROR - An external subprogram or DEF function declaration specifies a
  different  data type for one of the parameters than the SUB, FUNCTION,
  or DEF statement specifies.  Change the specified data type in  either
  the  declaration  or  the  SUB, FUNCTION, or DEF statement so that the
  data types agree.