Type mismatch in expression DELPHI

Delphi

09/09/2015

Dando esse erro quando vou abrir a query.
Segue abaixo o código.
Se alguém puder me ajudar

qrySelect := TQuery.Create(Self);
try
qrySelect.DatabaseName := 'Sistema';
qrySelect.SQL.Text := 'SELECT' + ^m +
'CAD06.NUM_NOTA,' + ^m +
'CAD06.COD_CLI,' + ^m +
'CAD06.TOT_NOTA,' + ^m +
'CAD03.NOSSO_NUMERO' + ^m +
'FROM CAD06' + ^m +
'JOIN' + ^m +
'CAD03 ON CAD06.COD_CLI = CAD03.COD_CLI' + ^m +
'WHERE' + ^m +
'CAD06.NF_MOD_22 = ''S'' AND' + ^m +
'CAD06.NOTA_EMIS >= :Nota_Emis AND CAD06.NOTA_EMIS <= :Nota_Emis AND' + ^m +
'CAD06.FILIAL = 1' + ^m ;
qrySelect.ParamByName('NOTA_EMIS').Value := EditMesAnoRef.Text;
qrySelect.Open;.
Matheus Gomes

Matheus Gomes

Curtidas 0
POSTAR