msf 0 Denunciar post Postado Outubro 28, 2005 Olá,Estou com um problema na execução de uma stored procedure no Firebird 1.5.Criei um data module com uma conexão ao banco e um componente TSqlStoredProcedure.Após atribuir os valores da procedure e seus parametros, o código executa a stored procedure e retorna a seguinte mensagem de erro: List index out of bounds...Alguem sabe o q pode estar acontecendo?Win2k + Delphi 7 + Firebird 1.5 with cEstDM.sp do begin try StoredProcName := 'insert_veiculo'; Params.Clear; param1 := TParam.Create(Params, ptInput); param2 := TParam.Create(Params, ptInput); try Params[0].Name := 'modelo'; Params[1].Name := 'sigla'; ParamByName('modelo').Text := fmodelo; ParamByName('sigla').Text := fsigla; Prepared := true; ExecProc; result := true; except on e: Exception do showMessage(e.Message); end; finally param1.Free; param2.Free; Close; end; end;Abraços,Marcos Compartilhar este post Link para o post Compartilhar em outros sites
thalesoli 0 Denunciar post Postado Outubro 28, 2005 eu nao crio os parametros eu somente uso...ao atribuir.. eles já sao criadossera q você não está distruindo eles em runtime? Compartilhar este post Link para o post Compartilhar em outros sites
msf 0 Denunciar post Postado Outubro 28, 2005 Não, Thales.A sp está sendo atribuida em tempo de execução, o que implica no não conhecimento da estrutura de parametros da sp pelo componente.Se faz necessária a criação dos parametros e automaticamente o componente executa o bind, neste caso por nome que é o default.Não estou conseguindo descobrir o motivo do erro já que só foram realmente criados 2 parametros e o componente já demostrou isto.Grato. Compartilhar este post Link para o post Compartilhar em outros sites
Pezzin 0 Denunciar post Postado Novembro 1, 2005 Verifique se você faz referência a algum índice.Essa mensagem diz que está faltando o índice que você está tentando atribuir em algum IBTable. Compartilhar este post Link para o post Compartilhar em outros sites