jonasrockenbach

em outro tópico foi passado a solução, obrigado Segue solução l

Estou com o mesmo problema, já tentei vários procedimentos e nada de funcionar, hoje descobri que na maquina que não comunica com com o Sefaz MS, se eu tentar emitir nota no Sefaz do MT funciona.

Consegui realizar o teste com varias formas de pagamento diferente e o grupo duplicatas.

Em meu teste utilizei o seguinte código e autorizou a emissão da NFe . ACBrNFe1.NotasFiscais.Items[0].NFe.Cobr.Dup.Add; ACBrNFe1.NotasFiscais.Items[0].NFe.Cobr.Dup.Items[0].nDup := '0001'; ACBrNFe1.NotasFiscais.Items[0].NFe.Cobr.Dup.Items[0].dVenc := Date+30; ACBrNFe1.NotasFiscais.Items[0].NFe.Cobr.Dup.Items[0].vDup := Dm.cds_NFVR_CONTABIL.AsCurrency; with ACBrNFe1.NotasFiscais.Items[0].NFe.pag.add do begin tPag := fpBoletoBancario; vPag := Dm.cds_NFVR_CONTABIL.AsCurrency; end;

Consegui informar Boleto e informar o grupo duplicata no sefaz de MS em homologação

with ACBR_NFCe.NotasFiscais.Items[0].NFe.pag do begin cds_NFCe_Pagamento.First; While not cds_NFCe_Pagamento.eof do begin with add do begin case cds_NFCe_PagamentoID_CLASSE.AsInteger of 1:Begin tPag := fpDinheiro; vPag := cds_NFCe_PagamentoTOTAL_MOEDA.AsCurrency; end; 2:Begin tPag := fpCheque; vPag := cds_NFCe_PagamentoTOTAL_MOEDA.AsCurrency; end; 3:Begin tPag := fpCartaoCredito; vPag := cds_NFCe_PagamentoTOTAL_MOEDA.AsCurrency; tpIntegra := tiPagNaoIntegrado; tBand:= bcOutros; end; 4:Begin tPag := fpCartaoDebito; vPag := cds_NFCe_PagamentoTOTAL_MOEDA.AsCurrency; tpIntegra := tiPagNaoIntegrado; tBand:= bcOutros; end; 5:Begin tPag := fpCreditoLoja; vPag := cds_NFCe_PagamentoTOTAL_MOEDA.AsCurrency; end; 8:Begin tPag := fpOutro; vPag := cds_NFCe_PagamentoTOTAL_MOEDA.AsCurrency; end; 10:Begin tPag := fpValePresente; vPag := cds_NFCe_PagamentoTOTAL_MOEDA.AsCurrency; end; end; end; cds_NFCe_Pagamento.Next; end;

Enfrentamos este problema, a solução foi criar um novo usuário no windows, era um Bug no usuário, mesmo ele estando como Administrador

Em um cliente nos deparamos com este erro, fizemos tudo o que estava escrito no fórum e não resolveu, depois de 2 dias lutando criei um novo usuário no windows e instalamos o certificado digital e tudo funcionou. O problema estava na conta do usuário.

Apenas para colaborar com os colegas, eu estava recebendo este erro quando tentava transmitir NFCe em Produção utilizando o CSC de Homologação.

Tenho um cliente que se recusou a migrar para NFe 4.0 por conta de perder o quadro Duplicatas, apresentei a possibilidade de informar o pagamento como sendo Duplicata Mercantil tPag =14 ele não aceitou diante disso abri um chamado ao Sefaz/MS abaixo print do chamado, que respondeu que ira levar o tema para próxima reunião de XML a ser realizada em Salvador .

Hoje tive o mesmo problema testei todas as maneiras descritas e não consegui fazer funcionar , meu cliente utiliza UolHost, fiz o passo a passo com as configurações do site do UOL Host e não funcionou, sempre retornava erro de login. Consegui falar com o suporte e me passaram que mudou o servidor, de smtps.uol.com.br para smtp.uhserver.com, a configuração que funcionou ficou assim: ACBrMail1.From := '[email protected]'; ACBrMail1.FromName := '[email protected]'; ACBrMail1.Host := 'smtp.uhserver.com'; ACBrMail1.Username := '[email protected]'; ACBrMail1.Password := 'senhadoemail'; ACBrMail1.Port := '587'; ACBrMail1.SetTLS := false ; ACBrMail1.SetSSL := false ;

Quando testei pelo demo também ocorreu este erro de validação, comentei este trecho do código e a NFe passou. } NotaF.NFe.Cobr.Fat.nFat := 'Numero da Fatura'; NotaF.NFe.Cobr.Fat.vOrig := 100 ; NotaF.NFe.Cobr.Fat.vDesc := 0 ; NotaF.NFe.Cobr.Fat.vLiq := 100 ; Duplicata := NotaF.NFe.Cobr.Dup.Add; Duplicata.nDup := '1234'; Duplicata.dVenc := now+10; Duplicata.vDup := 50; Duplicata := NotaF.NFe.Cobr.Dup.Add; Duplicata.nDup := '1235'; Duplicata.dVenc := now+10; Duplicata.vDup := 50; }

Testei a emissão da NFe 4.00 no MS e funcionou, tive que preencher o bloco informações de pagamento. Parabéns a quem se dedicou a atualizar. Chave da NFe teste 50170408677774000163550010000000941000000947 Site para consulta http://www.dfe.ms.gov.br/nfe/ mudar ambiente para homologação.

Estou no MS consultei serviço e recebi este retorno <?xml version="1.0" encoding="UTF-8" ?> <?xml version="1.0" encoding="UTF-8" ?> - <S:Envelope xmlns:S="http://www.w3.org/2003/05/soap-envelope"> - <S:Body> - <S:Fault xmlns:ns4="http://schemas.xmlsoap.org/soap/envelope/"> - <S:Code> <S:Value>S:Sender</S:Value> </S:Code> - <S:Reason> <S:Text xml:lang="pt">Não é possível localizar o método de despacho para {http://www.portalfiscal.inf.br/nfe/wsdl/NfeStatusServico4}nfeDadosMsg</S:Text> </S:Reason> </S:Fault> </S:Body> </S:Envelope>

Esperei o sistema rodar por dois dias em um cliente, um mercadadinho com movimentação constante antes de postar para ter certeza que havia solucionado o problema, realizei todos os procedimentos USB 2.0, atualizei driver e continuava travando, simplesmente a impressora entrava em Loop respondendo que estava ocupada, a unica coisa que resolveu foi baixar a Unit ecfEscECF do Rodrigo de Carvalho Ribeiro que esta na primeira pagina deste tópico e compilar utilizando esta Unit. Peguei hoje o log da impressora e notei que havia entrado em Loop varias vezes mas graças a modificação do Rodrigo o sistema depois de 3 segundos se recupera e volta a funcionar, deve existir um problema de projeto o detalhe é que comprei este modelo de impressora logo que foi lançado e a minha nunca deu problema funciona perfeitamente. Existe um outro problema que ainda não consegui resolver que é o de enviar dois comandos seguidos, analisei meu sistema e ele faz o controle para saber se um comando foi concluído para enviar outro, mas por algum motivo a impressora não responde corretamente e o sistema permite enviar dois comandos em sequencia e travar a aplicação. Isso tem ocorrido quando os usuários decoram o código dos produtos e teclam enter rapidamente, esse problema resolvi setando ACBrECF1.Device.ProcessMessages := False porem o sistema ficou lento e agora a reclamação é a lentidão, mas pelo menos o cliente consegue trabalhar antes não havia maneira de trabalhar;