Ir para conteúdo
  • Cadastre-se

dev botao

Impressão


andre rivas
  • Este tópico foi criado há 3208 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • 1 ano depois...

Olá Bom Dia, vou aproveitar o tópico pois minhas duvidas também é sobre a impressão.

 

Gostaria de fazer a impressão de um cupom já emitido, localizei no código ele faz a seguinte checagem

if (CFe.infCFe.ID = '') then

Com isso imaginei que apenas passando o valor da chave para o parâmetro acima ele faria a impressão, até faz mas apenas com o valor da chave, sem os valor e demais informações.

Não consegui encontrar no fonte outra maneira de reimprimir, existe essa alternativa ?

 

 

Outra coisa que não encontrei foi como remover tanto da impressão ExtratroFortes quanto ESCPOs o texto ...

                 =TESTE=
>>>> >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>

Sem ter que mexer nos fontes.

 

Alguém poderia me dar uma dica sobre os casos acima ?

 

Obrigado.

Editado por wise_dcz
Link para o comentário
Compartilhar em outros sites

Esquece a parte dos dados =TESTE= pessoal, consegui encontrar a regra...

  if CFe.ide.tpAmb = taHomologacao then
  begin
    FLinhaCmd := cCmdFonteNormal+cCmdAlinhadoCentro+cCmdImpNegrito+
                'Extrato No. 000000';
    FBuffer.Add(FLinhaCmd);
    FLinhaCmd := 'CUPOM FISCAL ELETRÔNICO - SAT'+cCmdImpFimNegrito;
    FBuffer.Add(FLinhaCmd);
    FBuffer.Add(' ');
    FBuffer.Add(padC(' = T E S T E =',48));
    FBuffer.Add(' ');
    FBuffer.Add(padC('>',48,'>'));
    FBuffer.Add(padC('>',48,'>'));
    FBuffer.Add(padC('>',48,'>'));
  end
  else
  begin
    FLinhaCmd := cCmdFonteNormal+cCmdAlinhadoCentro+cCmdImpNegrito+
                'Extrato No. '+IntToStrZero(CFe.ide.nCFe,6);
    FBuffer.Add(FLinhaCmd);
    FLinhaCmd := 'CUPOM FISCAL ELETRÔNICO - SAT'+cCmdImpFimNegrito;
    FBuffer.Add(FLinhaCmd);
  end;

Só vai aparecer se for em Homologação

Obrigado.

Editado por wise_dcz
Link para o comentário
Compartilhar em outros sites

  • 2 semanas depois ...
Daniel Simoes

Postado 15 maio 2015 - 11:04

Você precisa carregar o XML a ser reimpresso no componente...

ACBrSAT.CFe.LoadFromFile()

 

Daniel boa noite.

Ao executar o comando e mandar imprimir obtenho a mensagem: "Nenhum CFe carregado na memória."

 

Normalmente utilizo o delphi, mas como precisei do código do trunk2 pra impressão ESC/POS instalei e estou o Lazarus (que offtopic nunca tinha mexido, mas já achei o máximo, fiquei fascinado).

 

Resumindo:

* Com trunk no delphi 2010 gero a venda e capturo o valor do xml com "sat.CFe.AsXMLString" (salvo em banco e não em pasta - optei por um gerenciador/servidor de vendas para o sat)

* Com trunk2 no Lazarus busco essa informação no banco, crio um arquivo xml local e leio com o comando abaixo:

ACBrSAT1.CFe.LoadFromFile('D:\projetos\executaveis\xml\sat\CFe9999999.xml');
ACBrSAT1.ImprimirExtrato;  

Estou certo em utilizar o AsXMLString dessa forma? fiquei na dúvida por esse tópico:

 

Tentei fazer o carregamento do xml tanto pelo demo no lazarus (trunk2) como pelo demo no delphi(trunk) como por uma aplicação vazia apenas com os componentes na tela em ambos e também obtive a mesma mensagem.

 

Estou anexando o xml que tenho gerado aqui.CFe9999999.xml

 

[]'s

Devemos ser a mudança que queremos ver

Link para o comentário
Compartilhar em outros sites

  • Fundadores

Acabei de testar e não vi nenhum problema...

  ACBrSAT1.CFe.LoadFromFile('C:\Pascal\Comp\ACBr\trunk2\Exemplos\ACBrSAT\Lazarus\CFesEnviados\CFe35150511111111111111591234567890000757243865.xml');
  ACBrSAT1.ImprimirExtrato;

Provavelmente há algo errado na Instalação... verifique a IDE se não está misturando os fontes de Trunk e Trunk2...

 

Vá como o Debug e acompanhe em pcnCFe.pas - function TCFe.LoadFromFile(AFileName : String) : boolean ;... nesse momento o XML é transformado em objeto...

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link para o comentário
Compartilhar em outros sites

  • 3 semanas depois ...

Olá Bom Dia, Voltando a esse tópico com mais uma duvida.

Estou usando o Escpos para impressão, porém quando adiciono a logomarca junto ao componente a mesma não sai na impressão, sai apenas o cabeçalho com os textos como já acontecia.

 

Existe algum padrão de imagem a seguir, ou preciso dizer em algum lugar que a logomarca deve ou não sair na impressão ?

Não consegui encontrar nada que solucionasse meu problema.

Link para o comentário
Compartilhar em outros sites

  • Fundadores

2.2 - Permaneça no assunto - Quando tiver uma dúvida diferente do assunto no tópico, poste em novo tópico. Não use algo equivalente a "aproveitando o gancho... [dúvida não relacionada com o tópico aqui]".

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 3208 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.