ERROR - The program attempts to transfer control  into  a  DEF  block.
  Change  the  control statement; you cannot transfer control into a DEF
  block except by invoking the function.