FOR SELECT FIRST 2 LECTURA FROM LECTURAS WHERE NUMERO=:NUMERO AND FECHA<:HOY ORDER BY FECHA DESC INTO :LECT DO BEGIN SUSPEND; END