Report so imprime primeiro registro

[Julio]

Boa tarde pessoal


Fiz um form que filtra o ano que desejo imprimir usando este comandos.

Código:


  x = "2010"
  y = "2010"
    select * from casal_c into cursor Pesquisa where BETWEEN(temporada,x,y)

    SELECT pesquisa
    GO TOP
    report form r_fich_p_1p to printer prompt preview

Quando o relatorio é impresso so imprime o primeiro registro e a tabela contem uns 10 registros ou mais.

No report criei um Field na guia General /Expression: coloquei

pesquisa.data

outro campo

pesquisa.tamanho

Este report é um tipo de formulario que fiz no report, e agora estou utilizando para preencher alguns campos.

Julio

[Marcos Guedes]

Estais disponibilizando para os colegas, ou com alguma dificuldade?

[Julio]

Marcos

É problema mesmo.

Como disse, tenho um report que funcionava como formulario e a pessoa preenchia a mão. Agora quer que seja preenchido pelo sistema.

Então fiz um form e no click do botão deste form, coloquei o codigo citado acima para fazer um filtro por ano. Apos este filtro solicito a impressão, mas so imprime um registro e a tabela tem mais de 10 regsitros, nem sei quantos.

Este campos deve ser impresso na parte do cabeçalho do relatorio.

[alceu11]

Vc fez a selec campo from nomtabela cursor pesquisa

Código:

selec pequisa
go top
if _tally > 0
*****aqui sabera qtos registros serao impressos
wait window _tally time 2

report form nomedoreport preview
else
wait window 'a sua selecao nao resultou informacoes' time 3

endif

veja o detail do report para ver se o seu esta igual
[Você precisa estar registrado e conectado para ver esta imagem.]

[Julio]

Alceu

Neste caso nao tenho que colocar o nome do cursor criado, que no meu caso é PESQUISA, mais o nome do campo que desejo imprimir.

pesquisa.valor

[alceu11]

So fazer o cursor antes de comecar o report
primeiro faca isto
Select campos, form suatabela cursor pesquisa
select pequisa
browse
se carregar no datasession ele estara la

depois comece a fazer o report pois ai tu tera os campos do cursor, conforme a figura
ai e so comecar fazer o report

a outra forma e colocar no metodo load a criacao do cursor
create cursor pesquisa (campos,)

[Você precisa estar registrado e conectado para ver esta imagem.]

[m@r<3|o]

Código:

aa_cond = "temporada >= this.parent.text2.value and temporada <= this.parent.text3.value"

select *;
from casal_c
where &aa_cond ;
into cursor julho

report FORM C:\.....\reports\rpttemporada  noconsole noeject to print preview

Abra um Reporter e coloque os campos em detalhes " abaixo da palavra Detail "
julho.passaro julho.pardal
e salve como rpttemporada
e execute

Obs se voce por emcima do campo Detail vai aparecer 1 mesmo por que la é cabeçalho

o corpo de repeticao voce clica em detalhe arrasta pra baixo .... e ai dentro que voce poem os campos


do jeito que eu fiz , voce deixa a coisa mais aberta, quando precisar alterar colocar mais regras fica mais facil o caminho

[Julio]

Sei Mas este dados devem ser impressos no cabeçalho do relatorio

[m@r<3|o]

entao voce precisar fazer 2 bandas

caso contrario nao existe como
repetir linhas de tabelas , no page header ou 1 linha ou 1 linha

agora sim tera que usar seu create cursor

ou mesmo tem uns lance de agrupamento que dá certo , mais eu nunca consegui
nesse caso mais facil o create cursor com append from


Se essa tabela é no Header .......... ql tabela ira no Detalhes
pretende fazer varios Selects e tacar num relatorio sem unir

nao sei se da certo nao

[m@r<3|o]

vo te mostrar um quebra galho , só que tem limite de caracter
testa no form no command voce faz algo assim

Código:

Select * From CADRECMOV where cadrecmov.rec_cod = cadped.ped_cod ORDER BY rec_parc into cursor TEMP
cVencimentos = ''
Scan
cVencimentos = cVencimentos + DtoC(REC_Venc) + Transform(REC_VLR,'999,999,999.99') + CHR(13)
ENDSCAN

SELECT cVencimentos, * ;
from  cadped, cadpedi, cadclie;
WHERE ped_cod = this.Parent.txtped_cod.Value ; 
AND ped_cod = pedi_cod;
AND clie_cod = ped_clie;
INTO CURSOR cadlista
SELECT cadlista

ai voce cria um campao no reporter chamado cVencimentos
e aparecera la essas informacoes que voce quer ....
mais tem limite ....
isso pra colocar no Page Header
existem diversas gambiarras .... so que voce tem que dar o escopo inteiro do problema

[Julio]

Pessoal

Resolvido.

Seguindo os conselhos aqui postados e dicas, alterei o report retirando o conteudo do cabeçalho passando tudo para banda detail.
Desta forma imprimiu os registros.

Obrigado

julio

[m@r<3|o]

ficamos felizes que voce consegiu

[Julio]

Graças a ajuda de todos vocês aqui do forum.

Estou aprendendo bastante.

abs
julio

[m@r<3|o]

se for possivel nos responda sua idade estou curioso

[Julio]

43