error en consulta usando MONTH

[aleja]

Hola! tanto tiempo... Vuelvo a consultarles, después de haber tratado de solucionar el problema de varias formas sin encontrar la solución
Tengo la siguiente consulta, que funciona muy bien:

Código SQL [-]
SELECT 
  SUM(cuenta_corriente.haber) AS ORDD,
  MONTH(cuenta_corriente.fecha) AS mes
FROM
  cuenta_corriente
  INNER JOIN expensas ON (cuenta_corriente.id_expensa = expensas.id_expensas)
  INNER JOIN unidad ON (cuenta_corriente.id_unidad = unidad.id_unidad)
  INNER JOIN consorcio ON (unidad.id_consorcio = consorcio.id_consorcio)
WHERE
  consorcio.id_consorcio = :ic AND 
  cuenta_corriente.fecha BETWEEN :f1 AND :f2 AND 
  cuenta_corriente.id_transaccion = 1 AND 
  expensas.tipo = 'O' AND 
  cuenta_corriente.fecha <= expensas.fechavenc1 AND 
  MONTH(cuenta_corriente.fecha) = MONTH(expensas.fechavenc1) AND 
  YEAR(cuenta_corriente.fecha) = YEAR(expensas.fechavenc1)
GROUP BY
  MONTH(cuenta_corriente.fecha)
ORDER BY
cuenta_corriente.fecha

lo que hace la consulta es sacar el total de expensas q se pagaron en fecha, osea antes del 1° vencimiento de todos los meses que corresponden entre f1 y f2.
El codigo en Delphi es el siguiente, uso zeos, (con mydac salto el mismo error):

Código Delphi [-]
          DM.qOrdDiaAnual.ParamByName('ic').AsInteger:=dm.qConsorcioid_consorcio.Value;
          DM.qOrdDiaAnual.ParamByName('f1').AsDate:= DTPdesde.Date;
          DM.qOrdDiaAnual.ParamByName('f2').AsDate:= DTPhasta.Date;
          dm.qOrdDiaAnual.Refresh;

El error salta cuando llega al Refresh, me dice q espera q 'mes' sea largeinteger y es integer.
Los campos de la consultas se agregan cuando creo la consulta y luego 'Add all fields', el tipo de dato los pone delphi...
Es un error en la Base? en el compilador? ya nose donde buscar... si me dan algo para empezar les estaré muy agradecida.