acbrsat Impressões incompletas no extrato

[Embrati]

Olá pessoal, Passei a manhã inteira pesquisando no forum, mas não consegui chegar a nenhuma conclusão. Poderiam me ajudar por favor com as seguintes dúvidas:

- Impressão da mensagem do QRCode não sai completa, como configuro ?
- Impressão da mensagem no Simples Nacional não sai completa, como configuro ?
- Informação da lei da transparencia não sai no extrato, coloco em dados adicionais ?
- lei da transparencia precisa ser impressa item a item ou ela é calculada item a item e impressa somente o total no final ?
- lei da transparencia precisa ser detalhada municipal, estadual e federal igual se faz na NFe ?

- o componente possui o campo SoftwareHouse e Site mas ele não imprime nada, como configuro ?

Editado 9 Janeiro, 2017 por Embrati

[Daniel Simoes]

Que tipo de impressão você está usando ? EscPos ou FortesReport (gráfica) ?

Já fez testes com as aplicações SATTeste.exe e PosPrinterTeste.exe ? (ambas na pasta Exemplos)

[Embrati]

Oi Daniel, obrigado pelo contato.

Estou usando o FortesReport e não consigo usar o SAT teste porque da uma mensagem de erro ao abrir o projeto no delphi 7 "Error creating form: Identifier expected on line 7."

- Impressão da mensagem do QRCode não sai completa, como configuro ? veja pela imagem que ela esta sendo impressa no campo de retorno da SEFAZ e a mensagem esta cortada;
- Impressão da mensagem no Simples Nacional não sai completa, como configuro ? A mensagem do simples esta aparecendo tb como retorno da sefaz e cortando;
- Informação da lei da transparencia não sai no extrato, coloco em dados adicionais ? essa agora esta saindo eu não estava colocando o percentual;
- lei da transparencia precisa ser impressa item a item ou ela é calculada item a item e impressa somente o total no final ? agora que informei o percentual, o mesmo esta sendo impresso item a item;
- lei da transparencia precisa ser detalhada municipal, estadual e federal igual se faz na NFe ?

- o componente possui o campo SoftwareHouse e Site mas ele não imprime nada, como configuro ?

- Quando enviamos e-mail para o cliente, no mesmo não esta anexando o PDF do cupom, tem como adicionar ? meu cliente gostaria dessa facilidade pois os clientes dele nem sempre esperam a digitação da venda e depois ele tem o trabalho de mandar entregar, se o sistema enviar por e-mail junto com o XML fica tudo resolvido.

A configuração da impressão que estou fazendo esta assim:

Procedure AcbrSat_Imprimir(AcbrSat : tAcbrSat; CaminhoNomeArquivo, TipoVouC, FormularioVouI : string);
var
  ACBrSatExtrato : TACBrSATExtratoFortes;
  aDevice : array[0..255] of char;
  aDriver : array[0..255] of char;
  aPort   : array[0..255] of char;
  ahDMode : THandle;
begin
  ACBrSatExtrato  := TACBrSATExtratoFortes.Create(Application);
  AcbrSat.Extrato := ACBrSatExtrato;

  try
    if trim(SatImpressoraNome)<>''
      then ACBrSATExtrato.PrinterName := SatImpressoraNome
      else begin
        Printer.GetPrinter(aDevice, aDriver, aPort, ahDMode);
        ACBrSatExtrato.PrinterName := aDevice;
      end;
  except
  end;

  ACBrSatExtrato.ImprimeQRCode    := true;
  ACBrSatExtrato.LarguraBobina    := 302;
  ACBrSatExtrato.Margens.Topo     := 5;
  ACBrSatExtrato.Margens.Fundo    := 5;
  ACBrSatExtrato.Margens.Esquerda := 5;
  ACBrSatExtrato.Margens.Direita  := 5;
  ACBrSatExtrato.MostrarPreview   := (FormularioVouI='V') or (SistemaRodandoComBaseDeTestes);
  ACBrSatExtrato.MostrarSetup     := (FormularioVouI='V') or (trim(SatImpressoraNome)='');
  ACBrSatExtrato.MsgAppQRCode     := 'Consulte o QR Code pelo aplicativo  "De olho na nota" disponível na AppStore (Apple) e PlayStore (Android)';
  ACBrSatExtrato.Site             := EmpresaSite;
  ACBrSatExtrato.SoftwareHouse    := 'Sistema emissor CFe-SAT desenvolvido por '+ EmpresaNome + ' Fone ' + EmpresaFone;

  if (Emit_Loja > 0) and (FileExists(ExePath+'LogoLoja_'+StrZero(Emit_Loja,3)+'.jpg'))
    then ACBrSatExtrato.PictureLogo.LoadFromFile(ExePath+'LogoLoja_'+StrZero(Emit_Loja,3)+'.jpg');

  if TipoVouC = 'V'
    then begin
      if trim(CaminhoNomeArquivo)<>''
        then ACBrSAT.CFe.LoadFromFile(CaminhoNomeArquivo);
      ACBrSAT.ImprimirExtrato;
    end
    else begin
      if trim(CaminhoNomeArquivo)<>''
        then ACBrSAT.CFeCanc.LoadFromFile(CaminhoNomeArquivo);
      ACBrSAT.ImprimirExtratoCancelamento;
    end;

  ACBrSatExtrato.Filtro           := fiPDF;
  ACBrSatExtrato.NomeArquivo      := 'Sat.PDF';
  AcbrSat_EnviarEmail(ACBrSAT, TipoVouC);

  ACBrSatExtrato.Destroy;
end;

Editado 11 Janeiro, 2017 por Embrati

[Daniel Simoes]

Sua imagem está muito limitada... não dá pra analisar...

