Firebird, DBX, CommandText

[pablonill]

Hola como estan?, tengo el siguiente codigo.

Código Delphi [-]
  CL.TQuery.Close;
  CL.TQuery.CommandText := 'SELECT (SUM(CTA.DEBE)-SUM(CTA.HABER)) AS SALDO FROM TCTACTE CTA ' +
  'WHERE TIPO_OPERACION <> ''X'' AND ID_VENTA IN (SELECT ID_VENTA FROM TVENTA WHERE ID_CLIENTE = :ID_CLIENTE)';
  CL.TQuery.Params.ParamByName('ID_CLIENTE').AsInteger := CL.TLCtaCteID_CLIENTE.AsInteger;
  CL.TQuery.Open;

El tema es el siguiente, tengo dos clientes cargados uno con id_cliente = 1 y otro con id_cliente = 2, bueno el tema es que la consulta funciona perfecto para el primer caso, para el segundo, no funciona. Las pruebas que hice fue, agregar un break point para ver el valor que se pasa por parametro, y el valor es el correcto, puse un sqlmonitor para ver la consulta generada, y el valor es ? asi que no se que puede estar sucediendo. Alguien puede darme una idea de que puede estar sucediendo. Como les digo, con el primer caso o sea con el id_cliente = 1 anda perfecto. Gracias.