Ir para conteúdo
  • Cadastre-se

lsergios

Membros
  • Total de ítens

    12
  • Registro em

  • Última visita

Tudo que lsergios postou

  1. realmente comentando as linhas acima o tpbm não é gerado e funcionou aqui em franca/sp ou alterando o C:\ACBR\Fontes\ACBrDFe\ACBrNFSeX\Base\ACBRNFSeXConversão.pas para: type TtpBM = (tbIsencao, tbReducaoBCperc, tbReducaoBCvalor, tbAliquota, tbNenhum); const TtpBMArrayStrings: array[TtpBM] of string = ('1', '2', '3', '4','5'); e no C:\ACBR\Fontes\ACBrDFe\ACBrNFSeX\Provedores\PadraoNacional.GravarXml.pas para: if NFSe.Servico.Valores.tribMun.tpBM <> tbNenhum then begin Result.AppendChild(AddNode(tcStr, '#1', 'tpBM', 1, 1, 0, tpBMToStr(NFSe.Servico.Valores.tribMun.tpBM), '')); case NFSe.Servico.Valores.tribMun.tpBM of tbIsencao: Result.AppendChild(AddNode(tcDe2, '#1', 'vCalcBM', 1, 15, 0, 0, '')); tbReducaoBCvalor: Result.AppendChild(AddNode(tcDe2, '#1', 'vCalcBM', 1, 15, 0, NFSe.Servico.Valores.tribMun.vRedBCBM, '')); tbReducaoBCperc, tbAliquota: Result.AppendChild(AddNode(tcDe2, '#1', 'vCalcBM', 1, 15, 0, NFSe.Servico.Valores.tribMun.pRedBCBM, '')); end; end; no componente mover Servico.Valores.tribMun.tpBM := tbNenhum; Até o pessoal da acbr resolver o problema
  2. pra mudar esse campo tpBm: Servico.Valores.tribMun.tpBM := tbAliquota; type TtpBM = (tbIsencao, tbReducaoBCperc, tbReducaoBCvalor, tbAliquota);
  3. Estou com o mesmo problema aqui também (Franca/SP). Rejeitado pela regras municipais: O tipo de retenção informada não confere com o esperado. Valor Informado: Isento. Valor esperado: SimNao
  4. neste post da página 9 tem o xml completo que utilizei
  5. sim, consegui enviar algumas vezes dava timeout, mas tentava novamente e transmitia se for franca o arquivo ACBrNFSeXServicos.ini deverá estar assim: [3516200] ; Atualizado em 05/08/2024 Nome=Franca UF=SP Provedor=SilTecnologia ;Versao=2.03 ;ProRecepcionar=https://franca.siltecnologia.com.br/services/Abrasf23 ;HomRecepcionar=https://homologacao.siltecnologia.com.br/tbfranca/services/Abrasf23 ;ProLinkURL=http://franca.siltecnologia.com.br/loginWeb.jsp?execobj=NFENotaFiscalBuscarDireto&cnpj=%Cnpj%&numero=%NumeroNFSe%&chave=%CodVerif% ;HomLinkURL=http://franca.siltecnologia.com.br/loginWeb.jsp?execobj=NFENotaFiscalBuscarDireto&cnpj=%Cnpj%&numero=%NumeroNFSe%&chave=%CodVerif% ; Descomentar as linhas abaixo para usar a API própria Versao=1.01 Params=APIPropria: ProRecepcionar=https://franca.siltecnologia.com.br/services/NotaFiscalNacional HomRecepcionar=https://homologacao.siltecnologia.com.br/tbfranca/services/NotaFiscalNacional se alterar esse arquivo tem que executar o compila_res.bat que esta na mesma pasta do arquivo
  6. esta assim: if NFSe1.Configuracoes.Geral.Provedor in [proCitta, proSilTecnologia] then begin { Dados necessários para os provedores indicados acima pois eles requerem que seja enviado o XML da NFS-e em vez do XML da DPS. } infNFSe.nNFSe := dm1.CDSNfNUMERO.AsString; infNFSe.nDFSe := dm1.CDSNfNUMERO.AsString; infNFSe.dhProc := dm1.CDSNfDATCAD.Value; // agPrefeitura, agSistemaNacional infNFSe.ambGer := agPrefeitura; // tePadraoNacional, teProprio infNFSe.tpEmis := teProprio; // Valores infNFSe.Valores.BaseCalculo := 0; infNFSe.Valores.Aliquota := 0; infNFSe.Valores.ValorIss := 0; infNFSe.Valores.vTotalRet := 0; infNFSe.Valores.ValorLiquidoNfse := dm1.CDSNfTotVL_LIQUIDO.Value; Servico.Valores.tribMun.tribISSQN := tiOperacaoTributavel; Servico.Valores.tribMun.tpImunidade := timNenhum; Servico.Valores.totTrib.indTotTrib := indNao; Emitente.IdentificacaoPrestador.CpfCnpj := dm1.CDSNfEMI_CNPJ_CPF_MOSTRAR.Value; if dm1.CDSNfINSCR_MUNIC_EMI.Value <> '' then Emitente.IdentificacaoPrestador.InscricaoMunicipal := dm1.CDSNfINSCR_MUNIC_EMI.Value; Emitente.RazaoSocial := dm1.CDSNfRAZAO_EMI.Value; Emitente.Endereco.Endereco := dm1.CDSNfENDER_EMI.Value; Emitente.Endereco.Numero := dm1.CDSNfENDER_NRO_EMI.Value; Emitente.Endereco.Complemento := dm1.CDSNfENDER_COMPL_EMI.Value; Emitente.Endereco.Bairro := dm1.CDSNfBAIRRO_EMI.Value; Emitente.Endereco.xMunicipio := dm1.CDSNfCIDADE_EMI.Value; Emitente.Endereco.UF := dm1.CDSNfUF_EMI.Value; Emitente.Endereco.CEP := dm1.CDSNfCEP_EMI.Value; Emitente.Endereco.CodigoMunicipio := dm1.CDSNfCID_IBGE_EMI.AsString; Emitente.Contato.Telefone := dm1.CDSNfFONE_EMI.Value; Emitente.Contato.Email := dm1.CDSNfEMAIL_EMI.Value; end; O xml completo gerado esta alguns posts acima
  7. No meu caso utilizo o componente direto no delphi with NFSe1.NotasFiscais.New.NFSe do begin Emitente.RazaoSocial := dm1.CDSNfRAZAO_EMI.Value; Emitente.Endereco.Endereco := dm1.CDSNfENDER_EMI.Value; Emitente.Endereco.Numero := dm1.CDSNfENDER_NRO_EMI.Value; Emitente.Endereco.Complemento := dm1.CDSNfENDER_COMPL_EMI.Value; Emitente.Endereco.Bairro := dm1.CDSNfBAIRRO_EMI.Value; Emitente.Endereco.xMunicipio := dm1.CDSNfCIDADE_EMI.Value; Emitente.Endereco.UF := dm1.CDSNfUF_EMI.Value; Emitente.Endereco.CEP := dm1.CDSNfCEP_EMI.Value; Emitente.Endereco.CodigoMunicipio := dm1.CDSNfCID_IBGE_EMI.AsString; Emitente.Contato.Telefone := dm1.CDSNfFONE_EMI.Value; Emitente.Contato.Email := dm1.CDSNfEMAIL_EMI.Value; end; Consegui também abrir o danfe chamando esta url (franca): https://franca.siltecnologia.com.br/loginWeb.jsp?execobj=NFSENotaFiscalBuscarDireto&cnpj=99.999.999/9999-99&numero=999&chave=99999999999999999999999999999999999999999999999999 Mesma que ja existia antes se não me engano, trocando somente o parâmetro chave que antes era código de verificação e agora a chave da nfse
  8. uses System.SysUtils, XmlDoc, XmlIntf; type TRetorno = record Status: string; ChaveAcesso: string; nNFSe: string; mensagemErro: string; end; function LerXMLRetorno(const FileName: string): TRetorno; var XMLDoc: IXMLDocument; RootNode: IXMLNode; function GetNodeTextSafe(Parent: IXMLNode; const NodeName: string): string; var Node: IXMLNode; begin Node := Parent.ChildNodes.FindNode(NodeName); if Assigned(Node) then Result := Node.Text else Result := ''; // valor padrão se não existir end; begin XMLDoc := TXMLDocument.Create(nil); XMLDoc.LoadFromFile(FileName); // carrega direto do arquivo XMLDoc.Active := True; RootNode := XMLDoc.DocumentElement; Result.Status := GetNodeTextSafe(RootNode, 'Status'); Result.ChaveAcesso := GetNodeTextSafe(RootNode, 'chaveAcesso'); Result.nNFSe := GetNodeTextSafe(RootNode, 'nNFSe'); Result.mensagemErro:= GetNodeTextSafe(RootNode, 'mensagemErro'); end; pra chamar a function e obter os campos: procedure TestarLeituraXML; var Ret: TRetorno; begin // chama a função passando o nome do arquivo XML Ret := LerXMLRetorno('C:\temp\retorno.xml'); // agora você pode acessar os campos do record ShowMessage('Status: ' + Ret.Status); ShowMessage('Chave de Acesso: ' + Ret.ChaveAcesso); ShowMessage('Número NFSe: ' + Ret.nNFSe); ShowMessage('Mensagem de Erro: ' + Ret.mensagemErro); end;
  9. Consegui enviar notas tanto em homologação quanto em produção para franca/sp o arquivo ACBrNFSeXServicos.ini ficou assim: [3516200] ; Atualizado em 05/08/2024 Nome=Franca UF=SP Provedor=SilTecnologia ;Versao=2.03 ;ProRecepcionar=https://franca.siltecnologia.com.br/services/Abrasf23 ;HomRecepcionar=https://homologacao.siltecnologia.com.br/tbfranca/services/Abrasf23 ;ProLinkURL=http://franca.siltecnologia.com.br/loginWeb.jsp?execobj=NFENotaFiscalBuscarDireto&cnpj=%Cnpj%&numero=%NumeroNFSe%&chave=%CodVerif% ;HomLinkURL=http://franca.siltecnologia.com.br/loginWeb.jsp?execobj=NFENotaFiscalBuscarDireto&cnpj=%Cnpj%&numero=%NumeroNFSe%&chave=%CodVerif% ; Descomentar as linhas abaixo para usar a API própria Versao=1.01 Params=APIPropria: ProRecepcionar=https://franca.siltecnologia.com.br/services/NotaFiscalNacional HomRecepcionar=https://homologacao.siltecnologia.com.br/tbfranca/services/NotaFiscalNacional Realmente como foi dito anteriormente, o único jeito de pegar o número da nota e a chave é através do arquivo xml retornado, que no programa de testes do acbr esta com o nome de temp2.xml: <Retorno> <Status>PROCESSADO_COM_SUCESSO</Status> <chaveAcesso>99999999999999999000100000000000066026010000009999</chaveAcesso> <nNFSe>999</nNFSe> </Retorno> consultando a chave no ambiente nacional em produção (NFS-e | Consulta Pública de NFS-e) a nota está la Na prefeitura também: O xml de envio gerado pelo componente esta assim: <?xml version="1.0" encoding="UTF-8"?> <NFSe xmlns="http://www.sped.fazenda.gov.br/nfse" versao="1.01"> <infNFSe Id="NFS99999999999999999000100000000000099999990000009999"> <xLocEmi>Franca</xLocEmi> <xLocPrestacao>Franca</xLocPrestacao> <nNFSe>999</nNFSe> <cLocIncid>3516200</cLocIncid> <xLocIncid>Franca</xLocIncid> <xTribNac>010601</xTribNac> <verAplic>1.01</verAplic> <ambGer>1</ambGer> <tpEmis>2</tpEmis> <cStat>100</cStat> <dhProc>2026-01-07T21:55:59-03:00</dhProc> <nDFSe>999</nDFSe> <emit> <CNPJ>99999999999999</CNPJ> <IM>99999</IM> <xNome>XXXXXXX</xNome> <enderNac> <xLgr>XXXXXXX</xLgr> <nro>999</nro> <xBairro>XXXXXX</xBairro> <cMun>3516200</cMun> <UF>SP</UF> <CEP>99999999</CEP> </enderNac> <fone>99999999999</fone> <email>[email protected]</email> </emit> <valores> <vLiq>30.00</vLiq> </valores> <DPS xmlns="http://www.sped.fazenda.gov.br/nfse" versao="1.01"> <infDPS Id="DPS999999999999999900010000001000000000000999"> <tpAmb>1</tpAmb> <dhEmi>2026-01-07T21:55:59-03:00</dhEmi> <verAplic>1.01</verAplic> <serie>1</serie> <nDPS>999</nDPS> <dCompet>2026-01-07</dCompet> <tpEmit>1</tpEmit> <cLocEmi>3516200</cLocEmi> <prest> <CNPJ>99999999999999</CNPJ> <fone>99999999999</fone> <email>[email protected]</email> <regTrib> <opSimpNac>3</opSimpNac> <regApTribSN>1</regApTribSN> <regEspTrib>0</regEspTrib> </regTrib> </prest> <toma> <CPF>99999999999</CPF> <xNome>XXXXXXXXXXXXXX</xNome></xNome> <end> <endNac> <cMun>3516200</cMun> <CEP>99999999</CEP> </endNac> <xLgr>XXXXXXXXXXXX</xLgr> <nro>999</nro> <xBairro>XXXXXXXX</xBairro> </end> <fone>99999999999</fone> <email>[email protected]</email> </toma> <serv> <locPrest> <cLocPrestacao>3516200</cLocPrestacao> </locPrest> <cServ> <cTribNac>010601</cTribNac> <xDescServ>CONTRATO MENSAL</xDescServ> <cNBS>115021000</cNBS> </cServ> </serv> <valores> <vServPrest> <vServ>30.00</vServ> </vServPrest> <trib> <tribMun> <tribISSQN>1</tribISSQN> <tpRetISSQN>1</tpRetISSQN> </tribMun> <totTrib> <indTotTrib>0</indTotTrib> </totTrib> </trib> </valores> </infDPS> </DPS> </infNFSe> <Signature xmlns="http://www.w3.org/2000/09/xmldsig#"> <SignedInfo> <CanonicalizationMethod Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-20010315"/> <SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1"/> <Reference URI="#NFS999999999999999990001000000000000999999010000009999"> <Transforms> <Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature"/> <Transform Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-20010315"/> </Transforms> <DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1"/> <DigestValue>oxxxxxxwrr9V932YdxDE9oj06FhM=</DigestValue> </Reference> </SignedInfo> <SignatureValue>xxxxxxxxxxxxxxx237Ftq7dJGrx0isoKnG6Lcc/mTg8t9JFifQnpPuC6avGb+5i6cc9oFTRpxKvc5DAHMMPHMfXgGFe3L1vb718tssFTrXvs6A51zqSPN7XEqb0JCEzfQ3sdSC0lbwyERfqfezX4PScEHqu3JSsQWlcuLIsM31u8yW85FHaDVeNJbWmy6wickkex2iJlnEL/uae23Y4D5tRTgeJwQy1LntpKZeKhM1ogf5uKewi5QiK3QBpPi4yVC3Oic5IYPkWK44PV1sF8jkvC/bsIw1yfv9d6z67eLQR/0hSVWeM20w/vuLTZxs6WXotzKCIowSxxxxxxxxx==</SignatureValue> <KeyInfo> <X509Data> <X509Certificate>xxxxxxxxxxxxxxxBAgIQDgQMDrTNq5fCxxvvEMQ7LTANBgkqhkiG9w0BAQsFADBxMQswCQYDVQQGEwJCUjETMBEGA1UEChMKSUNQLUJyYXNpbDE2MDQGA1UECxMtU2VjcmV0YXJpYSBkYSBSZWNlaXRhIEZlZGVyYWwgZG8gQnJhc2lsIC0gUkZCMRUwEwYDVQQDEwxBQyBCUiBSRkIgRzQwHhcNMjUxMTE4MjA1ODMzWhcNMjgxMTE3MjA1ODMzWjCCARAxCzAJBgNVBAYTAkJSMRMwEQYDVQQKDApJQ1AtQnJhc2lsMQswCQYDVQQIDAJTUDEPMA0GA1UEBwwGRnJhbmNhMRwwGgYDVQQLDBNDZXJ0aWZpY2FkbyBEaWdpdGFsMRcwFQYDVQQLDA4wMDY3OTE2MzAwMDE0MjE2MDQGA1UECwwtU2VjcmV0YXJpYSBkYSBSZWNlaXRhIEZlZGVyYWwgZG8gQnJhc2lsIC0gUkZCMRYwFAYDVQQLDA1SRkIgZS1DTlBKIEEzMUcwRQYDVQQDDD5RIFQgUiBTRVJWSUNPUyBFTSBURUNOT0xPR0lBIERBIElORk9STUFDQU8gTFREQToyMzY3NzkzNzAwMDEwMDCCASIwDQYJKoZIhvcNAQEBBQADggEPADCCAQoCggEBAM2EdsTRnjAShN6BqQgnEIuQvMzhfKmTRyfBz+68+GTmlUWLpuJL/nmmQ1+Y2h6RcNoS2OPnNtTeN3r8CIGW/lmyww37pOV9PqcSlnmeLJF2FgNxiFVB+t7oij3nukrlcigRfcOLs8mLpdSZxsyHPRZmwczIzXecioLeRJsvRMzwFvO9Tm5/VEi22lJpMDjzv8f+blH4n4gMf6Tz0SwQt+JHkVAo9hfX5wMt0nR3Zzv0y8RRqrhwfMb85YP7WqJQspheYZJYbKEgKEtOQD2D24obxIdn2+2ykIZTgwNWsPqmvpFxl+Yz8Hq/Lzq6kSb6n24qIGgfGliBMohuyiYowF0CAwEAAaOCAs8wggLLMIG3BgNVHREEga8wgaygPQYFYEwBAwSgNAQyMTkwMjE5NjcwODE1NTA5MTg5OTAwMDAwMDAwMDAwMDAwMDAwMDE2NDA5ODA3c3NwU1CgHwYFYEwBAwKgFgQUTFVJUyBTRVJHSU8gREEgU0lMVkGgGQYFYEwBAwOgEAQOMjM2Nzc5MzcwMDAxMDCgFwYFYEwBAwegDgQMMDAwMDAwMDAwMDAwgRZsLnNlcmdpby5zQGhvdG1haWwuY29tMAkGA1UdEwQCMAAwHwYDVR0jBBgwFoAUdb8gigSrtNF55L3vJhGgQTbY9L0wbAYDVR0gBGUwYzBhBgZgTAECAxgwVzBVBggrBgEFBQcCARZJaHR0cDovL2ljcC1icmFzaWwuYWNici5vcmcuYnIvcmVwb3NpdG9yaW8vZHBjL0FDX0JSX1JGQi9EUENfQUNfQlJfUkZCLnBkZjCBqQYDVR0fBIGhMIGeMEugSaBHhkVodHRwOi8vaWNwLWJyYXNpbC5hY2JyLm9yZy5ici9yZXBvc2l0b3Jpby9sY3IvQUNCUlJGQkc0L0xhdGVzdENSTC5jcmwwT6BNoEuGSWh0dHA6Ly9pY3AtYnJhc2lsLm91dHJhbGNyLmNvbS5ici9yZXBvc2l0b3Jpby9sY3IvQUNCUlJGQkc0L0xhdGVzdENSTC5jcmwwDgYDVR0PAQH/BAQDAgXgMB0GA1UdJQQWMBQGCCsGAQUFBwMCBggrBgEFBQcDBDCBmQYIKwYBBQUHAQEEgYwwgYkwUwYIKwYBBQUHMAKGR2h0dHA6Ly9pY3AtYnJhc2lsLmFjYnIub3JnLmJyL3JlcG9zaXRvcmlvL2NlcnRpZmljYWRvcy9BQ19CUl9SRkJfRzQucDdjMDIGCCsGAQUFBzABhiZodHRwOi8vb2NzcC1hYy1ici1yZmIuY2VydGlzaWduLmNvbS5icjANBgkqhkiG9w0BAQsFAAOCAgEAvv64cedgZwfw9pH25tQegyaiCBxGe443lzLBx7Mvn40Ed7vUuWcyFZyJJda7+0wYr87kuv1/QluU7VetywtMlYJIHibeydn65g1uBy5fLkxPN7BghLQPdSi5wJ2H0sKKKC5FY8Z2lFJ2ZXQkvmxRfYADef67q7qFmprHWC0QVpaGueVI3knsLihQU/fz+B7UWOl5b7YCg9tP1jdJpAkOgh9nNG1wM/ctRjMb1RMzGL7oczsUKXVOu8MYb5hn1xWyo1G9M9L5t2wgZJtkAGkMZ2Q4VLj9OMjmxyaavimfbbZKZn8Gk4kzUKC9b6DeljAvFuueVeedcUapBp7EapB8ATr8eVcVwJVvQTmg6ZWjGbpq2Ak7zw2OYPxjwvm+wRCx7ARrwJD7Q6sdzPTIUNRpaURSzfF48ecE8dsDceeoLBvLQ++EnHAKhHIKNdKpnRtfgCozd3wMBIzOommmG4lSnCeWky8W/sqovFn1tVUESsmccld+PY4/jvd2wzrAOuiGad0ReZrtA8Ve+4DxBhfqjADuQ6A+JSYZ5+EcGMtsTJDQ64KryvZFw+2k9gH0TcpETmi/GKHyE/z6RBOK92Q4VZDrw+ZEd495u0QatW2dhnCd6IStjZpHW2SdIyt9Tf8xDnI+vh7DTRviFBThOc9Ha0BrtabcdefN9HK37s2HGTcY=</X509Certificate> </X509Data> </KeyInfo> </Signature> </NFSe> Problemas: O xml com a nota gerada completa contendo o nro da nfse e a chave de acesso por exemplo não foi gerado na pasta "notas". Somente foi gerado o xml de envio na pasta "recibos". O xml de retorno com o nro da nfse e chave não esta sendo tratado pelo componente. Temos que fazer isso manulamente. Espero ter ajudado.
  10. Segundo esse manual a12-moc-danfe-nfcom-anexo-v.pdf a tag: infAdFisco deve ser listada no danfe-com. no teste que fiz no ambiente de homologação, no xml consta a tag infAdFisco conforme imagem abaixo: Porém ao listar o danfcom não imprimiu essa informação. Vou anexar a unit alterada. ACBrNFCom.DANFComRLRetrato.pas
  11. Estou testando a nfcom no ambiente de homologação e mesmo constando no xml gerado a informação do fisco, o mesmo não sai no DanfCom. A única coisa que resolveu foi alterando o fonte ACBrNFCom.DANFComRLRetrato.pas no evento before print do rlbDivisao04 conforme abaixo: procedure TfrlDANFComRLRetrato.rlbDivisao04BeforePrint( Sender: TObject; var PrintIt: Boolean); begin with fpNFCom.Total do begin rllTotalNF.Caption := FormatFloatBr(VNF); rllBaseICMS.Caption := FormatFloatBr(VBC); rllValorICMS.Caption := FormatFloatBr(VICMS); rllDescontos.Caption := FormatFloatBr(VDesc); rllAcessorias.Caption := FormatFloatBr(VOutro); rllValorPIS.Caption := FormatFloatBr(vPIS); rllValorCOFINS.Caption := FormatFloatBr(vCOFINS); rllValorFUST.Caption := FormatFloatBr(vFUST); rllValorFUNTTEL.Caption := FormatFloatBr(vFUNTTEL); end; rlmDadosFisco.Lines.Text := StringReplace(fpNFCom.infAdic.infAdFisco, fpDANFCom.CaractereQuebraDeLinha, #13, [rfReplaceAll]); // ALTEREI AQUI end;
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...
The popup will be closed in 10 segundos...