ram_bh Posted January 19, 2007 Report Share Posted January 19, 2007 Colegas do forum, Tenho um relatório simples. Preciso listar registros agrupados por um campo, mas não quero repetir o nome deste campo nas demais linhas, somente na primeira linha. Estou usando REPORT. ... REPORT oRel_Tip TITLE "Lista ..." CENTER PREVIEW COLUMN TITLE "Ori" DATA Tab_Tip->Cod_Ori COLUMN TITLE "Tp" DATA Tab_Tip->Cod_Tip COLUMN TITLE "Descricao" DATA Tab_Tip->Des_Tip GROUP ON Tab_Tip->Cod_Ori ; FOOTER "("+LTrim(Str(oRel_Tip:aGroups[1]:nCounter))+")" END REPORT oRel_Tip:CellView() ACTIVATE REPORT oRel_Tip ... Desta forma, o relatório fica assim: --------------------------- Ori Tp Descricao 001 01 Teste 001 02 Outro teste 001 03 Mais outro (3) 002 01 Teste 002 03 Mais outro (2) --------------------------- Não quero a repetição do campo Ori 001 nas linhas 2 e 3, somente quando for mudar para 002. Como fazer? Obrigado! Rodrigo Melo FW24 / Clip53 Quote Link to comment Share on other sites More sharing options...
ram_bh Posted January 19, 2007 Author Report Share Posted January 19, 2007 Colegas do forum, Tenho um relatório simples. Preciso listar registros agrupados por um campo, mas não quero repetir o nome deste campo nas demais linhas, somente na primeira linha. Estou usando REPORT. ... REPORT oRel_Tip TITLE "Lista ..." CENTER PREVIEW COLUMN TITLE "Ori" DATA Tab_Tip->Cod_Ori COLUMN TITLE "Tp" DATA Tab_Tip->Cod_Tip COLUMN TITLE "Descricao" DATA Tab_Tip->Des_Tip GROUP ON Tab_Tip->Cod_Ori ; FOOTER "("+LTrim(Str(oRel_Tip:aGroups[1]:nCounter))+")" END REPORT oRel_Tip:CellView() ACTIVATE REPORT oRel_Tip ... Desta forma, o relatório fica assim: --------------------------- Ori Tp Descricao 001 01 Teste 001 02 Outro teste 001 03 Mais outro (3) 002 01 Teste 002 03 Mais outro (2) --------------------------- Não quero a repetição do campo Ori 001 nas linhas 2 e 3, somente quando for mudar para 002. Como fazer? Obrigado! Rodrigo Melo FW24 / Clip53 Quote Link to comment Share on other sites More sharing options...
ecmsoft Posted January 19, 2007 Report Share Posted January 19, 2007 Olá, 1)Retire esta linha:COLUMN TITLE "Ori" DATA Tab_Tip->Cod_Ori 2) Acrescente : HEADER tab_tip->cod_orig em GROUP. Fica assim: GROUP ON Tab_Tip->Cod_Ori HEADER tab_tip->cod_orig ; FOOTER "("+LTrim(Str(oRel_Tip:aGroups[1]:nCounter))+")" ECM SISTEMAS Marciano Queiroz Teixeira de Freitas-Ba ecmsoft.tx@ig.com.br FW 2.6 + xHarbour 0.99.4 | FW2.7 + xHarbour 0.99.51 | MySQL (SQLLIB) Quote Link to comment Share on other sites More sharing options...
carlos_rosa Posted January 20, 2007 Report Share Posted January 20, 2007 Rodrigão Boa Noite.. Olha eu estou tentando usar o Report tb mais esta dando erro no PREVIEW peguei um exemplo simples que esta no fivewin REP01.PRG mais ele deve usar uma DLl chamada PREVIEW e como faço pra compilar ela no xMATE. Ela deve ser compilada junto não é? Vc pode me ajudar? Carlos ROsa Fivewin 2.7\xHarbour\WS\xMED Quote Link to comment Share on other sites More sharing options...
aferra Posted January 22, 2007 Report Share Posted January 22, 2007 Carlos, vc deve colocar preview.dll que está no diretorio fw?\dll ou se for 32bits deve ser a prev32.dll, junto ao seu projeto... Alessandro F. Silvaid=blue> E-mail :aferracini@terra.com.br FW2.0d + CL53b + Blinker 7.0 + @Say + CDX MSN: ferracini_silva@hotmail.com Ribeirão Preto/SP Quote Link to comment Share on other sites More sharing options...
ram_bh Posted January 22, 2007 Author Report Share Posted January 22, 2007 Marciano, Obrigado pela ajuda. Da forma como mencionou, o total do primeiro grupo listado fica na mesma celula do tÃtulo do próxima grupo. Saberia como resolver isso? Rodrigo Melo Belo Horizonte / MG FW24 / Clip53 / B70 / WS / DBF (por enquanto) Quote Link to comment Share on other sites More sharing options...
ecmsoft Posted January 24, 2007 Report Share Posted January 24, 2007 Coloque: 1) ACTIVATE REPORT oRel_Tip ON STARTGROUP oRel_Tip:NewLine() 2) Vc pode usar fontes diferentes para os group's para que eles fique em destaque. ECM SISTEMAS Marciano Queiroz Teixeira de Freitas-Ba ecmsoft.tx@ig.com.br FW 2.6 + xHarbour 0.99.4 | FW2.7 + xHarbour 0.99.51 | MySQL (SQLLIB) Quote Link to comment Share on other sites More sharing options...
sig_gilberto Posted April 15, 2009 Report Share Posted April 15, 2009 Olá Desenvolvedores Estou com problemas com o REPORT. Para a impressora, ele dispara e imprime, mas para preview ele não exibe nada... Na verdade eu acho que ele até exibe mas é tão rápido e logo dá o return nil... O que posso fazer para visualizar este simples relatorio no vÃdeo ? Procedure Gera_Rel Static oReport Select Entrada2 Go top Report oReport Caption "RELAÇÃO DE CDA´s" TITLE wCli HEADER wRot FOOTER "xxx" PREVIEW Column Title "Processo nº" DATA Entrada2->NumProces Column Title "Nome" DATA Entrada2->Nome EndReport oReport:CellView() Activate Report oReport Return Nil ________________________ Gilberto Herminio Programador Pleno III Mogi das Cruzes-SP JAVA + xHB build 0.99.4 (SimpLex) & BCC 5.5.1 & FW 2.5 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...." Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted April 15, 2009 Report Share Posted April 15, 2009 Gilberto, Tente assim; REPORT oReport TITLE "Ordem Alfabética - Modelo 1 Reduzida" ; HEADER "Relação de Empregados", ; "&eempresa", ; "" LEFT ; FOOTER "Data de Emissao: "+dtoc(date()) CENTER ; PREVIEW COLUMN TITLE "CONTA" DATA Pessoal->Conta COLUMN TITLE "NOME" DATA Pessoal->Nome COLUMN TITLE "SALARIO" DATA Pessoal->Contratual TOTAL END REPORT ACTIVATE REPORT oReport CLOSE Pessoal RETURN NIL id=code>id=code>Abraços.. Luiz Arruda - Corumba(MS) FiveWin 9.01 / 9.02 /9.03 [x]Harbour xDev WS Não Abandone Seu Tópicoid=red> Quote Link to comment Share on other sites More sharing options...
sig_gilberto Posted April 15, 2009 Report Share Posted April 15, 2009 Ico..obrigado, mas simplesmente não exibe o relatorio... Coloquei todas as DLL na mesma pasta e nada.... O mais engraçado é que não dá erro.. Agora, aproveitando..pra que serve esta instrução oReport:CellView() ? #include "Fivewin.ch" #Include "Directry.ch" #Include "Report.ch" sTATIC OREPORT fUNCTION Gera_Rel() USE DADOS Go top REPORT oReport TITLE "Ordem Alfabética - Modelo 1 Reduzida" ; HEADER "Relação de Empregados", ; "&eempresa", ; "" LEFT ; FOOTER "Data de Emissao: "+dtoc(date()) CENTER ; PREVIEW COLUMN TITLE "NOME" DATA Dados->Nome COLUMN TITLE "Processo" DATA Dados->NumProces END REPORT ACTIVATE REPORT oReport CLOSE Dados RETURN NIL ________________________ Gilberto Herminio Programador Pleno III Mogi das Cruzes-SP JAVA + xHB build 0.99.4 (SimpLex) & BCC 5.5.1 & FW 2.5 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...." Editado por - sig_gilberto on 15/04/2009 17:53:57 Quote Link to comment Share on other sites More sharing options...
Rikardocv Posted April 16, 2009 Report Share Posted April 16, 2009 Gilberto : Que versão de FW usa? Isso e um problema dos metafiles... reiniciando a pc suponhe-se que deverias conseguir ver os relatorios. []'s **Não ha que dar peixe, ha que ensinar a pescar Fivewin for (x)Harbour 9.01, xHarbour 1.1.0 (Simplex), Pelles C for Windows 3.00.4 Quote Link to comment Share on other sites More sharing options...
sig_gilberto Posted April 16, 2009 Report Share Posted April 16, 2009 Não exibe o relatório e nem dá erro...simplesmente NADA!!! Ainda, para que serve esta linha oReport:CellView()? Minha Versão : xHB build 0.99.4 (SimpLex) & BCC 5.5.1 & FW 2.5 #include "Fivewin.ch" #Include "Directry.ch" #Include "Report.ch" Static oReport fUNCTION Gera_Rel() USE DADOS Go top REPORT oReport TITLE "TESTE" HEADER "TESTE" FOOTER "TESTE" PREVIEW COLUMN TITLE "NOME" DATA Dados->Nome COLUMN TITLE "SALARIO" DATA Dados->NumProces END REPORT oReport:CellView() ACTIVATE REPORT oReport CLOSE Dados RETURN NIL ________________________ Gilberto Herminio Programador Pleno III Mogi das Cruzes-SP JAVA + xHB build 0.99.4 (SimpLex) & BCC 5.5.1 & FW 2.5 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...." Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted April 16, 2009 Report Share Posted April 16, 2009 Não sou bom p/ explicar mas vou tenrar oReport:CellView(), serve para criar o relatorio dentro de uma tabela tipo assim; se vc. retirar o oReport:CellView() seu relatorio vai sair apenas com os dados, se vc. inserir vai ser criado uma moldura em volta do seu relatorio como se fosse a tabela do Word. Uma pergunta, se vc. usar a Printer o Preview é mostrado ?? ou em outros relatorios funcionam ?? se não funciona tem alguma coisa errada ou com o seu rPreview ou com o Prev32.dll, tente troca-los e veja se resolve.. qq coisa te mando o prev32.dll que eu uso. Abraços.. Luiz Arruda - Corumba(MS) FiveWin 9.01 / 9.02 /9.03 [x]Harbour xDev WS Não Abandone Seu Tópicoid=red> Luiz Arruda - Corumba(MS) FiveWin 9.01 / 9.02 /9.03 [x]Harbour xDev WS Não Abandone Seu Tópicoid=red> Editado por - ico on 16/04/2009 10:49:40 Quote Link to comment Share on other sites More sharing options...
sig_gilberto Posted April 16, 2009 Report Share Posted April 16, 2009 Ainda não funciona nada, nem com TO PRINTER. A impressão que dá é que a rotina não é acionada/chamada. O xDev até cria o executável, mas ele não é disparado.... Caso possa, quero sim a(s) DLL(´s).... em gil_haf@ig.com.br Agora, outra pergunta...Eu não preciso fazer chamadas de DLL no meu projeto no xDEV né ?!?!?! ________________________ Gilberto Herminio Programador Pleno III Mogi das Cruzes-SP JAVA + xHB build 0.99.4 (SimpLex) & BCC 5.5.1 & FW 2.5 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...." Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted April 16, 2009 Report Share Posted April 16, 2009 citação:Ainda não funciona nada, nem com TO PRINTER. A impressão que dá é que a rotina não é acionada/chamada. O xDev até cria o executável, mas ele não é disparado.... Caso possa, quero sim a(s) DLL(´s).... em gil_haf@ig.com.br Agora, outra pergunta...Eu não preciso fazer chamadas de DLL no meu projeto no xDEV né ?!?!?! ________________________ Gilberto Herminio Programador Pleno III Mogi das Cruzes-SP JAVA + xHB build 0.99.4 (SimpLex) & BCC 5.5.1 & FW 2.5 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...." id=quote>id=quote>Não, não precisa, basta deila-la na mesma pasta do seu sistema junto com seu programa.EXE Vou preparar um DEMO e já te mando junto com a prev32.dll que uso Aguarde Luiz Arruda - Corumba(MS) FiveWin 9.01 / 9.02 /9.03 [x]Harbour xDev WS Não Abandone Seu Tópicoid=red> Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted April 16, 2009 Report Share Posted April 16, 2009 Gilberto.. abra seu e1/2 Abraços.. Luiz Arruda - Corumba(MS) FiveWin 9.01 / 9.02 /9.03 [x]Harbour xDev WS Não Abandone Seu Tópicoid=red> Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.