newby question

Any idea why I would get an error with this when trying to compile using
BDS?

   select max(date_prepared) into h_last_ship
| A grammatical error has been found at 'select' expecting: $ FUNCTION
REPORT.
| See error number -6609.
      from sncordm
      where custnum = p_accust.cust_code