Guilherme014 Postado Dezembro 28, 2004 Denunciar Share Postado Dezembro 28, 2004 (editado) Olha outro ai.........no caso é só o select, que ficou mais de 3 horas e não retornou resultado nenhum.... qryResult.Close; qryResult.SQL.Clear; qryResult.SQL.Add(' SELECT RP_DMAEMISSAO,VE_NOME,RP_DMAVENCTO,CF_NOMEFANTASIA,NF_NOTA, RP_VALOR,NF_IPIBASE,pedido.ID,vendedor.ID'); qryResult.SQL.Add(' From ReceberPagar, CliFor, NOTAFISCAL, VENDEDOR, PEDIDO'); qryResult.SQL.Add(' WHERE PEDIDO.PD_TIPOES='+#39+'E'+#39); if edDataDe.text <> ' / / ' then qryResult.sql.Add(' AND ReceberPagar.RP_DMAEMISSAO >= ' + App.DeliData + FormatDateTime('MM/DD/YYYY', strToDateTime (edDataDe.text))+ app.DeliData); if edDataAte.text <> ' / / ' then qryResult.sql.Add(' AND ReceberPagar.RP_DMAEMISSAO <= ' + app.DeliData + FormatDateTime('MM/DD/YYYY', strToDateTime(edDataAte.text))+ app.DeliData); if edBenificiario.Text <> '' then qryResult.SQL.Add(' AND VENDEDOR.VE_NOME='+edBenificiario.Text); if edDataPagamento.Text <> ' / / ' then qryResult.SQL.Add(' AND ReceberPagar.RP_DMAVENCTO = ' + App. DeliData + FormatDateTime('MM/DD/YYYY', strToDateTime (edDataPagamento.Text))+ app.DeliData); if edCliente.Text <> '' then qryResult.SQL.Add(' AND CliFor.CF_NOMEFANTASIA ='''+edCliente.Text+ ''''); if edValorNF.Text <> '' then qryResult.SQL.Add(' AND ReceberPagar.RP_VALOR ='''+edValorNF.Text+ ''''); Editado Dezembro 28, 2004 por Guilherme014 Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Progr'amador Postado Dezembro 28, 2004 Denunciar Share Postado Dezembro 28, 2004 Olá,Ta faltando aqueles -->> #39. E da mesma forma que um UPDATE precisa do ExecSQL uma SELECT precisa do OPEN (qryResult.Open) no final.Abs. Progr'amador. Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Guest - guilherme014 - Postado Dezembro 28, 2004 Denunciar Share Postado Dezembro 28, 2004 Olá,Ta faltando aqueles -->> #39. E da mesma forma que um UPDATE precisa do ExecSQL uma SELECT precisa do OPEN (qryResult.Open) no final.Abs. Progr'amador. qryResult.Open, já tem no final, é porque eu copiei e não o colei.agora os #39 aonde eu ponho, é quando tem edDataDe.text..... Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Progr'amador Postado Dezembro 28, 2004 Denunciar Share Postado Dezembro 28, 2004 tipo assim:qryResult.sql.Add(' AND ReceberPagar.RP_DMAEMISSAO >= '+#39+ App.DeliData + FormatDateTime('MM/DD/YYYY', strToDateTime(edDataDe.text))+ app.DeliData+#39);e tem outra coisa ae, na linha a baixo coloque assim:qryResult.SQL.Add(' WHERE PEDIDO.PD_TIPOES=''E''');eu não entendi a lógica disso:App.DeliData + FormatDateTime('MM/DD/YYYY', strToDateTime(edDataDe.text))+ app.DeliDataAbs. Progr'amador. Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Guest - guilherme014 - Postado Dezembro 28, 2004 Denunciar Share Postado Dezembro 28, 2004 eu não entendi a lógica disso:App.DeliData + FormatDateTime('MM/DD/YYYY', strToDateTime(edDataDe.text))+ app.DeliData eu também não, mas o meu patrão no estágio pediu para não mudar...... Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
Guilherme014
Olha outro ai.........
no caso é só o select, que ficou mais de 3 horas e não retornou resultado nenhum....
Link para o comentário
Compartilhar em outros sites
4 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.