[firebase-br] Alguém pode me dizer pq funciona no ibexpert e no delphi não

[Paulo Portella]

Tenta isso aqui :

f_dmm.Geral.close;

f_dmm.geral.CommandText := 'SELECT D.CODIGO, D.CODVENDA, D.CODPRO, D.UND,
D.VLRUNITARIO,D.VLRTOTAL, '+
' D.COD_EMP, P.DESCRICAO, T.IPI_SAI, T.ICMS_SAI, P.COFINS, P.PIS, '+
' P.CLASS_FISCAL, T.SUB_TRIB_SAI, D.COD_EMP   FROM D_VENDA D '+
' LEFT OUTER JOIN PRODUTO P '+
' ON (D.CODPRO = P.CODIGO) '+
' LEFT OUTER JOIN TRIBUT_PROD T '+
' ON (P.REGRA_FISCAL = T.CODIGO) '+
' WHERE D.CODVENDA = '+QuotedStr(F_DMM.NotaSaidaNUM_PED_OS.Text);

f_dmm.Geral.Open;


Vida de americano é assim: iPhone, iPod, iPad, iMac….
Já a de brasileiro é assim:IPTU, IPVA, ICMS, IPI etc


Em 18/04/2011 12:07, Reijanio Nunes Ribeiro escreveu:
> bom dia tenho a seguinte sintaxe
>
> f_dmm.Geral.close;
> f_dmm.geral.CommandText := 'SELECT D.CODIGO, D.CODVENDA, D.CODPRO, D.UND,
> D.VLRUNITARIO,D.VLRTOTAL,'+
> ' D.COD_EMP, P.DESCRICAO, T.IPI_SAI, T.ICMS_SAI, P.COFINS, P.PIS,'+
> ' P.CLASS_FISCAL, T.SUB_TRIB_SAI, D.COD_EMP   FROM D_VENDA D'+
> ' LEFT OUTER JOIN PRODUTO P'+
> ' ON D.CODPRO = P.CODIGO'+
> ' LEFT OUTER JOIN TRIBUT_PROD T'+
> ' ON P.REGRA_FISCAL = T.CODIGO'+
> ' WHERE D.CODVENDA = :PCOD';
> f_dmm.Geral.Params.
> ParamByName('PCOD').AsInteger := F_DMM.NotaSaidaNUM_PED_OS.AsInteger;
> f_dmm.Geral.Open;
>
> a mesma sintaxe no ibexpert funciona show de bola mais no delphi não funcina
> alguem pode me dar uma ideia
> ______________________________________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
> Para saber como gerenciar/excluir seu cadastro na lista, use: http://www.firebase.com.br/fb/artigo.php?id=1107
> Para consultar mensagens antigas: http://firebase.com.br/pesquisa