Codorna

Funciona, não precisa fazer nada, só colocar a cidade lá (e talvez forçar a inclusão de DDD no telefone... acho que é Jaboticabal que exige, não lembro)

em anexo XMLENVIANDO.xml

estou anexando uma que é aceita 21-env-lot.xml

De nada. Eu vi que você botou uma gambiarra minha da assinatura de Salvador também, se quiser eu coloco minha pasta do ACBR aqui mas você teria que garimpar a parte de salvador pq já tem muito tempo eu não lembro do que foi alterado, mas Salvador eu uso as DLLs que a prefeitura passou. tipo: if FConfiguracoes.ConfiguracaoEspecifica = ceSalvador then begin xNFSeSalvadorProxy := CoProxy.Create; xNFSeSalvadorProxy.AtribuirCertificadoDigital('My', FConfiguracoes.Certificados.NomeCertificado); FRetornoWS := xNFSeSalvadorProxy.ConsultarLoteRpsUrl(Acao.Text,'https://nfse.salvador.ba.gov.br/rps/CONSULTALOTERPS/ConsultaLoteRPS.svc'); FRetWS := FRetornoWS; end else begin ReqResp.Execute(Acao.Text, Stream); StrStream := TStringStream.Create(''); StrStream.CopyFrom(Stream, 0); FRetornoWS := TiraAcentos(ParseText(StrStream.DataString, True)); FRetWS := FProvedorClass.GetRetornoWS(acConsLote, FRetornoWS); StrStream.Free; end;

Tem um tempo que não atualizo o ACBr, pq eu uso o componente mas eu tenho algumas coisas específicas como cidade que não tem nada a ver com abrasf, certificado em bd (o meu programa funciona tipo como um serviço e lança nota p/ umas 12 cidades diferentes da mesma máquina), etc... mas acho que essas units eu nunca precisei mecher não... as linhas relevantes são só essas : ACBrNFSeUtil Linha 604, 766, 768 e 769 ACBrNFSeWebServices_SOAP 220, 318, 371 a 376 ACBrNFSeWebServices_XML 310, 363 a 369 pnfsNFSeG 101, 105 a 108, 112 pnfsNFSeW 653, 654 pcnLeitor 232 a 241 Eu só mecho com envio, processamento e cancelamento , então não tenho certeza se as outras funções funcionam Natal.rar

gera assim fera '<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" '+ 'xmlns:wsn="https://wsnfsev1.natal.rn.gov.br:8444"'+ '>'+ '<soapenv:Header/>' + '<soapenv:Body>' + '<wsn:RecepcionarLoteRpsRequest>' + '<nfseCabecMsg>'+ StringReplace(StringReplace(CabMsg, '<', '&lt;', [rfReplaceAll]), '>', '&gt;', [rfReplaceAll]) + '</nfseCabecMsg>' + '<nfseDadosMsg>'+ StringReplace(StringReplace(DadosMsg, '<', '&lt;', [rfReplaceAll]), '>', '&gt;', [rfReplaceAll]) + '</nfseDadosMsg>' + '</wsn:RecepcionarLoteRpsRequest>' + '</soapenv:Body>' + '</soapenv:Envelope>';

Alguém conseguiu implementar ? Comecei agora cedo, e gerei uma praticamente igual à de exemplo e ta dando Erro no suporte a canais seguros Colocando o XML no site deles p/ validar da erro desconhecido

Única vez que vi este erro foi quando a senha do certificado aqui estava errada

Aqui funciona desse jeito Rômulo. Nós temos um servidor que realiza o envio de notas de todos os clientes , um webservice recebe dados de notas, salva no banco e o sistema no servidor utiliza esses dados para enviar as notas para a respectiva cidade em nome do cliente Único problema é que não da p/ usar o certificado que é por usb, tem que ser arquivo (ou talvez dê... não consegui fazer... os certificados pfx são mandados pro banco de dados SQL e eu tiro ele de lá) Aqui ta enviando p/ Goiânia, Salvador, Belo Horizonte, São Gonçalo, Niterói, Rio de Janeiro, mais de 200 notas por dia, utilizando o ACBR (quando possível... eu fiz umas bagunças já que São Gonçalo não é abrasf, e salvador apesar de ser Abrasf tem várias particularidades) com estabilidade. Vale ressaltar que de início a idéia deixar esse sistema como um serviço do windows , mas há alguma coisa no ACBR que impede o funcionamento como serviço (acredito que seja no ACBR pois um dia saí deletando referências de units e após deletar alguma coisa do acbr ele passou a "funcionar", mas não tenho a menor idéia exatamente de onde seja, aqui é Delphi 7) (acabei criando um serviço que executa o sistema caso o mesmo não esteja aberto)

Era o certificado

Aqui estava funcionando normalmente para o RJ, mas há 10 dias parou , só está retornando erro 403 Alguem passou por isso ? Assumo que agora, para fazer funcionar eu tenho que autenticar junto ao webservice antes de enviar o XML, como fazer isto, alguém sabe ? Em salvador eu sei que é assim, mas eles disponibilizaram uma DLL p/ fazer funcionar.

