[Casimiro Noteví]

No recuerdo haber usado esa manera de obtener datos.
¿Por qué no haces un select normal y corriente?

Código Delphi [-]
select a.codigo 
from ventas a
inner join clientes c on c.codigo=a.cliente
where a.codigo = ?