Minha Função nao retorna Valores no Delphi 2005
24/09/2015
0
Ola galera!
Essa é a minha primeira vez aqui...
bom usei um componente tQuery para Executar a Função de busca de preço.
dentro do componente coloquei o sequinte comando
Select dbo.fc_busca_preco (:codbarras) as valor
Quando executo isso
fc_busca_preco .close;
fc_busca_preco .ParamByName('codbarras').AsInteger := qy_itemcodBarras.asInteger;
fc_busca_preco .ExecSQL;
if fc_busca_precovalor .AsInteger > 0 then
campo := fc_busca_precovalor .AsInteger
So que o if esta retornando 0.
Se eu executar esse select direto no banco ele me traz o valor que eu busco
Essa é a minha primeira vez aqui...
bom usei um componente tQuery para Executar a Função de busca de preço.
dentro do componente coloquei o sequinte comando
Select dbo.fc_busca_preco (:codbarras) as valor
Quando executo isso
fc_busca_preco .close;
fc_busca_preco .ParamByName('codbarras').AsInteger := qy_itemcodBarras.asInteger;
fc_busca_preco .ExecSQL;
if fc_busca_precovalor .AsInteger > 0 then
campo := fc_busca_precovalor .AsInteger
So que o if esta retornando 0.
Se eu executar esse select direto no banco ele me traz o valor que eu busco
Pamela Gomes
Curtir tópico
+ 0
Responder
Posts
24/09/2015
Raimundo Pereira
Pamela, Debug e veja os retorno da execução por linha.
Responder
Clique aqui para fazer login e interagir na Comunidade :)