List Index out od Bounds(0)

Question

Ola amigos, estou executando uma pesquisa sql para atualizar os valores de um DBchart mas esta aparecendo a seguinte mensagem de erro: List Index out of Bounds(0). Como resolver????A Consulta SQL � es...

Ruyoutor · Answer

Boa tarde amigo!Tenta ir dentro da propriedade sql e abrir as linhas dando enteresse erro acontece quando vc tenta inserir informa��es em uma linha que � esta aberta usando o add eu acho q � era para acontecer, mas...ao env�s de vc usar sql.add use:[/code]Query.sql[0]:=�consulta�;[code:1:9f4b5a21f5]assim vc pode inserir direto na linha desejada esse c�digo seu vc poderia dividir em tr�s linhas por exemplo.esse c�digo que eu te passei funciona no ADOQuery mas � sei se no q vc esta usando funciona tenta ai qualquer coisa � s� falar.vlw![/code:1:9f4b5a21f5]...

Davicarrano · Answer

este erro acontece quando voc� tenta acessar uma posi��o de vetor que nao existe... nesse caso provavelmente nao existe o parametro 3.......

Ruyoutor · Answer

cara foi mau ai esqueci de fechar a tag do c�digo sou muito desastradoespero q vc entenda...

Aroldo Zanela · Answer

Colega,Adicione isso na propriedade SQL do objeto QryProcRel:[code:1:994012bfd2]select TipoVenda, SUM(Total_Bruto_ped) , SUM(Desc_ped), SUM(Frete), SUM(Total_liq_ped), SUM(Custo)from TabPedidowhere (TabPedido.Situacao <> :sit)and (TabPedido.data between :dtinicio and :dtfim)and (TabPedido.nr_nota_ped <> :nr_nota)group by TipoVenda[/code:1:994012bfd2]No Delphi:[code:1:994012bfd2]QryProcRel.Close;QryProcRel.ParamByName(�sit�).AsString := �PR�;QryProcRel.ParamByName(�dtinicio�).AsDate := DateTimePicker1.Date;QryProcRel.ParamByName(�dtfim�).AsDate := DateTimePicker2.Date;QryProcRel.ParamByName(�nr_nota�).AsString := �Canc�;QryProcRel.Open;[/code:1:994012bfd2]Se for ADO, a sintaxe correta �:QryProcRel.Parameters.ParamByName(�NomeParametro�).Value...

Emerson Nascimento · Answer

o erro � exibido quando voc� abre a tabela?

tem que verificar se o erro � na tabela em si, ou em algum outro componente que a utiliza.

aparentemente o problema n�o est� na lista de par�metros (informe qual o componente que voc� est� usando para acesso ao BD)

QryProcRel.Close;
QryProcRel.SQL.Text :=
  �select TipoVenda, SUM(Total_Bruto_ped), SUM(Desc_ped), �+
  �  SUM(Frete), SUM(Total_liq_ped), SUM(Custo) �+
  �from TabPedido �+
  �where TabPedido.Situacao <> :sit �+
  �  and TabPedido.data between :dtinicio and :dtfim �+
  �  and TabPedido.nr_nota_ped <> :nr_nota �+
  �group by TipoVenda�;
QryProcRel.ParamByName(�sit�).AsString := �PR�;
QryProcRel.ParamByName(�dtinicio�).AsDate := DateTimePicker1.Date;
QryProcRel.ParamByName(�dtfim�).AsDate := DateTimePicker2.Date;
QryProcRel.ParamByName(�nr_nota�).AsString := �Canc�;
QryProcRel.Open;

Rafaelfornazari · Answer

Obrigado Amigos, com a ajuda de vc�s consegui solucionar este problema...

F�rum List Index out od Bounds(0) #336428