error con consulta a 2 tablas

[fernando1973]

quisiera hacer una consulta a dos tablas donde el campo en comun es 'codigo' yo coloque este codigo en sqldataset:

select venta.fecha, stock.codigo, stock.descrip
from ventas, stock
where stock.codigo = venta.codigo and fecha = :fec

y en el boton igual que el anterior

clientdataset1.Close;
sqldataset1.ParamByName('fec').AsDate := datetimepicker1.Date;
clientdataset1.Open;


pero me da el error siguiente:

Project Project1.exe raised exeption class EdatabaseError with message
‘No Value for parameter ‘fec’ Process stopped.Use step or run to continue.

desde ya muchas gracias por las respuestas.