FORMULA PARA NUMERAR PAGINA CRYSTAL REPORT VB

USUARIO.EXCLUIDOS 24/05/2007 14:52:05
#218115
Fiz um relatório no Crystal Report onde precisa que tenha as páginas numeradas. Por ser um livro vai de 1 a 300, sendo que é impresso diariamente. Precisaria saber se alguém já teve o mesmo problema e poderia me auxliar. No formulário tenho um field chamado {@folhas}.
Tentei usar a seguinte fórmula
Report.ParameterFields.GetItemByName("folhas").AddCurrentValue nextPage
Mas não funcionou muito bem.

USUARIO.EXCLUIDOS 24/05/2007 15:55:28
#218135
Resposta escolhida
Na sua formula no Crystal Report utilizando (Basic Sintax) coloque:

formula = "Página " & totext(PageNumber,0)

ISTO DEVE RESOLVER...
USUARIO.EXCLUIDOS 24/05/2007 17:16:50
#218159
Rapaz não funciona. Eu teria que jogar no formulário, é a conclusão que estou chegando. Por que posso ter 3 páginas, e elas podem começar como pagina 4, 5, 6. O que não estou conseguindo visualizar é como fazer isso. Como eu faria para passar um valor para o campo {@folhas} e somar a PageNumber do Crystal mais esse valor?
USUARIO.EXCLUIDOS 24/05/2007 17:56:50
#218166
MIGUELFAL, se eu entendi bem, então faça o seguinte:

Crie outra formula de nome Valor e depois na formula @Folhas faça a seguinte modificação:

formula = "Página " & totext(PageNumber + @Valor)

Se vc for passar o valor pelo Visual Basic é assim:

dim iValor as integer

iValor=3

nomerpt.Formulas(0) = "Valor = " & iValor
nomerpt.action=1

se for colocar direto no Crystal basta colocar o valor direto na Formula @Valor

Qualquer dúvida poste.


FGSANTOS 24/05/2007 18:22:55
#218173
Tenta isto:

"Página " & replace(cstr(PageNumber), ",00", "") & " de " & replace(cstr(TotalPageCount), ",00", "")

direto numa Formula de nome Página.
USUARIO.EXCLUIDOS 25/05/2007 10:48:25
#218232
Frau,

Tentei fazer o que vc explicou. Mas há algumas diferenças, não sei se é a versão do Crystal. O que estou usando é o 8. No formulário eu tenho o field @folhas. Na fórmula, eu coloquei assim,

totext(PageNumber + @valor)

onde o @valor é um field que foi criado.

Lá no código em VB, qdo faça menção ao report.

Report.FormulaFields.item(9).Text = "1"

Onde 9 é o valor.
Acho que o erro está aí.
Não sei se teria que usar algo como Report.RecordSelectionFormula = "@valor=" & 1
Apesar que tentei, mas não funcionou.

Obrigado

USUARIO.EXCLUIDOS 25/05/2007 12:37:55
#218253
Miguel,
No site oficial do Crytal Reports tem um .PDF (link abaixo) com um monte de links para projetos exemplo em VB6 com CR 8, 8.5 e 9. Pode ser que tenha algum exemplo que resolva o seu problema.

http://support.businessobjects.com/communityCS/TechnicalPapers/apps_rdc.pdf.asp

At,

USUARIO.EXCLUIDOS 25/05/2007 12:38:11
#218254
MIGUELFAL, com havia citado antes
Citação:

Crie outra formula de nome Valor

o @Valor não pode ser um campo do banco (Field). Para resolver crie uma outra formula ex.: @Incremento

no vb ficaria assim:

Report.Formulas(0) = "Incremento=" & iValor

O Crystal que uso tb é o 8.
USUARIO.EXCLUIDOS 28/05/2007 13:48:50
#218502
Frau,

Fiz o que vc orientou. Veja o anexo, esse é um dos problemas que estou me deparando.
Ao fazer um check da fórmula do @Folha, acusa esse erro que está na imagem.

USUARIO.EXCLUIDOS 28/05/2007 14:05:26
#218506
OI MIGUELFAL, pela imagem que vc postou já sei onde está o erro:

Conforme minha primeira postagem
Citação:

utilizando (Basic Sintax) coloque:



Dá uma olhada neste anexo com a correção:
USUARIO.EXCLUIDOS 29/05/2007 10:52:03
#218655
Frau,

Nesse parte:

nomerpt.Formulas(0) = "Valor = " & iValor
nomerpt.action=1

Fórmulas seria um método do report?
O que eu consigo ver no meu código é a seguinte sintaxe:

report.FormulaFields.Item(9).Text = "1"

onde o item(9) corresponde a formula valor.

Obrigado


Página 1 de 2 [13 registro(s)]
Tópico encerrado , respostas não são mais permitidas