Tenho uma tabela Alunos com
- IdAluno (AutoNum)
- Matricula - Numérico
- Nome - String
-
-

e outra tabela Parcelas com
- IdParcela (AutoNum)
- IdAluno - Numérico
- DataVencimento - Date
- Pago - Boolean (Inicial = False)
-
-
com um registro para cada parcela, gravado no momento da matrícula do aluno.

As tabelas estão vinculadas pelo campo IdAluno.

Gostaria de imprimir, em um relatório:

Matrícula Nome 01 02 03 04 05 06 07 08 09 10 11 12
123 JOSÉ DA SILVA X X X X X


Onde o "X" indica se a parcela com aquele número foi paga.


Alguem pode me ajudar?

Acabei criando uma solução meio Mandrake, mas que funcionou.

Criei um relatório agupando e classificando por nome, criei caixas de seleção numeradas Cx01, Cx02,...,Cx12 no cabeçalho de grupo.

No Detalhe, coloquei o número da parcela e o campo pago.

Deixei o detalhe invisível.

No evento AoFormatar do detalhe, coloquei o código:

Private Sub Detalhe_Format(Cancel As Integer, FormatCount As Integer)
If Parcela = 1 Then Cx01 = Pago
If Parcela = 2 Then cx02 = Pago
If Parcela = 3 Then Cx03 = Pago
If Parcela = 4 Then cx04 = Pago
If Parcela = 5 Then cx05 = Pago
If Parcela = 6 Then cx06 = Pago
If Parcela = 7 Then cx07 = Pago
If Parcela = 8 Then cx08 = Pago
If Parcela = 9 Then cx09 = Pago
If Parcela = 10 Then cx10 = Pago
If Parcela = 11 Then cx11 = Pago
If Parcela = 12 Then cx12 = Pago
End Sub

Será que alguém tem uma solução um pouco mais elegante?