Bom, eu tentei altas gambiarras mas não foi , tive que fazer uso de DLL , ficou bem fora do padrão , usando o ACBR p/ gerar o XML e DLL p/ gerar Assinatura e fazer o envio , tem que fazer autenticacao do certificado antes de enviar senão não deixa

É esse sim velho, o problema é que claramente os caras que fizeram esse negócio em salvador não estão nem ae p/ compatibilidade, visto a necessidade de assinar rps com id minúsculo

hmm.. copiei o do WebISS que é .svc também e pelo menos mudou o erro .. mas não tenho idéia se este é o caminho correto

Obrigado. abrindo https://nfse.sefaz.salvador.ba.gov.br/ENVIOLOTERPS/EnvioLoteRPS.svc?wsdl veio este xml em anexo Eu não estou conseguindo entender de onde eu tiro esse envelope, body, etc. Estou acostumado a usar o wsdl importer então não tenho a mínima experiência com isso, e ao tentar usar p/ ver se eu consigo tirar alguma lógica o importer do delphi não busca, da apenas empty document (o que é errado, já que no browser está abrindo) EnvioLoteRPS.svc.xml

por exemplo, a função GeraEnvelopeRecepcionarLoteRPS , como eu chego neste modelo ? result := '<?xml version="1.0" encoding="UTF-8"?>' + '<S:Envelope xmlns:S="http://schemas.xmlsoap.org/soap/envelope/" ' + 'xmlns:e="' + URLNS + '">' + '<S:Header/>' + '<S:Body>' + '<e:RecepcionarLoteRps.Execute>' + '<e:Nfsecabecmsg>' + '&lt;?xml version="1.0" encoding="UTF-8"?&gt;' + StringReplace(StringReplace(CabMsg, '<', '&lt;', [rfReplaceAll]), '>', '&gt;', [rfReplaceAll]) + '</e:Nfsecabecmsg>' + '<e:Nfsedadosmsg>' + '&lt;?xml version="1.0" encoding="UTF-8"?&gt;' + StringReplace(StringReplace(DadosMsg, '<', '&lt;', [rfReplaceAll]), '>', '&gt;', [rfReplaceAll]) + '</e:Nfsedadosmsg>' + '</e:RecepcionarLoteRps.Execute>' + '</S:Body>' + '</S:Envelope>'; no caso, é p/ salvador : https://nfse.sefaz.salvador.ba.gov.br/envioloterps/envioloterps.svc

Desconheço esse erro, aqui está funcionando já lançaram mais de 100 notas em BH Inclusive o erro do tópico realmente era problema no certificado que não tinham exportado corretamente Provavelmente a única diferença entre o meu Acbr e o teu em relação a belo horizonte é que no meu os certificados ficam no banco de dados e o serviço que gerencia (é um serviço automático, as empresas mandam os pedidos por webservice), mas as funções de assinatura e etc eu não modifiquei nada

Aqui sim.

Boa tarde, estou tendo o seguinte erro tentando homologar em belo horizonte 2013-10-30 14:51:46:875 Thread 8668 - Erro no método "BELO HORIZONTE/MG - TThreadEnvio.Enviar - ID RPS 73": Erro no suporte a canais seguros - URL:https://bhisshomologa.pbh.gov.br/bhiss-ws/nfse - SOAPAction:http://ws.bhiss.pbh.gov.br/RecepcionarLoteRps (Exception) acredito que o certificado não esteja cadastrado na prefeitura mas foi me passado que está sim e que o cliente já emite por outros meios Alguem sabe do que se trata? No caso este é log do meu sistema e o erro se dá ao enviar o rps

Estou com problemas para assinar, devido ao id minúsculo, ele assina o Lote , assim como nos provedores que já possuem id minúsculo, mas sempre ocorre erro desconhecido se tentar assinar o rps Alguem tem uma idéia de como contornar isso?

é ABRASF, tenho os schemas aparentemente é próprio. SEFAZ Salvador https://nfse.sefaz.salvador.ba.gov.br/OnLine/Institucional/Default.aspx tem lá p/ baixar os schemas este erro desconhecido tem a ver com o id ser minúsculo e não maiúsculo...

Alguem já fez ? Em qual provedor ele mais se assemelha p/ eu tirar de exemplo ? Estou meio perdido, "criei" um provedor (copiei o do RJ), coloquei no fonte e tal p/ ir ajustando conforme tentativas mas fica dando erro desconhecido de assinatura...

Estranho essa burocracia, nesse telefone eu falei direto com programador/analista de teste, o pessoal da prefeitura não sabe nem o que é web service

Esse erro O documento XML deve ter um elemento de nível superior. Line: 0. é cagada deles , no produção em São Gonçalo ocorreu 2x já, uma há 15 dias e uma semana passada só ligar lá e avisar (4003-1860) que eventualmente eles arrumam

bom, ñ tenho capacidade de ajudar, mas o delphi importou aqui bauru normalmente, segue em anexo, caso isso ajude em alguma coisa. uWS_SigIss_Bauru.pas uWS_SigIss_Bauru.pas