Tatiane.InterArt

Bem, vamos la, Denis em relação a orçamento você esta certo, é isso mesmo, posso ter mais de um orçto por cliente, e em cada orçto há mais de um pagamento, exemplo: Orçamento n°:01 Cliente: Maria Pagamento: 01/05/08 R$30,00, 01/06/08 R$30,00 e 01/07/08 R$30,00 sendo que o pagamento de 01/05/08 foi feito em dinheiro e à vista e não aparecerá neste caso pois só saem os pagamentos pendentes. Orçamento n°:05 Cliente: Maria Pagamento: 15/04/08 R$25,00, 15/05/08 R$25,00 e 15/06/08 R$25,00 Preciso que por exemplo neste caso, filtrar apenas a cliente Maria e o que tem pendente dentro do período: 01/05/08 a 31/05/08, obtendo assim o resultado: Cliente: Maria Orçamento: 01 Pagamento: 01/05/08 R$30,00 Cliente: Maria Orçamento: 05 Pagamento: 15/05/08 R$25,00 Espero ter sido mais clara agora, e já respondendo ao colega robinhocne, não tenho na tabela pagamento qualquer informação relativa ao cliente, apenas o numero do orçamento.

Tenho três tabelas que formam minha venda: Tabela 1 Orcto Numero - Integer DataOrcto - Varchar CodCli - Varchar Cliente - Varchar Tabela 2 PagtoOrcto Codigo - Integer NumOrcto - Integer Data - Varchar Valor - Varchar TipoPagto - Varchar Tabela 3 ItemOrcto Codigo - Integer NumOrc - Integer Item - Varchar Medida - Varchar Qtde - Integer Preciso realizar uma pesquisa de Pagamentos Pendentes por Cliente e por Período, ou seja, preciso casar as informações da tabela 2 e tabela 1 e ainda mostrar os itens referente(Os Itens é fácil, mas os pendentes é q está me dando trabalho: Revendo a questão, para cada Venda vários pagamentos, 1xn tenho q filtrar a tabela pagamento por período, porém relacionadas a apenas um cliente, sendo q a informação do cliente está na tabela de Orçamento, tentei de várias formas e não consegui obter o resultado que preciso, lembrando que, tenho já montada a pesquisa por período que funciona perfeitamente, apenas preciso de uma ajuda para casar as duas informações. Agradeço Antecipadamente!

e é exatamente por isso que quero, pois a cada pedido é uma arte final que será impressa! valeu mesmo cara funcionou direitinho!

Tenho um relatório que é referente ao meu Pedido de Serviço, trabalho em uma empresa de impressão digital, gostaria de saber se há alguma forma de na tela que gero o relatório colocar um botão onde possa abrir temporariamente uma imagem JPG, tipo a telinha de abrir do windows mesmo sabe, onde possa carregar essa imagem para meu relatório em um QRImage e descartá-la logo após fechar a tela? Agradeço desde já!

Kiko estou tendo o mesmo problema, só que no momento de imprimir, gera o relatório normalmente e as vezes na hora de imprimir dá esse erro Win32 Error 1400, notei, que se fechar o relatório e gerar novamente o erro não persiste, quando ele resolve aparecer é claro, caso você consiga resolver, poste aí, confesso até hj não consegui definir porque isso acontece!

Bem dizem q a insistência vence sempre no meu caso venceu... deu certo consegui migrar e já testei em rede e é bem melhor e mais fácil de se usar que o InterBase, adotei o Firebird... Valeu as dicas recebidas em outros posts para migrar o banco, só não havia feito de cara pois precisava aprender um pouco mais sobre Firebird e como ele funciona, Valeu mesmo Galera!

Depois de tanto mexer e pesquisar, consegui finalmente gerar o backup do banco InterBase ou seja o .GBK, deixei o IBExpert para funcionar com o Firebird graças a um post do Micheus que encontrei algo que me ajudasse, agora não consigo restaurar esse .GBK através do IBExpert, dei uma olhada na net e vi algumas formas de restauração usando o gbak mas não deu certo, alguém poderia me dizer como posso fazer isso?

Ahnnnn com esse seu exemplo: function NewMinutesBetween(aNow, aThen :TDateTime) :Int64; var MinDiff :Extended; begin MinDiff := (aThen -aNow) *24 *60; if (MinDiff -Trunc(MinDiff)) > 0.9999 then MinDiff := Round(MinDiff); Result := Trunc(MinDiff); end; pude compreender melhor a questão da operação com ponto flutuante, fica bem claro e não imaginava que houvesse essa variação, fiz várias pesquisas na internet e achei alguns exemplos antes de postar mas nenhum deles mensionava essa variação, fiz o teste e funcionou, obrigado mais uma vez Micheus!

Confesso que tive que mudar um pouquinho o a pesquisa, no fim das contas ao invés do between tive que usar <= >= para funcionar direitinho, ainda não compreendo por que o between não funcionou de forma alguma! dei uma olhada neste seu exemplo e mesmo usando as linhas idênticas não funciona, deve ser mesmo algo com meu banco ou o delphi vai entender...

Tenho uma telinha de cartão de ponto, onde para cada intervalo faço cálculo de atrazo e extra usando o MinutesBetween, o que está acontecendo é que dependendo do horário q tenho ele não retorna corretamente os minutos, por exemplo: MaskEdit5 - MaskEdit6 18:00 - 18:54 12:00 - 12:54 e outras variações com minutos diferenciados Var Min:Integer; Begin Min:=MinutesBetween(StrToTime(MaskEdit5.Text),StrToTime(MaskEdit6.Text)); Min deveria ser igual a 54 correto mas ele me mostra 53 o que acontece é q essa diferença de 1min já faz uma grande diferença no cálculo de hora extra, como posso resolver isso?

Micheus neste primeiro post apenas me confundi colocando a nova tabela também como Varchar, mas na verdade ela era varchar e recriei como Date - TimesTamp, o que quis dizer sobre o ultimo post foi apenas q tentei fazer a pesquisa de várias formas inclusive passando os parâmetros como String, recaptulando: Minha Tabela Atual: PagtoContaPG Código - Integer Data - TimesTamp Valor - Varchar Tipo - Varchar tentei todos os tipos de pesquisa possíveis e até os impossíveis como até mensionei no ultimo post, tentei até passar os parâmetros como String e nenhuma delas consigo chegar no resultado esperado! esse é o maior problema! Desculpe-me não a falta de clareza nos posts anteriores, mas é q a gente sempre imagina q as pessoas tem a mesma linha de raciocínio q a gente e realmente não notei o erro do primeiro post!

O campo no banco é mesmo tipo Date-TimesTamp, e até tentei passar a pesquisa como varchar pra ver se é isso, mas quando faço a pesquisa assim: IBQuery1.Close; IBQuery1.SQL.Clear; IBQuery1.SQL.Add('select * from PagtoConta where Cast(Data asDate) Between :inicio and :fim'); IBQuery1.Parambyname('inicio').AsString:=FormatDateTime('D/M/YYYY',DateTimePicker1.Date); IBQuery1.Parambyname('fim').AsString:=FormatDateTime('D/M/YYYY',DateTimePicker2.Date); IBQuery1.Open; tentando forçar que o formato dos parâmetros fiquem iguais os das datas q estão no banco acontece q somente me aparece a data: M/D/YYYY 4/4/2008 as demais 4/1/2008 4/2/2008 4/5/2008 q deveriam aparecer não aparecem!

Retornando o problema: pois bem montei a tela de pesquisa com dois DateTimePicker, mudei o format deles para dd/MM/yyyy apenas pra ficar mais bonitinho de se ver, e montei meu botão pesquisar usando parâmetros pras datas como já haviam me dado a dica antes então ficou assim: IBQuery1.Close; IBQuery1.SQL.Clear; IBQuery1.SQL.Add('select * from PagtoConta where Data Between :inicio and :fim'); IBQuery1.Parambyname('inicio').AsDateTime:=DateTimePicker1.Date; IBQuery1.Parambyname('fim').AsDateTime:=DateTimePicker2.Date; IBQuery1.Open; Agora vem o pequeno problema, no banco de dados a data acaba ficando no formato M/D/YYYY mesmo usando o DateTimePicker na tela de inclusão, quando salvo na tabela automaticamente acontece isso, então aí está o problema, quando faço a pesquisa ele interpreta a data como sendo DD/MM/YY no visual, no valor do DateTimePicker como D/M/YYYY e no banco M/D/YYYY, imaginem o q acontece quando realizo a pesquisa... logicamente pensando acontece assim: Datas do Banco 4/1/2008 q seria dia 1 mês 4 ano 2008 e assim por diante 4/2/2008 4/4/2008 4/5/2008 5/1/2008 6/1/2008 7/1/2008 as datas informadas à pesquisa: :Inicio 01/04/08 visualmente e no valor do DateTimePicker 1/4/2008 :Fim 10/04/08 visualmente e no valor do DateTimePicker 10/4/2008 o q ele traz na minha pesquisa? - somente o 4/4/2008 do banco se inverto o formatdateTime para M/D/YYYY acontece assim: :Inicio 01/04/08 invertido mês 1 dia 4 ano 2008 :Fim 10/04/08 invertido mês 10 dia 4 ano 2008 o que ele traz pra minha pesquisa? Tudo se crio variáveis para separar dia mes ano e remontar a data no formato ele não filtra absolutamente nada! então o q me dizem?

Pessoal, resolvido o problema, em questão de estar fazendo um teste esqueci de mudar o nome da tabela em questão, por isso estava dando esses erros, do mais valeu a ajuda Micheus! foi muito proveitosa creia-me!

Não Micheus você me deu a dica se concentrando no problema certo, e como disse já estava fazendo a pesquisa exatamente assim, por parâmetro e mesmo assim não estava funcionando, não sei porque, afinal antes funcionava direitinho! Por isso, resolvi fazer um TESTE, montei outra tabela com a data declarada como TimesTamp afinal trabalho com o dialect3, assim a pesquisa até parece mais fácil e sem a complicação q tem-se com datas e períodos, porém fiquei com outro problema, q é no momento de inserir algo nesta tabela, pois dá erro de compatibilidade, se jogo essa data como string dá erro de IBQuery1:Type mismatch field 'DATA', expecting: DateTime actual: String se jogo gomo TDate direto pelo DateTimePicker dá erro de IBQuery1:Type mismatch field 'DATA', expecting: String actual: DateTime o q fazer? arrumo a pesquisa e pioro o resto rsrsrsrsrsrs!