Filtrar data na procedure usando Firebird

Boa tarde...

Fiz uma procedure e quero filtrar pelo parâmetro que vai receber uma data...O código abaixo está sendo feito em uma procedure. Estou usando o IBEXPERT e o firebird 2.1 Segue o exemplo:

sSql = 'Select cod_contas,cod_contas1,ds_movtoconta from movtoconta
where dt_movtoconta >='''||cast(:pdataini as date)||''' and dt_movtoconta <= '''''||cast(:pdatafim as date);


for
execute statement sSql
into :ptipodebito, :ptipocredito, :pdsconta
do


Na execução não está apresentando erro de sintaxe mas está apresentando erro na hora da execução:


Invalid token
Dynamic sql error
SQL ERROR CODE = -104
token unknown - line 2, column 69.
2016

Fico no aguardo