flavioavilela

tentei fazer uns teste aqui e fiz por essa forma que você disse deu certo... vou fazer mais alguns testes e volto com a resposta...

cara, não funcionou... usei o qrgroup como você disse, coloquei o Haschild como true e joguei os outros campos das outras 3 tabelas lá dentro e no fim ele agrupou os relatórios pelo codigo da tabela principal como defini no expression do qrgroup, só que os itens de cada registro agrupado apareceu apenas 1 item da tabela 2, 1 item da tabela 3 e 1 item da tabela 4......... no segundo registro apareceu da mesma forma....... onde deveriam aparecer uns 3 itens da tabela 2, uns 4 da tabela 3 e por ai vai saca.......... ah, também tentei colocar o HasChild do qrgroup true ai ele cria um filho, o filho eu coloco HasChild como true também e ai cria outro filho e ai joguei os itens de cada tabela em um filho e também não deu certo...... e agora.......??????? :( :wacko:

bom, não sei porque, mas, se eu colocar o count primeiro que o sum funciona.... fiquei até zuado agora, mas, vou deixar assim, se funcionou blzinha, não vou mexer rsrs.... vlw pela ajuda....

bom dia a todos... estou fazendo um select e juntamente com ele, um outro select dentro do primeiro select para que eu possa somar alguns itens..... eu sei como fazer e funciona blzinha... só que agora, por eu dar a opção pro usuário escolher quais parametros ele quer consultar, preciso colocar os campos dinamico na clausula where... se ele escolher, por exemplo, Numero de Documento, ai fica , se ele escolher Cliente, ai fica ........ se não fosse dinamico eu sei fazer, mas agora, dinamico, não sei fazer..... segue abaixo o exemplo de como estou fazendo.... select LF.*, Forn.Nome_Fantasia as Nome, CP.Descricao, TD.Descricao, D.Descricao, PF.Plano, (select sum(Valor_Documento) from Lancamento_Financeiro LF where :Campo = :Parametro and LF.Tipo = :Tipo and LF.Status = :Status) as valor_doc, (select sum(Desconto) from Lancamento_Financeiro LF where :Campoo = :Parametroo and LF.Tipo = :Tipoo and LF.Status = :Statuss) as desco (select sum(Multa) from Lancamento_Financeiro LF where :Campooo = :Parametrooo and LF.Tipo = :Tipooo and LF.Status = :Statusss) as mult, (select sum(Valor_Cobrado) from Lancamento_Financeiro LF where :Campoooo = :Parametroooo and LF.Tipo = :Tipoooo and LF.Status = :Statussss) as valor_cob from Lancamento_Financeiro LF left join Fornecedor Forn on(LF.Codigo_Cli_For = Forn.Codigo) left join Condicao_Pagamento CP on(LF.Codigo_Forma_Pagamento = CP.Codigo) left join Tipo_Documento TD on(LF.Codigo_Tipo_Documento = TD.Codigo) left join Departamento D on(LF.Codigo_Departamento = D.Codigo) left join Plano_Financeiro PF on(LF.Codigo_Plano = PF.Codigo) estou usando o :Campo, o nome do campo passando logo em seguinda como parametro, mas não da certo, a query volta em branco, se eu colocar o nome do campo mesmo da certo, mas eu preciso que seja dinamico.... e ai, alguém sabe...?????

bom dia a todos... estou tentando fazer um rel no quickreport com 4 tabelas e depois de quase 1 ano consegui dar um pontapé quase final.... mas está acontecendo o seguinte......... estou usando 4 qrsubdetail para cada tabela e consequentemente 4 adoquerys e ligando uma na outra pelo codigo.... só que, no relatório aparece lá por exemplo, 5 registros para ser impresso, eu queria que fosse impresso agrupado, bunitinho saca, o registro 1 com seus dados das 4 tabelas referente ao registro 1, o 2 com seus respectivos dados e assim por diante, mas não, ele imprimi tudo junto os registros em sequencia, sem separar o registro 1, 2, 3 e tal... experimentei colocar um qrgroup e configurar a propriedade expression pro código da tabela principal, quase deu certo, ele fez a quebra dos registros 1, 2, 3 e tal, só que quando chega nas tabelas filhas, ele coloca tudo junto, não separa os registros.......... ai agora, to perdido, alguém pode ajudar??????

boa noite meu lider.. aqui eu rodo o sql server express 2005 numa boa com o windows 7, sem problemas algum...

isso mesmo camarada... você salvou minha pele rsrsrs, iria ter que fazer um monte de mudanças por conta disso... valeu demais...

obrigado camarada, vou testar e já já volto com a resposta....

bom dia a todos.... fiz um select dessa forma: select LF.*, Forn.Nome_Fantasia as Nome, Cli.Nome_Nome_Fantasia as Nome, CP.Descricao as Condicao_Pagamento, TD.Descricao as Tipo_Documento, D.Descricao as Departamento, PF.Plano from Lancamento_Financeiro LF left join Cliente Cli on(LF.Codigo_Cli_For = Cli.Codigo) left join Fornecedor Forn on(LF.Codigo_Cli_For = Forn.Codigo) left join Condicao_Pagamento CP on(LF.Codigo_Forma_Pagamento = CP.Codigo) left join Tipo_Documento TD on(LF.Codigo_Tipo_Documento = TD.Codigo) left join Departamento D on(LF.Codigo_Departamento = D.Codigo) left join Plano_Financeiro PF on(LF.Codigo_Plano = PF.Codigo) ou seja, na tabela Lancamento_Financeiro eu salvei vários Codigos(Codigo_Departamento, Codigo_Cliente) e tal... só que, no campo Codigo_Cli_For, eu salvo ou o código do cliente ou o código do fornecedor, dependendo o que o usuário escolher na hora do lançamento, se é crédito (Cliente) ou débito(fornecedor).... ai, preciso que, ao realizar esse join, se for Crédito (Cliente), preciso fazer o join com a tabela de cliente. Se for Débito (Fornecedor), preciso fazer o join com a tabela Fornecedor..... alguém sabe como fazer isso????? fiz no exemplo acima uma forma bem genérica só para mostrar a minha idéia do que preciso...

isso mesmo... fiz o teste antes de salvar deu certo... vlw e obrigado pela solução...

bom dia todos.... quando eu faço uma consulta usando ADOQuery, ele me traz alguns dados do banco e inclusive uma data, que se o usuário não tiver digitando nada, ele trará a data padrão 30/12/1899 00:00:00... como eu faço para que, na consulta, se a data for isso ai, aparecer em branco pro usuário???? desde já, agradeço a todos

bom, está assim a configuração do VDOPrint: Size: fsCondensed Pitch: fp10cpp NLQFonte: ntSansSerif FonteType: ftDraft e na impressora configurei também como Draft Condensed

boa tarde a todos eu mando imprimir em um formulário pré-impresso tudo beleza, as linhas fica beleza, tudo está funcionando blzinha, mas quando eu mando imprimir em uma linha que tem uma informação lá no final, tipo, no cabeçalho tem o nome da cidade e a data na frente (Jataí, 10/05/2010), a informáção é cortada, e imprimi até só (Jataí, 10/0), ai ele pula pra linha debaixo e continua 5/2010..... isso acontece a aproximadamente 2 cm da margem (direita obvio).... já configurei o papel personalizado aqui e nada... estou usando LX300II+.... desde já, agradeço pela atenção...

bom dia a todos... na minha aplicação, estou usando uma impressão direta usando vdoprint para imprimir em formulário pré-impresso... só que, por exemplo, eu tenho um campo Observações que usa um memo que digito informações e da umas 3, 4 linhas.... como eu faço para imprimir no campo Observações do meu formulário pré-impresso assim como digitei no campo Observações da aplicação, saltando as linhas???? desde já, agradeço a todos...

boa tarde a todos... consegui resolver o problema.... a configuração entrelinhas no componente.... alterei e funcionou....

cara, acho que descobri o problema, só não estou conseguindo resolver rsrs.... quando eu configuro a página personalizada desse papel pré-impresso, ele altera a posição das linhas.... só que, eu messo com a regua certinho, preciso, mas ainda não sai em cima... se eu vou alterando os valores do papel personalizado, ele vai consertando umas linhas e bagunçando outras....... será que eu tenho que configurar também o VDODmPrinter, as propriedades MarginLeft e MarginRight ou outro tipo de configuração????? como fazer isso agora?????? :( :wacko:

bom dia meu lider.... está dando quaaaaase certo.... vou simular aqui o que está acontecendo: Remetente Destinatário ________ ___________ Endereço Endereço _______ ____________ Município Município _______ ____________ CNPJ CNPJ _______ ____________ eu mando imprimir beleza, ele passa pelas linhas do remetente e destinatário beleza, no endereço beleza, ai depois do município já vai ficando ou pouco acima da linha, no CNPJ um pouco mais ainda até chegar um ponto em que uma informação está no lugar da outra saca...... e sempre que eu coloco uma folha pra imprimir sai numa forma, se eu pegar e recolocar ela e mandar imprimir novamente, no mesmo momento em que saiu da impressora, ela já sai ocilando a posição dela novamente saca, nunca vai no mesmo local as linhas......... será porque isso?????? estou usando uma LX300II+....... desde já, agradeço pela sua atenção....

bom dia a todos, estou fazendo uma consulta assim: select CC.*, (select sum(Valor_Final) from Cadastro_Cheque where Codigo_Propriedade = :Propriedadee and Status = :Pendentee and Data_Entrada between :DII and :DFF) as valor_fin, (select sum(Valor) from Cadastro_Cheque where Codigo_Propriedade = :Propriedadeee and Status = :Pendenteee and Data_Entrada between :DIII and :DFFF) as valor_tot, (select count(*) from Cadastro_Cheque where Codigo_Propriedade = :Propriedade and Status = :Pendente and Data_Entrada between :DI and :DF) as qtde from Cadastro_Cheque CC where Codigo_Propriedade = :Propriedadeeee and Status = :Pendenteeee and Data_Entrada between :DIIII and :DFFFF aparentemente funciona, só que ele chama pra mim só os dados num dbgrid e soma somente o Valor_Final, coincidentemente é o primeiro campo a somar... ele não soma o Valor e nem conta...... alguém sabe o porque???

certo... vou testar e já já volto com a resposta... abraço

certo... só estou em dúvida numa coisa... coloquei esse componente e tal... coloquei a fonte como Condensado... só que quando eu coloco essa fonte, antes, para colocar um determinado item em uma linha, eu mandava ele ir pra coluna 20 por exemplo, agora, eu tenho que por 40, 42 pra ir pra mesma linha que antes eu colocava 20... porque isso?????? e outra coisa, não estou conseguindo controlar o espaço entre as linhas... eu coloco uma informação em uma linha e mando ir colocando outras linhas abaixo, ele vai ficando desencaixado, não cai na linha certa.... eu faço assim: Print(85, qDestinatario.FieldByName('Nome_Fantasia').AsString, true); o true indica que estou indo pra linha debaixo né... e caso eu preciso ir pra uma, duas linhas abaixo, eu coloco NewLine(2) ai ele pula duas linhas.... ai esse pular de linhas está dando boró.... outra coisa que fiz: no papel personalizado, coloquei as margens como 0, pois o papel pré-impresso aqui aparentemente não tem margem, só um contorno aqui.... e ai, o que fazer????

tipo, as configurações do componente (VDOPrint) não funciona... altero a fonte, tamanho, margem esqueda e direita e na hora de imprimir não muda nada... e estou usando a courier mesmo....

bom dia a todos... estou fazendo uma impressão direta usando LX300+II com um papel pré-impresso pela porta USB. não estou conseguindo encaixar de forma alguma as informações nos campos corretamente, sempre sai um pouquinho mais acima, um pouquinho mais abaixo, pra esquerda ou pra direita, nunca onde precisa... e já configurei o papel personalizado com as medidas que preciso aqui e tal.... segue exemplo de um código simples: with VDOPrinter1 do begin BeginDoc; if PrinterType = ptCanvas then CanvasSets.Font.Size:= 14 else //DotMatrixSets.Font.Size:= NewLine(2); Print(60, EdtNatureza_Operacao.Text, True); NewLine(2); Print(02, EdtRemetente.Text); Print(39, EdtDestinatario.Text, True); NewLine(4); Print(02, EdtConsignatario.Text, true); NewLine(4); Print(01, EdtCalculado.Text); EndDoc; end; por exemplo, se eu colocar ai 'Print(02, EdtRemetente.Text)', seria pra sair na segunda coluna, mas sai lá pra 10, 12 coluna... Outra coisa: como eu faço pra saber certin qual a coluna que devo colocar para sair a informação naquele determinado lugar??? alguém já fez isso e possa dar um auxilio???? desde já, obrigado a todos...

bom dia a todos... peguei um sisteminha pra fazer e nele preciso imprimir em uma matricial, dados em um papel já pré-impresso, tipo nota fiscal... alguém já fez isso que pode dar umas dicas...???

isso meu lider, era isso mesmo que precisava... fiz usando a opção de string... obrigado pela ajuda vlw

boa noite a todos... eu tenho uma data DDMMAA (060810)... preciso formatar essa data para DD/MM/AAAA (06/08/2010).... o DD e o MM consegui tirar, assim: data:= 060810; d:= copy(data, 1, 2); m:= copy(data, 3, 4); a:= copy(data, 5, 6); ai eu pego: data:= d + '/' + m + '/' + a; só que ai o 'a' vai me retornar só o 10... quero formatar para 2010.... alguém sabe isso??? desde já, agradeço a todos...