Problemas migração Nfs-e Trunk 2

[Italo Giurizzato Junior]

Bom dia Leandro,

Quanto a consulta a NFS-e acredito ter resolvido o problema. Favor atualizar os fontes e realizar novos testes.

Quanto a esse problema de impressão do DANFSE.

É um absurdo o que o provedor esta fazendo, pois segundo o manual da ABRASF o tipo simples: tsSimNao tem os seguintes valores: 1 = Sim e 2 = Não.

Resumindo o XML do RPS é gerado segundo o manual, mas o provedor ao gerar o XML da NFS-e inverte.

E nós temos que ficar dando jeitinho para contornar as burradas que eles fazem.

Bom, a solução é simples, ou você altera o DANFE, ou seja coloca uma condição para inverter quando for o provedor Tecnos, ou entra em contato com eles e mostra a mercadoria que eles fizeram e torça que sejam humildes o bastante para corrigir.

 

[Luiz Carlos Barbosa]

Boa noite Italo.

Ontem que consegui mexer nessa questão novamente. Atualizei os fontes e deu tudo certo certo usando a libCapicom.  Já consegui fazer as adaptações necessárias no meu Sistema e já emiti algumas notas.

Obs: utilizando libCapicomDelphiSoap continua com o mesmo problema.

 

Gostaria de agradecer o seu empenho e eficiência no atendimento à minha questão. Muito obrigado !

[Leandro Coelho]

Italo, boa tarde !

Testes realizados, funcionou perfeito, muito obrigado.

Sobre o campo optante eu mandei um e-mail, vamos ver qual será a resposta.

------------

Sobre esta alteração que fiz conforme abaixo, isso procede ? 

Alterei ACBrDFe.pas:
Quando envia e não retorna mensagem nenhuma, esta caindo no raise, então fiz essa alteração:
procedure TACBrDFe.GerarException(const Msg: String; E: Exception);
var
  Tratado: Boolean;
  MsgErro: String;
begin
  MsgErro := Msg;
  if Assigned(E) then
    MsgErro := MsgErro + sLineBreak + E.Message;

  Tratado := False;
  FazerLog('ERRO: ' + MsgErro, Tratado);

  //if not Tratado then  // era
  if (not Tratado) and (MsgErro <> '') then // ficou - alterado - leandro 19/04/2016
    raise EACBrDFeException.CreateDef(MsgErro);
end;

[Italo Giurizzato Junior]

Bom dia Leandro,

Essa alteração é para evitar que uma tela de erro em branco apareça?

Se sim, não vejo com bons olhos, pois o erro ocorreu e não esta sendo apresentado um alerta sobre ele.

O que precisamos é aprimorar o tratamento do retorno a fim de apresentar a mensagem de erro quando ocorrer.

[Leandro Coelho]

É pra evitar mesmo a tela em branco.

O RPS está sendo enviada e registrada normalmente e apos consultar, retornando como situação 4(processado com sucesso).

Então acabei fazendo esta alteração para não ficar mostrando uma tela em branco para o usuário do sistema.

[Italo Giurizzato Junior]

Bom dia Leandro,

Vou arrumar um tempo para analisar com mais calma essas situações.