ERROR - The program contains a noninteger named constant in a  context
  that requires an integer.  For example:

       DIM A ('123'D)

  Supply an integer constant.