(Resolvido) Relatório QuickReport

[Vivendo&Aprendendo]

Pessoal preciso fazer um relatório de fornecedores, até ai é fácil, mas existem forncedores tipo pessoa física e pessoa jurídica e agora preciso que seja lista todos eles usando o mesmo campo, tipo campo Nome se for física recebe o nome se for jurídica recebe Fantasia. Ou se caso der para fazer para ele mostrar primeiro todos os que são pessoa física e depois todos os jurídica.

alguém ai sabe como?

Access, Delphi 7.

Abraço

Editado Julho 31, 2008 por Vivendo&Aprendendo

[Guest sllc]

Da para fazer isso usando o evento OnPrint do QRDBText. Lá você pode testar o value do campo, ou seja, você seta a propriedade DataField do campo como TIPO DE PESSOA e depois testa:

if Value = 'F' then

Value := dm.clntdtstCliente.FieldByName('NOME').AsString

else

if Value = 'J' then

Value := dm.clntdtstCliente.FieldByName('FANTASIA').AsString;

e pronto. Acho que isso resolve seu problema, se eu entendi bem.

Espero ter ajudado

Sergio

[Micheus]

Ou se caso der para fazer para ele mostrar primeiro todos os que são pessoa física e depois todos os jurídica.

Vivendo&Aprendendo, esta questão, você determina usando Order By no seu SQL ou ser estiver usando um dataset tipo table, através de um índice que tenha este campo no início.

Da para fazer isso usando o evento OnPrint do QRDBText.

Correto sllc, e nem seria necessário utilizar um TQRDBText - poderia ser um simples TQRLabel, onde o valor do campo (como você sugeriu) seria movido para este label após testar o campo que indica o tipo de pessoa.

Também daria para ser feito usando um TQRExpr, utilizando um if com o campo do tipo de pesso como argumento de validação e para cada opção, o respectivo campo. Algo como: IF(TipoPessoa='F', Nome, Fantasia)

Se interessar, use a dica deste post para saber como usar o wizard da propriedade Expression.

Abraços