Impressão

[andre rivas]

Boa tarde!!

estou tentando imprimir um extrato do sat e

não consigo  imprimir em uma impresso jato de tinta.como faço para imprimir? 

[Daniel Simoes]

Sim você consegue... Use o componente ACBrSATExtratoFortes

[andre rivas]

muito obrigado!!

[wise_dcz]

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

 

1º 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 ?

 

 

2º 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 15 Maio, 2015 por wise_dcz

[wise_dcz]

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 15 Maio, 2015 por wise_dcz

[Daniel Simoes]

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

ACBrSAT.CFe.LoadFromFile()

[wise_dcz]

Ok, Muito Obrigado Pela ajuda.

[luisArruda]

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

[Daniel Simoes]

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...

[luisArruda]

Obrigado Daniel, debugando percebi que provavelmente estou gerando o arquivo errado mesmo, amanhã vou verificar quando estiver com o sat em mãos.

Obrigado novamente.

[]`s

[wise_dcz]

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.

[Daniel Simoes]

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]".

[wise_dcz]

Boa Tarde...me desculpe mas como o titulo do tópico é impressão imaginei que fosse equivalente já que o assunto é referente.