Bematech - Imprimindo dados do cliente no cupom

Delphi

01/04/2004

Fala pessoal!

Alguém sabe como eu faço para imprimir antes do rodapé do cupom dos dados de um determinado cliente?
Contendo seu Código, CPF/CGC, Nome etc...


Cbritojunior

Cbritojunior

Curtidas 0

Respostas

Marcio.theis

Marcio.theis

01/04/2004

para imprimir antes de fechar o cupom vc deve usar as linhas adicionais que ela fornece.
como exemplo:

#27 + ´|34|´+ ´COD. CLIENTE: ´ + IntToStr(tblCupomNucliente.Value) + 10 +
´NOME CLIENTE: ´ + tblCupomNomeCliente.Value + 10 +
vCpfCgc + 10;


GOSTEI 0
Aroldo Zanela

Aroldo Zanela

01/04/2004

Colega,

O CPF ou CNPJ devem ser passados com argumento na abertura do cupom, exemplo:

iRetorno:= Bematech_FI_AbreCupom( PChar(Cliente));


Onde cliente é uma variável formatada com CPF ou CNPJ.

Os demais dados podem ser enviados como mensagem no encerramento do cupom. Exemplo:

Mensagem:=  PadR(´Nome: ´+Nome,48,´ ´)+ PadR((´End.: ´+Endereco+´ CEP: ´+CEP),48,´ ´)+PadR(´Cidade: ´+Cidade+´ UF: ´+UF,48,´ ´)+             cConvenio+PadR(FORM8.Mensagem,48,´ ´);

iRetorno := Bematech_FI_TerminaFechamentoCupom( PChar(Mensagem) );



GOSTEI 0
POSTAR