Os dados não aparecem no formulário, uso report builder, quem pode ajudar?

Delphi

18/06/2011

              Pessoal fiz esta query esta beleza, uso o report builder, no formulário coloquei um subreport onde o mesmo tem um dbtext ligado ao nome do aluno outro ligado ao nome do pai e outro ligado ao nome da mãe, mas quando o formulário e exibido não aparece os dados referentes aos dbedts, abaixo segue a query e também como está o código:     select al.codigo_turma,
       al.matricula_aluno,
       t.ano,
       t.grau,
       t.turma,
       a.nome,
       a.pai,
       a.mae from alunoturma al inner join aluno a on al.matricula_aluno = a.matricula
                   inner join turma t on al.codigo_turma = t.codigo where al.matricula_aluno =:aluno
  and al.escola =:escola
group by al.codigo_turma,
       al.matricula_aluno,
       t.ano,
       t.grau,
       t.turma,
       a.nome,
       a.pai,
       a.mae       procedure TFrmRel_Livro_Matricula.Btn_imprime_LivroClick(Sender: TObject);
begin     (* Carregando o cabeçalho do relatório *)
  IBQryEscola.Close;
  IBQryEscola.ParamByName('escola').asstring := sEscola;
  IBQryEscola.Open;   ppLabel35.Caption := IBQryEscolaNOME_ESCOLA.AsString;     //carrega os dados do aluno
  IBQryAluno.Close;
  IBQryAluno.ParamByName('matricula').AsString := DmDados.IBQryAlunoTurmaMATRICULA_ALUNO.AsString;
  IBQryAluno.Open;     IBQryAlunoTurma.Close;
  IBQryAlunoTurma.ParamByName('escola').AsString := DmDados.IBQryAlunoTurmaESCOLA.AsString;
  IBQryAlunoTurma.ParamByName('matricula').AsString := DmDados.IBQryAlunoTurmaMATRICULA_ALUNO.AsString;
  IBQryAlunoTurma.ParamByName('turma').AsString := DmDados.IBQryTurmaCODIGO.AsString;
  IBQryAlunoTurma.Open;     ppReport1.Print;
end; end.
 
Osmar

Osmar

Curtidas 0

Respostas

Wilson Junior

Wilson Junior

18/06/2011

A sua lógica está meio confusa, pois os valores que vc está setando para osParamByName estão meio confusos, verifique estes valores.

Espero ter colaborado.
GOSTEI 0
POSTAR