[firebase-br] FOR EXECUTE STATEMENT - ERRO

[Sérgio Alexandre Gianezini]

Datas escritas como literais string, obedecem o format ano.mes.dia... tipo 
2009.10.26...

Aqui deu certo isso...

Execute Block
As
    Declare pSQL VarChar(1024);
    Declare pDataIni Date;
    Declare pIdVenda Integer;
Begin
    pDataIni = Cast('2009.01.01' As Date);
    pSQL = 'SELECT IDVENDA FROM VENDAS WHERE DATACOMPRA >= ''' || 
Cast(pDataIni As VarChar(10)) || '''';
    For Execute Statement pSQL Into :pIdVenda Do Begin
    End
End