wilsonrosa

Pessoal, Antes de mais nada gostaria de agradecer ao fórum, e seus mebros, pois tem sido uma ferramenta excelente e me ajudado batsante. Bom, consegui fazer o relatório agrupado porém, ainda existe um problema. O sistema q estou fazendo é para controlar terceiros q prestam serviços para a empresa em q trabalho. Pois bem, esse sistema tem várias datas que indicam o vencimento de cada item através das mesmas. Um exemplo dos itens são Integração, ASO, que são docs obrigatórios e outro q é a NR33 q nem todos os terceiros precisam só aqueles q trabalham com tal atividade, esses são docs possuem prazos de validade e se estiverem vencidos o terceiro não pode trabalhar nas dependências da empresa. O relatório está saindo agrupado por empresas e seus respectivos terceiros e já com algumas datas, porém eu tenho uma lista de datas, porque existem vários docs, mas nem todas precisam estar no relatório para todos os terceiros, o que estenderia muito o mesmo. Como faço pra apresentar um QRLabel (alías um não e sim vários) em tempo de execução em posições específcas e tb controlando a propriedade height da banda Group e Detail para que quando fosse necessário a criação do QRLabel a mesma se aumentasse e quando não a mesma diminuisse? No aguardo Agradeço WillRos

Olá Jhonas, Olhei os links q você me indicou e funciona perfeitamente. Obrigado WillRos

Obrigado pela resposta Jhonas. Porém, ontem a noite fiz um com a banda detail e subdetail, não sei se é a melhor forma, mas para o momento está ajudando. A única coisa é q só está legal quando seleciono uma empresa por vez, quando tento fazer para várias empresas a mesma se repete de acordo com a quantidade de funcionários q ela possui. Estou montando da seguinte maneira: Coloquei um adoquery e dentro dele uma select e duas bandas no QR, uma detail e outra subdetail e liguei algumas coisas entre elas com o adoquery. Pronto, roda direitinho com uma única empresa. Vou olhar esses links e depois posto novamente os resultados. Obrigado

Pessoal, Preciso fazer um relatório, q acredito ser master/detail, fiz um com duas tabelas e funciona, mas preciso fazer esse relatório acredito eu com query porque são na realidade 4 tabelas, sendo uma com dados das empresas(master) e outra com seus complementos(detail) e tb outra tabela com dados dos funcionários(master) e seus complementos(detail). Estou usando ADO. Bom, na realidade preciso de um relatório com o seguinte formato: +++++ Empresa _________________Dados da Empresa________________ ____Funcionários dessa Empresa__________ _________Dados desse funcionário_____________ ____Funcionários dessa Empresa__________ _________Dados desse funcionário_____________ ____Funcionários dessa Empresa__________ _________Dados desse funcionário_____________ +++++ Empresa _________________Dados da Empresa________________ ____Funcionários dessa Empresa__________ _________Dados desse funcionário_____________ ____Funcionários dessa Empresa__________ _________Dados desse funcionário_____________ ____Funcionários dessa Empresa__________ _________Dados desse funcionário_____________ +++++ Alguém teria alguma idéia de como juntar td isso ? Se precisarem de mais informações por favor me avisem. Agradeço antecipadamente a todos. WillRos

Micheus, Obrigado, funcionou usando esses posts q você indicou. WillRos

Fala Micheus, Era isso mesmo, deixei a select na QuickRepBeforePrint e as condições na banda, assim funciona. Está acontecendo algumas coisas estranhas ainda mas acredito não ser mais em relação ao quick e sim alguma coisa de lógica. Aproveitando, o webbrowser do delphi , tem como abrir um documento do word dentro do mesmo, ou seja sem q ele abra pra isso o word ? Muito Obrigado pelas dicas referente ao quickreport Willros

Micheus, Obrigado pela resposta, porém colocando o código na banda detalhes como você disse, o contador de páginas do preview dispara e não pára mais a não ser q eu aborte o delphi. Eu tenho o desenho (shapes) do crachá e os dados do mesmo na banda detail, alías neste relatório eu só tenho a banda detail. Como poderia resolver esse problema, estou usando a mesma query do primeiro post. No Aguardo Agradeço WillRos

Pessoal, Preciso fazer um relatório com seguinte layout: Cód.___________CNPJ_________Empresa____________Situação (Dados Fixos) 1____________111111111_______Santos S.A.___________Ativa (Dados Variáveis) Dados sobre essa empresa_______________(Dados tb variáveis) Logo abaixo: Cód.___________CNPJ_________Empresa____________Situação 2____________12222222_______Curitiba S.A.___________Ativa Dados sobre essa empresa E assim por diante, mas como colocar o cabeçalho e logo abaixo os dados referentes a respectiva empresa q se apresenta no cabeçalho ? No aguardo de qualquer dica ou idéia Agradeço WillRos

Qual a diferença em fazer : if dmbancos.QCrachadt_nr11.Value > DateTimePicker1.Date then ou if dmbancos.QCrachadt_nr11.Value > StrToDate('01/01/1900') then se o valor dentro do DateTimePicker é 01/01/1900 ? Grato WillRos

Jhonas, Obrigado por responder. Não necessariamente, porque existe um flag no dtpicker q se o mesmo for flegado a data foi modificada para maior q 01/01/1900 e caso não a mesma permanece em 01/01/1900. O problema é q sem estar flegada o sistema sempre executa as linhas caso a condição seja satisfeita. if dmbancos.QCrachadt_nr11.Value > StrToDate('01/01/1900') then begin QRShape2.Visible:= true; QRLabel3.Visible:= true; end else begin QRShape2.Visible:= false; QRLabel3.Visible:= false; end;

Pessoal, Estou fazendo um relatório q imprimirá um crachá para pessoas, com nome, empresa e foto(vide anexo). Ainda neste mesmo crachá, terei 3 tarjas coloridas. Desenhei o relatório no quickreport, e ao acessar via programa com o comando "QRCracha.Preview" os dados estão chegando normalmente, nome, empresa e foto. Porém, não consigo controlar as tarjas para aparecerem de acordo com uma condição de data q estou fazendo, como mostra o código abaixo, ou seja, quando mostro o crachá no preview eu consigo rodar o banco clicando nas setinhas do preview, porém a tarja não muda de acordo com a condição. Faço uma query para coletar os dados (nome, empresa e foto) e só estou demonstrando uma condição para apenas uma tarja. Alguém poderia me ajudar ?? Obrigado WillRos Segue onde coloquei a lógica: Neste caso procedure TQRCarAcesso.QuickRepBeforePrint(Sender: TCustomQuickRep; var PrintReport: Boolean); begin DMBAncos.QCracha.SQL.Clear ; DMBAncos.QCracha.SQL.Add('Select clp.dt_nr11, clp.dt_nr33, clp.dt_nr10, clp.foto, cp.Nome as Pessoa, ce.rSocial as Fantasia'); DMBAncos.QCracha.SQL.Add('from TB_ComplProf as lp, tb_relacionamento as r, TB_CadProf as cp, TB_CadEmp as ce'); DMBAncos.QCracha.SQL.Add('Where r.CPF = clp.CPF and r.CPF = cp.CPF and r.CNPJ = ce.CNPJ'); //Showmessage(DMBAncos.QCracha.SQL.Text ); DMBAncos.QCracha.Open; if dmbancos.QCrachaDT_NR11.Value > StrToDate ('01/01/1900') then begin NR11.Visible := true; QRShape3.Visible := true ; end else begin NR11.Visible := false; QRShape3.Visible := false; end; end;