Problemas com DBExpress x IB 6
O banco é Interbase e uso o dbexpress do delphi 7. O erro é ´List index out of bounds(0)´.
With CdsExecutar do
begin
Close;
CommandText := ´select sum(valor) from tblparcelas where codigomatricula = :codigo and datavencimento = :data and pagou = :pagou´;
Params[0].AsInteger := Matricula;
Params[1].AsDate := Date;
Params[2].AsString := ´N´;
Open;
Ao que parece está certo, mas não funciona. Alguém já passou por isso?
With CdsExecutar do
begin
Close;
CommandText := ´select sum(valor) from tblparcelas where codigomatricula = :codigo and datavencimento = :data and pagou = :pagou´;
Params[0].AsInteger := Matricula;
Params[1].AsDate := Date;
Params[2].AsString := ´N´;
Open;
Ao que parece está certo, mas não funciona. Alguém já passou por isso?
Earmarques
Curtidas 0
Respostas
Leandro_si
23/04/2004
´List index out of bounds (X)´
R:Se isso aconteceu ao abrir um ClientDataSet com parâmetros, dê um clique de direita sobre este ClientDataSet e escolha a opção FetchParams.
R:Se isso aconteceu ao abrir um ClientDataSet com parâmetros, dê um clique de direita sobre este ClientDataSet e escolha a opção FetchParams.
GOSTEI 0