Fernando Leite Barreto

Tem que substituir os endereços de homologação e produção do arquivo Cidades.ini da tag [2111300] NomeURL_H=sistemas.semfaz.saoluis.ma.gov.br por NomeURL_H=stm.semfaz.saoluis.ma.gov.br e NomeURL_P=sistemas.semfaz.saoluis.ma.gov.br por NomeURL_P=stm.semfaz.saoluis.ma.gov.br

ninguém com o erro parecido?

Eu ajustei dessa maneira: ACBrNFSe1.ConsultarSituacao(protocolo, Lote); { // 1 = Não Recebido // 2 = Não Processado // 3 = Processado com Erro // 4 = Processado com Sucesso } if (ACBrNFSe1.WebServices.ConsSitLoteRPS.RetSitLote.InfSit.Situacao = '3') or (ACBrNFSe1.WebServices.ConsSitLoteRPS.RetSitLote.InfSit.Situacao = '4') then begin ACBrNFSe1.ConsultarLoteRps(Lote, protocolo); end;

O meu sistema retorna a seguinte mensagem de erro ao tentar enviar nota pela função ACBrNFSe1.Enviar(xlote) Segue os dados do provedor: Entrei em contato com o suporte do provedor e eles disseram que não receberam nenhuma solicitação informando do problema. Alguém mais está com o problema parecido ou sabe como corrigir isso? Desde já agradeço

Obrigado pela ajuda!

Quando tento executar o método ConsultarLoteRps quando a nota ainda não está processada, o componente gera um Access Violation. Porém, quando a nota está processada, este erro não acontece. Não consigo debugar o problema pois meu cliente utiliza certificado A3. Alguém sabe como corrigir isso? Segue os dados da cidade: [1721000] Nome=Palmas UF=TO Provedor=WebISS NomeURL_H=palmasto NomeURL_P=palmasto Erro na função: function ConsultarLoteRps(ANumLote, AProtocolo: string): Boolean;

Bom dia a todos, Estou querendo implementar um sistema de envio de nota de serviço para um cliente de Araçatuba, São Paulo. Porém, analisei aqui e verifiquei que a cidade de Araçatuba não contém no arquivo Cidades.ini. Estou usando a versão 2 do ACBR. Tem alguma razão para a cidade não estar contida neste arquivo?

Boa tarde! Estou com problema para transmitir nota de serviço no Trunk2, para a cidade de Campo Grande, MS. Conforme o erro Erro Interno: 12002 Erro HTTP: 0 Erro: Requisição não enviada. 12002 - TimeOut de requisição Já ajustei o sistema conforme indicou o Régys Silveira no tópico abaixo e NÃO FUNCIONOU. ACBrNFSe1.Configuracoes.WebServices.AguardarConsultaRet := 15000; ACBrNFSe1.Configuracoes.WebServices.AjustaAguardaConsultaRet := True; ACBrNFSe1.Configuracoes.WebServices.IntervaloTentativas := 1000; Já ajustei o windows conforme observei em alguns fóruns, seguindo os passos abaixo, E CONTINUA O MESMO ERRO: - Acesse Internet Explorer; - Ferramentas; - Selecionar Opções da Internet; - Avançadas, desça até o final da barra e deixe somente marcado as seguintes opções ; - Usar SSL 3.0 - Usar TSL 1.0 - Verificar se há assinaturas em programas baixados - Aplicar. O que pode ser???

Estou tentando emitir uma nota fiscal de serviço usando o ACBR, mas não estava obtendo sucesso. Eu entrei em contato com o pessoal da SEMFAZ e eles me forneceram os xsd's. No arquivo ReqEnvioLoteRPS.xsd, temos lá o elemento TokenEnvio. Pois bem, olhando a fundo o código do ACBR, vi que este elemento é carregado quando o provedor for CTA, mas lá no arquivo Cidade.ini diz que o provedor do Maranhão é IssDSF. Depois, pesquisei a respeito e vi tópicos falando que o CTA é a "mesma coisa que o IssDSF", mas vi que este elemento TokenEnvio não carregava usando o provedor IssDSF. Ok, dae eu alterei o arquivo Cidade.ini, substituindo o Provedor de IssDSF para CTA. Alterando o sistema conseguiu gerar o arquivo xml de envio e foi orientado a informar qualquer valor para o campo TokenEnvio. Vou colocar o arquivo de envio caso queira verificar: <?xml version="1.0" encoding="UTF-8"?> <ns1:ReqEnvioLoteRPS xmlns:ns1="http://localhost:8080/WsNFe2/lote" xmlns:tipos="http://localhost:8080/WsNFe2/tp" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://localhost:8080/WsNFe2/lote http://localhost:8080/WsNFe2/xsd/ReqEnvioLoteRPS.xsd"> <Cabecalho> <TokenEnvio>999999999999999999</TokenEnvio> <CodCidade>0921</CodCidade> <CPFCNPJRemetente>12877192000106</CPFCNPJRemetente> <RazaoSocialRemetente>Santa Fe Ensino Medio e Fundamental LTDA - EPP</RazaoSocialRemetente> <transacao>false</transacao> <dtInicio>2018-03-20</dtInicio> <dtFim>2018-03-20</dtFim> <QtdRPS>1</QtdRPS> <ValorTotalServicos>10.00</ValorTotalServicos> <ValorTotalDeducoes>0.00</ValorTotalDeducoes> <Versao>1</Versao> <MetodoEnvio>WS</MetodoEnvio> </Cabecalho> <Lote Id="4680821"> <RPS Id="rps:1"> <Assinatura>909edc0f77fe965078e4ca48edacc3258cda4f71</Assinatura> <InscricaoMunicipalPrestador>74544002</InscricaoMunicipalPrestador> <RazaoSocialPrestador>Santa Fe Ensino Medio e Fundamental LTDA - EPP</RazaoSocialPrestador> <TipoRPS>RPS</TipoRPS> <SerieRPS>NF</SerieRPS> <NumeroRPS>1</NumeroRPS> <DataEmissaoRPS>2018-03-20T16:51:50</DataEmissaoRPS> <SituacaoRPS>N</SituacaoRPS> <SeriePrestacao>99</SeriePrestacao> <InscricaoMunicipalTomador>00000986821</InscricaoMunicipalTomador> <CPFCNPJTomador>86994239187</CPFCNPJTomador> <RazaoSocialTomador>Diogo Moraes Antunes</RazaoSocialTomador> <TipoLogradouroTomador>Rua</TipoLogradouroTomador> <LogradouroTomador>Antonio Raposo</LogradouroTomador> <NumeroEnderecoTomador>300</NumeroEnderecoTomador> <TipoBairroTomador>Bairro</TipoBairroTomador> <BairroTomador>Cutim</BairroTomador> <CidadeTomador>0921</CidadeTomador> <CidadeTomadorDescricao>Sao Luis/MA</CidadeTomadorDescricao> <CEPTomador>65045215</CEPTomador> <EmailTomador>[email protected]</EmailTomador> <CodigoAtividade>851390000</CodigoAtividade> <CodigoServico>0801</CodigoServico> <AliquotaAtividade>2.0000</AliquotaAtividade> <TipoRecolhimento>A</TipoRecolhimento> <MunicipioPrestacao>0921</MunicipioPrestacao> <MunicipioPrestacaoDescricao>Sao Luis/MA</MunicipioPrestacaoDescricao> <Operacao>A</Operacao> <Tributacao>T</Tributacao> <ValorPIS>0.00</ValorPIS> <ValorCOFINS>0.00</ValorCOFINS> <ValorINSS>0.00</ValorINSS> <ValorIR>0.00</ValorIR> <ValorCSLL>0.00</ValorCSLL> <AliquotaPIS>0.0000</AliquotaPIS> <AliquotaCOFINS>0.0000</AliquotaCOFINS> <AliquotaINSS>0.0000</AliquotaINSS> <AliquotaIR>0.0000</AliquotaIR> <AliquotaCSLL>0.0000</AliquotaCSLL> <DescricaoRPS>Pagamento a Vista</DescricaoRPS> <DDDPrestador/> <TelefonePrestador/> <DDDTomador>67</DDDTomador> <TelefoneTomador>30261818</TelefoneTomador> <Itens> <Item> <DiscriminacaoServico>Teste</DiscriminacaoServico> <Quantidade>1.0000</Quantidade> <ValorUnitario>10.00</ValorUnitario> <ValorTotal>10.00</ValorTotal> <Tributavel>S</Tributavel> </Item> </Itens> </RPS> </Lote> </ns1:ReqEnvioLoteRPS> E além disso o suporte da SEMFAZ disse que o a url de homologação é homo.stm.semfaz.saoluis.ma.gov.br e o de produção é stm.semfaz.saoluis.ma.gov.br. Ou seja, tá tudo errado no Cidade.ini segundo o pessoal da SEMFAZ. Sendo assim, alterei o arquivo Cidade.ini conforme descrito abaixo. Provedor=CTA NomeURL_H=homo.stm.semfaz.saoluis.ma.gov.br NomeURL_P=stm.semfaz.saoluis.ma.gov.br Dae rodando o sistema, o acbr me retornou uma mensagem em branco, sem dados, sem protocolo, sem nada. Utilizo o mesmo sistema para outra empresa ele envia normal usando certificado A1, este que está com erro estou usando certificado A3. O que pode ser?????

Obrigado pela resposta. Como já havia mencionado, eu deixei apenas ACBrNFse1.Configuracoes.Geral.SSLLib := libWinCrypt; e tive a mesma mensagem de erro, dizendo que houve falha em obter o provedor de criptografia, usando certificado A1. Já me falaram pra utilizar uma máquina XP para importar e exportar o certificado e instalar novamente no Windows 8, mas não cheguei a este ponto. Nem sei se vai de fato funcionar. Já no A3 não tive esse problema, mas ocorreu uma mensagem de erro ao tentar enviar a NFSe dizendo, Erro Interno: 0 Erro HTTP: 500

Usando um certificado A1 o sistema gera um exceção dizendo "Falha em obter o provedor de criptografia" Dados iniciais: FpCertContext = $4D0C678 mCryptProviderCert = 0 dwKeySpec = 1 pfCallerFreeProv = False // Obtendo o Contexto do Provedor de Criptografia do Certificado // if CryptAcquireCertificatePrivateKey( FpCertContext, 0, Nil, mCryptProviderCert, dwKeySpec, pfCallerFreeProv) then O que pode ser?

Bom dia Italo, Foi atualizado já e o erro ainda persiste. Debugando verifiquei que antes desta mensagem aparece um erro quando procuramos pelo nó de assinatura... if (SignNode = nil) then raise EACBrDFeException.Create(cErrFindSignNode); A mensagem "Erro: Falha ao localizar o nó de Assinatura", mas o programa continua rodando... Assim, eu estou tentando enviar uma nota de dois clientes que usam certificados de tipos diferentes, um é A1 e outro é A3. E os dois geram o mesmo problema acima de falha ao localizar o nó de assinatura, porém eles geram problemas distintos posteriormente Problema usando certificado A1: Na procedure TDFeSSLXmlSignXmlSec.CreateCtx da unit ACBrDFeXsXmlSec, o sistema gera uma exception dizendo "Erro: Falha ao ler a Chave Privada de DadosPFX" porque o FdsigCtx^.signKey está como null. Veja o trecho que gera esta FdsigCtx^.signKey := xmlSecCryptoAppKeyLoadMemory(MS.Memory, MS.Size, xmlSecKeyDataFormatPkcs12, PAnsiChar(Senha), nil, nil); if (FdsigCtx^.signKey = nil) then raise EACBrDFeException.Create(cErrPrivKeyLoad); O que dá pra ser feito? Problema usando certificado A3: Na procedure TDFeSSLXmlSignXmlSec.CreateCtx da unit ACBrDFeXsXmlSec, o sistema gera uma exception dizendo "Certificado não permite Exportar Chave Privada" ao tentar invocar função ExportCertContextToPFXData(FpCertContext, FpDFeSSL.Senha). procedure TDFeSSLXmlSignXmlSec.CreateCtx; if UsarDadosPFX then begin PfxData := FpDFeSSL.SSLCryptClass.CertPFXData; function TDFeWinCrypt.GetCertPFXData: AnsiString; begin if FpPFXData = '' then begin CarregarCertificadoSeNecessario; if (FpDFeSSL.DadosPFX = '') then FpPFXData := ExportCertContextToPFXData(FpCertContext, FpDFeSSL.Senha) else FpPFXData := FpDFeSSL.DadosPFX; end; //DEBUG //WriteToFile('c:\temp\CertACBr.pfx', FpPFXData ); Result := FpPFXData; end; A configuração de criptografia que estou usando atualmente é a seguinte: ACBrNFse1.Configuracoes.Geral.SSLLib := libWinCrypt; ACBrNFse1.Configuracoes.Geral.SSLCryptLib := cryWinCrypt; ACBrNFse1.Configuracoes.Geral.SSLHttpLib := httpWinHttp; ACBrNFse1.Configuracoes.Geral.SSLXmlSignLib := xsXmlSec; Enfim, qualquer luz que o senhor puder dar será muito bem vinda.

Problema: Estou tentando enviar um lote de NFSe e aparece uma mensagem de erro Configuração: - Windows x64 - acbr trunk 2 - certificado A1 O formato padrão vem com a seguinte configuração: ACBrNFse1.Configuracoes.Geral.SSLLib := libWinCrypt; ACBrNFse1.Configuracoes.Geral.SSLCryptLib := cryWinCrypt; ACBrNFse1.Configuracoes.Geral.SSLHttpLib := httpWinHttp; ACBrNFse1.Configuracoes.Geral.SSLXmlSignLib := xsLibXml2; Porém, é mostrada a seguinte mensagem de erro: "Falha em obter o provedor de criptografia" Pois bem, alterando para xsXmlSec: ACBrNFse1.Configuracoes.Geral.SSLLib := libWinCrypt; ACBrNFse1.Configuracoes.Geral.SSLCryptLib := cryWinCrypt; ACBrNFse1.Configuracoes.Geral.SSLHttpLib := httpWinHttp; ACBrNFse1.Configuracoes.Geral.SSLXmlSignLib := xsXmlSec; É mostrada a seguinte mensagem de erro: "Erro: Falha ao ler a Chave Privada de DadosPFX" Afinal, qual é a configuração que devo utilizar ou como eu faço para corrigir este problema? Agradeço desde já!

O que pode ser isso? Vi vários fóruns com este problema relacionado. Segue as alterações que fiz: ACBrNFse1.Configuracoes.Geral.SSLLib := libWinCrypt; ACBrNFse1.Configuracoes.Geral.SSLXmlSignLib := xsMsXml; ACBrNFse1.Configuracoes.Geral.SSLCryptLib := cryWinCrypt; Porém o erro ainda persiste. Alguma outra ideia?

Estou com o mesmo problema. Alguém achou uma solução?