Teste a impressão em PDF, e veja o conteúdo.. se na sua impressora sair diferente, pode ser algo no driver de Spool

Não damos mais suporte ao D7... pode ser alguma incompatibilidade do componente de geração de QRCode com essa IDE

Teste ainda a impressão em Esc/Pos, que não passa por Spool do Windows, e a geração do QRCode é feita pela própria impressora

 

 

É fundamental que você consiga rodar o SATTeste.exe, para debugar e compreender bem o uso dos componentes

Tente com a versão já compilada em Lazarus:

 

[Embrati]

Abri o exemplo em outro computador com XE10.

Fiz o seguinte ajuste na configuração da impressão:

    ACBrSATExtratoFortes1.LarguraBobina    := seLargura.Value;
    ACBrSATExtratoFortes1.Margens.Topo     := seMargemTopo.Value ;
    ACBrSATExtratoFortes1.Margens.Fundo    := seMargemFundo.Value ;
    ACBrSATExtratoFortes1.Margens.Esquerda := seMargemEsquerda.Value ;
    ACBrSATExtratoFortes1.Margens.Direita  := seMargemDireita.Value ;
    ACBrSATExtratoFortes1.MostrarPreview   := cbPreview.Checked;
    ACBrSATExtratoFortes1.ImprimeQRCode    := true;
    ACBrSATExtratoFortes1.MsgAppQRCode     := 'Consulte o QR Code pelo aplicativo  "De olho na nota" disponível na AppStore (Apple) e PlayStore (Android)';
    ACBrSATExtratoFortes1.Site             := 'www.teste.com.br';
    ACBrSATExtratoFortes1.SoftwareHouse    := 'Sistema emissor CFe-SAT desenvolvido por EmpresaNome Fone EmpresaFone';

Todas as minhas dúvidas persitem:

- Impressão da mensagem do QRCode não sai completa, como configuro ? veja pela imagem que ela esta sendo impressa no campo de retorno da SEFAZ e a mensagem esta cortada;
- Impressão da mensagem no Simples Nacional não sai completa, como configuro ? A mensagem do simples esta aparecendo tb como retorno da sefaz e cortando;
- Informação da lei da transparencia não sai no extrato, coloco em dados adicionais ? essa agora esta saindo eu não estava colocando o percentual;
- lei da transparencia precisa ser impressa item a item ou ela é calculada item a item e impressa somente o total no final ? agora que informei o percentual, o mesmo esta sendo impresso item a item;
- lei da transparencia precisa ser detalhada municipal, estadual e federal igual se faz na NFe ?
- o componente possui o campo SoftwareHouse e Site mas ele não imprime nada, como configuro ?
- Quando enviamos e-mail para o cliente, no mesmo não esta anexando o PDF do cupom, tem como adicionar ? meu cliente gostaria dessa facilidade pois os clientes dele nem sempre esperam a digitação da venda e depois ele tem o trabalho de mandar entregar, se o sistema enviar por e-mail junto com o XML fica tudo resolvido.
 

 

[Daniel Simoes]

Não consigo compreender exatamente o que você quer dizer... por favor gere uma imagem, e marque em vermelho, exatamente os pontos que você quer indicar como erro...

Não notei nenhum problema na impressão, veja em anexo, esse PDF que acabei de gerar.. através do Filtro PDF do Fortes Report (Lazarus)

CFe 3516 1211 1111 1111 1111 5912 3456 7890 0015 7454 4264.pdf

Tente a Impressão em Esc/Pos, com ela vc terá muito menos dor de cabeça com a instalação de Drivers e configuração do Spool

[Daniel Simoes]

Você fez perguntas demais no mesmo tópico e de assuntos diferentes... isso complica tudo... por favor crie um tópico para cada novo assunto...

[Daniel Simoes]

Apliquei as seguintes modificações e correções no SVN

Citar

-- ACBrSATExtratoClass --
[*] Propriedade "SoftwareHouse" definda como default "Projeto ACBr"
[*] Propriedade "Site" definda como default "http://www.projetoacbr.com.br"

-- ACBrSATExtratoFortes --
[+] Adicionado Memo para imprimir o conteudo das propriedades "SoftwareHouse" e
    "Site"
[-] Correção na impressão da Mensagem do Aplicação do QRCode, quando
    "EspacoFinal", fosse zero.
    (por: DSA)

 

Em relação aos demais assuntos... favor criar um novo tópico para cada...

[Embrati]

Daniel, você já resolveu boa parte dos meus problemas. Segue imagem do resultado.

Agora tenho apenas 2 dúvidas relacionadas a essa impressão:

1 - lei da transparência precisa ser detalhada municipal, estadual e federal igual se faz com a NFe ?

2 - Empresas optantes pelo simples nacional precisam adicionar alguma informação a impressão do SAT igual se faz com com a NFe ?

[Daniel Simoes]

4 horas atrás, Embrati disse:

1 - lei da transparência precisa ser detalhada municipal, estadual e federal igual se faz com a NFe ?

O layout da lei da transparência, segue modelo, conforme definido no manual do SEFAZ:  "Manual_Orientacao_SAT_v_MO_2_15_05.pdf"   (veja imagem em anexo)

Lá não foi previsto o detalhamento por esfera do governo, mas isso pode ser feito, pela aplicação, no campo observações ao Contribuinte.

4 horas atrás, Embrati disse:

2 - Empresas optantes pelo simples nacional precisam adicionar alguma informação a impressão do SAT igual se faz com com a NFe ?

Não sei lhe informar...   Muito provavelmente SIM, vc poderia usar o campo "observações ao Contribuinte" para isso...

 

 

[Embrati]

Tudo certo agora. Obrigado.