qreport

[CristianoMedeiros 0]

olá estou mandando imprimir uma venda, mas de 2 itens que tem no dbgriditens, só ta aparecendo o 1º item e não me dá o total da venda( só aparece 0). só me dá o total do iten que está mostrando.as tabelas foram feitas no paradox. a tabela itens só tem chaves estrangeiras da tabela venda(cod) e produtos(cod).no formulário venda, tá tudo func ok. mostrando os itens, total dos itens, tudo ok. o que posso está fazendo errado?

[marcio.theis 3]

Se esta usando uma impressora de cupom fiscal para imprimir, precisa utlizar a DLL da impressora, passando os parametros necessários para a impressão, visto que ela vai controlar o n° do cupom, valores transitados durante o dia, etc...

[CristianoMedeiros 0]

Sr. Marcio,estou testando dentro do previewmodal no quick report em uma impressora jato de tinta, e já me exibe assim faltando um iten, me da o valor total do iten que está sendo exibido, e na band sumary o total da venda fica 0.

[marcio.theis 3]

Então no caso não seria uma impressão de cupom fiscal, você esta colocando dentro de um detail a exiição dos campos ?Teria como colocar os componentes que constituem o QuickReport ? E esta ligado o DataSet do relatório com a qry, ou tbl proveniente ?

[CristianoMedeiros 0]

estou usando o componente qrdbtext com os campos na band detail:codproduto - dataset tableitensvenda descricao - dataset tableprodutosvalorunitario - dataset tableitensvendaquantidade - dataset tableitensvendaqrlabeltotal -object QRExpr1: Expression = 'tableitens_venda.quant*tableitens_venda.valorunitario'na band sumary:qrlabeltotalvendaobject QRExpr2: Expression = 'SUM(tableitens_venda.quant*tableitens_venda.valorunitario)'só me exibe um iten,se tiver outro não exibe e só me dá o total certo do iten exibido, porém não me dá a soma total da venda(só o valor 0) desde já obrigado pela atenção!!!

[CristianoMedeiros 0]

Sr marcioo código que estou usando no botão de imprimir é o seguinte: procedure TFrmCadVenda.SpdBtnImprimirClick(Sender: TObject);var cod_venda:integer; texto:string;begin application.createform(tfrmimprimecupom, frmimprimecupom); if (FrmCadVenda<>NIL ) and (FrmCadVenda.TableVendaCOD_VENDA.asinteger >0) then cod_venda:=FrmCadVenda.TableVendaCOD_VENDA.asinteger else begin texto:=''; if inputquery('Digite o Código da Venda','Impressão de Cupom', texto) then begin try cod_venda:=strtoint ( texto ); except showmessage('Código Inválido!'); //libera o formulário do relatório frmimprimecupom.close; exit; end; end else begin frmimprimecupom.close; exit; end; end; if not frmimprimecupom.TableVenda.locate('Cod_venda',cod_venda,[locaseinsensitive,lopartialkey]) then begin showmessage('Código não encontrado!'); //libera o formulário do relatório frmimprimecupom.close; exit; end; frmimprimecupom.QuickRepimprimecupom.PreviewModal; frmimprimecupom.free;end;

[CristianoMedeiros 0]

Obrigado pessoal!!!consegui resolvernão havia conectado o componente qrexpr que calcula o valor do iten a tabela itensvendana coluna events - master - datasetobrigado!!!

[marcio.theis 3]

opa... coisa boa que conseguiu achar... http://forum.imasters.com.br/public/style_emoticons/default/clap.gif