restar fechas sql

[Oraxtar]

Hola amigos del foro, tengo el siguiente problema y espero me puedan ayudar. Estoy realizando un proyecto en el cual manejo informacion de medicamentos. Lo que pretendo hacer es un reporte que me muestre los medicamentos que van a caducar con un mes de anterioridad manejando una query. Estoy trabajando con Delphi 7 y mis tablas estan hechas en IB 6.
Estuve chencando el foro pero no puede entontrar algo. El codigo que tengo ahora es este :

fecha:=datetostr(date);
frmrepcad.IBQuery1.Close;
frmrepcad.IBQuery1.SQL.Clear;
frmrepcad.IBQuery1.SQL.Add('select * from medicamento where fecha_cad-:fecha1 between 1 and 30');
frmrepcad.IBQuery1.ParamByName('fecha1').AsDateTime:=strtodatetime(fecha);
frmrepcad.IBQuery1.open;
frmrepcad.QuickRep1.Preview;

Con este codigo me marca un error, espero me puedan ayudar.