Nahim

Valeu Pessoal Mas deu certo não vou posta aqui a select que tenho e agradeço mesmo assim pela ajuda select a.numchamado,a.codcli,c.cliente,a.data,a.tipo,a.usuario,dbms_lob.substr( a.obs, 4000, 1 ), a.notafiscal,a.filial, e.usuariobd,a.classe, a.datafechamento,a.usuariof,t.numocor from jnchamado a,pcclient c,pcempr e,jnocorrencia t where a.codcli=c.codcli and a.numchamado=t.codigo and a.numchamado=s.numchamado and a.codusuarioabe=e.matricula order by a.numchamado Tabelas: jnchamado (Chamado) Cabeçario jnchamdosi (Itens das notas do Chamado) Detali 01 jnocorrencia (Ocorrencias dos chamados) Sub Detali 02 e isso ai se alguém sobre fazer esse relatorio ai em Quick Report Agradeço muito Imprimindo assim Cabeçario chamado Itens do chamado (pode ser ate 10 itens - Apos imprimir todos começa o segundo detali) Ocorrencias (Pode ter muitas ocorrencias) Ai começa tudo de novo Abraços e mais uma vez muito obrigado

Valeu jhonas; Mas deu certo não cara. realmente ele imprimi um detale e um subdetale um detale e um subdetale e o que eu queria seria Cabeçario detale detale detale subdetale subdetale subdetale Vou pesquizar la mas vaeu de mais

Jhonas; Realmente em cada select (query) eu tenho um campo em comum o Numchamado. gostaria que o cabeçario imprimisse a cada novo chamado mesmo sendo na mesma pagina pode ter ate 4 chamados impressos. com o cabeçario assim teria que ficar page 01 Chamado:1 Cliente: Pedro Bolonh (Page Header) Chamado:1 Ocorrencia:2 Descrição:Reclamou que o produto esta errado Chamado:1 Ocorrencia:3 Descrição:quer uma devolução (Detale) Chamado:1 Codigo Produto: 34 Descrição:Piso Quantidade: 4 Cx Chamado:1 Codigo Produto: 35 Descrição:Cimento Quantidade: 20 Sc (subdetale) ------------- page 01 Chamado:2 Cliente: Jose Almeida (Page Header) Chamado:2 Ocorrencia:1 Descrição:elogio a entrega Chamado:2 Ocorrencia:2 Descrição:quer cretido (Detale) Chamado:2 Codigo Produto: 21 Descrição:Tinta suvinil Quantidade: 4 Lt Chamado:2 Codigo Produto: 22 Descrição:Cimento Quantidade: 20 Sc (subdetale) -------------- page 01 Chamado:3 Cliente: João Silvia (Page Header) Chamado:3 Ocorrencia:1 Descrição:Reclamou que o produto esta errado e danificado Chamado:3 Ocorrencia:2 Descrição:quer uma devolução parcial (Detale) Chamado:3 Codigo Produto: 44 Descrição:Piso Quantidade: 2 Cx Chamado:3 Codigo Produto: 41 Descrição:Argamassa Quantidade: 2 Sc (subdetale) e ta ficando assim: page 01 Chamado:1 Cliente: Pedro Bolonh (Page Header) Chamado:1 Ocorrencia:2 Descrição:Reclamou que o produto esta errado Chamado:1 Ocorrencia:3 Descrição:quer uma devolução (Detale) Chamado:1 Codigo Produto: 34 Descrição:Piso Quantidade: 4 Cx Chamado:1 Codigo Produto: 35 Descrição:Cimento Quantidade: 20 Sc (subdetale) ------------- page 01 Chamado:2 Cliente: Jose Almeida (Page Header) Chamado:2 Ocorrencia:1 Descrição:elogio a entrega Chamado:2 Codigo Produto: 21 Descrição:Tinta suvinil Quantidade: 4 Lt Chamado:2 Ocorrencia:1 Descrição:quer cretido (Detale) Chamado:2 Codigo Produto: 22 Descrição:Cimento Quantidade: 20 Sc (subdetale) Chamado:2 Ocorrencia:2 Descrição:elogio a entrega Chamado:2 Codigo Produto: 21 Descrição:Tinta suvinil Quantidade: 4 Lt Chamado:2 Ocorrencia:2 Descrição:quer cretido (Detale) Chamado:2 Codigo Produto: 22 Descrição:Cimento Quantidade: 20 Sc (subdetale) -------------- page 01 Chamado:3 Cliente: João Silvia (Page Header) Chamado:3 Ocorrencia:1 Descrição:Reclamou que o produto esta errado e danificado Chamado:3 Codigo Produto: 44 Descrição:Piso Quantidade: 2 Cx Chamado:3 Ocorrencia:1 Descrição:quer uma devolução parcial (Detale) Chamado:3 Codigo Produto: 41 Descrição:Argamassa Quantidade: 2 Sc (subdetale) Chamado:3 Ocorrencia:2 Descrição:Reclamou que o produto esta errado e danificado Chamado:3 Codigo Produto: 44 Descrição:Piso Quantidade: 2 Cx Chamado:3 Ocorrencia:2 Descrição:quer uma devolução parcial (Detale) Chamado:3 Codigo Produto: 41 Descrição:Argamassa Quantidade: 2 Sc (subdetale)

