QUEBRAR PAGINA - VRX

USUARIO.EXCLUIDOS 23/04/2007 17:34:58
#213422
Olá Caros Amigos;

Estou com um problema, em gerar um relatório específico no Visual Report-X:

Por exemplo, eu tenho 3 registros: (2 iguais e 1 diferente)
[txt-color=#ff0000]0001 - 01/02 - 20,00[/txt-color]
[txt-color=#ff0000]0001 - 02/02 - 20,00[/txt-color]

[txt-color=#3333ff]0002 - 01/01 - 50,00[/txt-color]

Fiz a seguinte função:

Private Sub Relatorio_ValidarRegistro(Invalido As Boolean, Cancelar As Boolean)
  If Not nro_saida = 0 Then
    If nro_saida <> rsContas_Receber!nro_saida Then
      tot.RepetirSecao = True
      det.QuebraDepois = True
      '
    End If
  End If
  '
  nro_saida = rsContas_Receber!nro_saida
End Sub


Com isso, ele está saindo os 2 na primeira página e o outro na segunda, mais ele naum está repetindo as outras seções EXCETO a seção "Cabeçalho", além disso, a seção "Total Geral" sai em outra separada, totalizando 3 páginas.

Agradeço desde já.

A. Terlone
WHELLNET 24/04/2007 09:36:45
#213507 Resposta escolhida
Eu defino uma variavel pra armazenar o grupo e depois valo ValidarRegistro adiciono o seguinte código

If Gr = "" Then
   Gr = Mid(Rs!Class, 1, 1)
ElseIf Gr <> Mid(Rs!Class, 1, 1) Then
   sec_detalhe.QuebraAntes = True
   Gr = Mid(Rs!Class, 1, 1)
Else
   sec_detalhe.QuebraAntes = False
   sec_detalhe.QuebraDepois = False
End If
Tópico encerrado , respostas não são mais permitidas
Voltar