Amigos Socorro. Estou com o seqinte problema: Tenho 3 Qyerys e um dataset cada uma com seus respectivos selects. query1 Numchamdo,cliente,data query2 numchamdo,ocorrencia,descrição,data query3 numchamdo,codigo produto, quantidade preciso realizar o seguinte relatorio cabeçario: query1 subdetalhe1:query2 subdetalhe2:query3 Exemplo: Chamado:1 Cliente: Pedro Bolonha Chamado:1 Ocorrencia:1 Descrição:não retirou o Item1 Chamado:1 Ocorrencia:2 Descrição:Reclamou que o produto esta errado Chamado:1 Ocorrencia:3 Descrição:quer uma devolução Chamado:1 Codigo Produto: 33 Descrição:Arrme Quantidade: 1000 Mt Chamado:1 Codigo Produto: 34 Descrição:Piso Quantidade: 4 Cx Chamado:1 Codigo Produto: 35 Descrição:Cimento Quantidade: 20 Sc ------------------------------------------------------------------------------------------- Chamado:2 Cliente: Pedro Bolonha Chamado:2 Ocorrencia:1 Descrição:alegou erro na venda Chamado:2 Ocorrencia:2 Descrição:Mal Atendido pelo vendedor X Chamado:2 Ocorrencia:3 Descrição:Realizou uma nova troca de produtos Chamado:2 Codigo Produto: 33 Descrição:Cabo de Aço Quantidade: 1000 Mt Chamado:2 Codigo Produto: 34 Descrição:Tinta Suvinil Quantidade: 4 Gl ---------------------------------------------------------------------------------------------- . . . o maior problema e na hora que 1 chamado pode ter varias ocorrencias como tambem vairos itens já a tabela de itens e ocorrencias não a ligação. as duas são detalhes da tabela de chamdos já tentei de tudo aqui . Por Favor to usando o Quick Report e estou desesperado

Grande amigo; Passei pelo mesmo erro e o sequinte os inicializar a aplicação o delphi vai na propriedade do evento onCreate do seu relatorio ou form aonde esta o relatorio feito pelo Qreport e execulta a consulta. oque esta acontecendo ele realiza a pesquiza mas nâo encontra o valor da variavel CPF assim acretido que a diga assima venha resolver caso não resolva atribua um valor inicial pra essa variavel ao execultar a select no relatorio assim tenho certez que vai resolver abraços

Pessoal bom dia; Primeiramente gostaria de parabenizar pelo componente e incrivel pelo que já li e pode observar aqui sou iniciante no VDO e já tenho um sistema com relatorios em QReport so que preciso dele em Matricial. seque um pedacinho do fonte e c alguém poder me ajudar o sistema e em delphi 7 com Banco Oracle e ligação e via BDE assim ultilizo o componete Query olha o codigo abaixo With F_CRecCliente2.Query1 do // query 1 geradora do relatorio Begin Close; Sql.Clear; Sql.Add('Select distinct NUMNOTA,NUMBAL,CODFILIAL'); // campos da tabela que deve ser impressos Sql.Add('from jnmovhist'); // tabela aonde eu busco as informações Sql.Add('where numbal=:numerodobal'); Params[0].Text:=form1.Edit1.Text; Open; end; // isso já funciona no QReport agora preciso disso em VDO abraços isso ai e pra gerar as informações que preciso no relatorio do QReport agora preciso dessas mesmas informações em Matricial. alguém poderia me ajudar? Agradeço deste já.

Tenho um sistema que realiza varias alterações em uma tabela Mas no meio da alteração ele da esse erro 10252 : $280C : Exclusive access was lost. alguém já viu e como c ele tivese perdido a conecxão meu banco de dados e Oracle e a aplicação e em delphi 7 Obrigado Aceito qualque susgestão. Abraços e deste já Muito Obrigado

Micheu; --> C e o cara irmão tem amanha total te devo uma campeão usei o lookup. E ficou muito bom. Aqui precisando pode contar comigo. C passar por Mariana - MG me manda um e-mail Abraços. José Nahim Safadi Junior.

Caras vou testar aqui mas muito obrigado mesmo Ai essa ai e fina By Nahim Muito Obrigado mesmo.

Amigos novamente venho recorre a voces. Estou com o sequinte problema. rea lizo a sequinte SQL Clear; Sql.Clear Sql.add('Select produto,decricao,preço,unidade , sum(sugestadecompra) from produto'); Sql.add('Where produto=:codigo'); Sql.add('and Sum(sugestaodecompra)>1'); Sql.add('Group By produto,decricao,preço,unidade'); Sql.add('Order By produto,decricao,preço,unidade'); Params[0].Asinteger:=X Open; Isso ai. e o sequinte a query e bem maior mas e basicamente isso ai O meu proble e e passar na clausura WHERE um campo calculado com SUM e filtrar por ele alguém já fez algo parecido?

Resolvi com o IncDay do delphi deu certo valeu Abraços

Amigos; Tenho uma aplicação em Delphi6 com base Oracle 10g Meu problema e simples. Preciso retornar uma data anterior a data do dia apos passar o numero de dias pra retroagir o mesmo. Exemplo: Data 17/06/2008 (Sysdate) Dias 90 D (Dias pra retroagir a Data) Data 20/03/2008 (Data Calculada resutado) Simples ne? alguém já realizou ou tem alguma funcao ou algo do tipo. Agradço deste já Muito Obrigado