Ir para conteúdo
  • Cadastre-se

johnbh3

Membros
  • Total de ítens

    703
  • Registro em

  • Última visita

Tudo que johnbh3 postou

  1. Bom dia Alguém também tem enfrentado problemas? Desde sexta feira parado em MG o NFCe
  2. Fiz atualização do acbr e aagora a nfse de BH, começou apresentar este erro. Sabem me diz o que e?
  3. Bom dia Pessoal, Sabem me dizer o motivo do erro? Seria arredondamento? O que estou fazendo de errado? Eu até valide pelo https://www.sefaz.rs.gov.br/nfe/nfe-val.aspx de fato ta com erro neste meu calculo <?xml version="1.0" encoding="UTF-8"?><NFe xmlns="http://www.portalfiscal.inf.br/nfe"><infNFe versao="4.00" Id="NFe31210817183609000146650010000000961265413362"><ide><cUF>31</cUF><cNF>26541336</cNF><natOp>VENDA CONSUMIDOR FINAL/NFCE</natOp><mod>65</mod><serie>1</serie><nNF>96</nNF><dhEmi>2021-08-05T09:37:44-03:00</dhEmi><tpNF>1</tpNF><idDest>1</idDest><cMunFG>3106200</cMunFG><tpImp>4</tpImp><tpEmis>1</tpEmis><cDV>2</cDV><tpAmb>1</tpAmb><finNFe>1</finNFe><indFinal>1</indFinal><indPres>1</indPres><procEmi>0</procEmi><verProc>ACBrNFe</verProc></ide><emit><CNPJ>17183609000146</CNPJ><xNome>INDUSTRIA E COMERCIO FOFINHO EIRELI</xNome><xFant>BISCOITO FOFINHO</xFant><enderEmit><xLgr>RUA SERRANIA</xLgr><nro>135</nro><xBairro>PADRE EUSTAQUIO</xBairro><cMun>3106200</cMun><xMun>BELO HORIZONTE</xMun><UF>MG</UF><CEP>30730532</CEP><cPais>1058</cPais><xPais>BRASIL</xPais><fone>3134626903</fone></enderEmit><IE>0620008780047</IE><CRT>1</CRT></emit><det nItem="1"><prod><cProd>20</cProd><cEAN>SEM GTIN</cEAN><xProd>BISCOITO POLVILHO AO LEITE - KG</xProd><NCM>19053100</NCM><CEST>1705401</CEST><CFOP>5405</CFOP><uCom>KG</uCom><qCom>0.3400</qCom><vUnCom>17.0000000000</vUnCom><vProd>5.78</vProd><cEANTrib>SEM GTIN</cEANTrib><uTrib>KG</uTrib><qTrib>0.3400</qTrib><vUnTrib>17.0000000000</vUnTrib><indTot>1</indTot></prod><imposto><vTotTrib>2.29</vTotTrib><ICMS><ICMSSN500><orig>0</orig><CSOSN>500</CSOSN></ICMSSN500></ICMS></imposto></det><det nItem="2"><prod><cProd>7</cProd><cEAN>SEM GTIN</cEAN><xProd>BISCOITO POLVILHO PALITO - KG</xProd><NCM>19053100</NCM><CEST>1705401</CEST><CFOP>5405</CFOP><uCom>KG</uCom><qCom>0.3000</qCom><vUnCom>17.0000000000</vUnCom><vProd>5.19</vProd><cEANTrib>SEM GTIN</cEANTrib><uTrib>KG</uTrib><qTrib>0.3000</qTrib><vUnTrib>17.0000000000</vUnTrib><indTot>1</indTot></prod><imposto><vTotTrib>2.29</vTotTrib><ICMS><ICMSSN500><orig>0</orig><CSOSN>500</CSOSN></ICMSSN500></ICMS></imposto></det><det nItem="3"><prod><cProd>9</cProd><cEAN>SEM GTIN</cEAN><xProd>BISCOITO PAPA OVO - KG</xProd><NCM>19053100</NCM><CEST>1705401</CEST><CFOP>5405</CFOP><uCom>KG</uCom><qCom>0.2900</qCom><vUnCom>20.0000000000</vUnCom><vProd>5.80</vProd><cEANTrib>SEM GTIN</cEANTrib><uTrib>KG</uTrib><qTrib>0.2900</qTrib><vUnTrib>20.0000000000</vUnTrib><indTot>1</indTot></prod><imposto><vTotTrib>2.69</vTotTrib><ICMS><ICMSSN500><orig>0</orig><CSOSN>500</CSOSN></ICMSSN500></ICMS></imposto></det><det nItem="4"><prod><cProd>71</cProd><cEAN>SEM GTIN</cEAN><xProd>SALGADINHO PIMENTINHA - TRADICIONAL</xProd><NCM>19059090</NCM><CEST>1705401</CEST><CFOP>5405</CFOP><uCom>KG</uCom><qCom>0.1800</qCom><vUnCom>17.0000000000</vUnCom><vProd>3.06</vProd><cEANTrib>SEM GTIN</cEANTrib><uTrib>KG</uTrib><qTrib>0.1800</qTrib><vUnTrib>17.0000000000</vUnTrib><indTot>1</indTot></prod><imposto><vTotTrib>2.29</vTotTrib><ICMS><ICMSSN500><orig>0</orig><CSOSN>500</CSOSN></ICMSSN500></ICMS></imposto></det><total><ICMSTot><vBC>0.00</vBC><vICMS>0.00</vICMS><vICMSDeson>0.00</vICMSDeson><vFCP>0.00</vFCP><vBCST>0.00</vBCST><vST>0.00</vST><vFCPST>0.00</vFCPST><vFCPSTRet>0.00</vFCPSTRet><vProd>19.83</vProd><vFrete>0.00</vFrete><vSeg>0.00</vSeg><vDesc>0.00</vDesc><vII>0.00</vII><vIPI>0.00</vIPI><vIPIDevol>0.00</vIPIDevol><vPIS>0.00</vPIS><vCOFINS>0.00</vCOFINS><vOutro>0.00</vOutro><vNF>19.83</vNF><vTotTrib>9.56</vTotTrib></ICMSTot></total><transp><modFrete>9</modFrete></transp><pag><detPag><tPag>01</tPag><vPag>20.00</vPag></detPag><vTroco>0.17</vTroco></pag></infNFe><infNFeSupl><qrCode><![CDATA[https://nfce.fazenda.mg.gov.br/portalnfce/sistema/qrcode.xhtml?p=31210817183609000146650010000000961265413362|2|1|1|23B2446C9D24AC4137D5C72E97E05BA6A2CCDB38]]></qrCode><urlChave>http://nfce.fazenda.mg.gov.br/portalnfce</urlChave></infNFeSupl><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="#NFe31210817183609000146650010000000961265413362"><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>wJ6WNIHuwTRKflhhMvzUwTO3i+w=</DigestValue></Reference></SignedInfo><SignatureValue>Vozj0Gio6+UtnxLQqF6mmniWEMMfBZcnjtMBAK/KrFihTrJWek0+BEk1x5kIqv5pSz4tyrRXSQPHWWflU/9kfMrRM19QfWYv3jLA6Uepao+4DhmqwagSCYCq2AIjmzKVlxJfvgDYnMH+Fml41QjbMlBllevd3J+4uYlPvhCVmlxml4ZINP1N5glH183CwvBNbmPa3j0fFkhV0yL4ydJe0stqeThmO3JTZygTyxVMxCHETiAZPqaNWMTlgAZLVQ9/Q5dn6B/z6PK2CTuEaXtxLjquagbT6j8+5thZ9ZTv45Gd7arfHQ45iQDhtbXgRzcWXkPRHC1Ye0hahnT+bLZ9VA==</SignatureValue><KeyInfo><X509Data><X509Certificate>MIIHOTCCBSGgAwIBAgIIWGsgCQNnjLowDQYJKoZIhvcNAQELBQAwWTELMAkGA1UEBhMCQlIxEzARBgNVBAoTCklDUC1CcmFzaWwxFTATBgNVBAsTDEFDIFNPTFVUSSB2NTEeMBwGA1UEAxMVQUMgU09MVVRJIE11bHRpcGxhIHY1MB4XDTIwMDkwMzIwMjUwMFoXDTIxMDkwMzIwMjUwMFowgdoxCzAJBgNVBAYTAkJSMRMwEQYDVQQKEwpJQ1AtQnJhc2lsMQswCQYDVQQIEwJNRzEXMBUGA1UEBxMOQmVsbyBIb3Jpem9udGUxHjAcBgNVBAsTFUFDIFNPTFVUSSBNdWx0aXBsYSB2NTEXMBUGA1UECxMOMjQ3ODMzMjkwMDAxMzQxGjAYBgNVBAsTEUNlcnRpZmljYWRvIFBKIEExMTswOQYDVQQDEzJJTkRVU1RSSUEgRSBDT01FUkNJTyBGT0ZJTkhPIEVJUkVMSToxNzE4MzYwOTAwMDE0NjCCASIwDQYJKoZIhvcNAQEBBQADggEPADCCAQoCggEBAJTlw4nPEYFg/V6VETyterR1f3pJ1+g95oAKS8NBSof1RgQuA+hvt/pmywPn5fyo2xFPcVxb+rtrCuLFYrWm5Qhk5APKoG1C6jLmatB0o+ME2AVw6kFiSfQIX+FfPf58EXNg2tMJRx5/LlhecKyEExvNkz4fvkTKD+pg2HRqDSTjjeyeGFrVBhJGdpPyI1DjxLL5mp+O2rPq9pdozJnCy7M/VcCWegtUB8OvgpbUzEFS31F1WBNVRWJL+4/Q2zRZo+6AvsZ4OEpc+ZLTJzLCudln0n4jKtemlzYO8JPYZhx4/Cl1tUYHkT2K+079DLMguWTXbTYyi8MmAs2wdLUM190CAwEAAaOCAoEwggJ9MAkGA1UdEwQCMAAwHwYDVR0jBBgwFoAUxVLtJYAJ35yCyJ9Hxt20XzHdubEwVAYIKwYBBQUHAQEESDBGMEQGCCsGAQUFBzAChjhodHRwOi8vY2NkLmFjc29sdXRpLmNvbS5ici9sY3IvYWMtc29sdXRpLW11bHRpcGxhLXY1LnA3YjCBvAYDVR0RBIG0MIGxgR5mb2ZpbmhvQGJpc2NvaXRvZm9maW5oby5jb20uYnKgIQYFYEwBAwKgGBMWQU5UT05JTyBQSU5UTyBEQSBTSUxWQaAZBgVgTAEDA6AQEw4xNzE4MzYwOTAwMDE0NqA4BgVgTAEDBKAvEy0xMzEyMTkzMzA1NjI3NzQ1NjQ5MDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDCgFwYFYEwBAwegDhMMMDAwMDAwMDAwMDAwMF0GA1UdIARWMFQwUgYGYEwBAgEmMEgwRgYIKwYBBQUHAgEWOmh0dHA6Ly9jY2QuYWNzb2x1dGkuY29tLmJyL2RvY3MvZHBjLWFjLXNvbHV0aS1tdWx0aXBsYS5wZGYwHQYDVR0lBBYwFAYIKwYBBQUHAwIGCCsGAQUFBwMEMIGMBgNVHR8EgYQwgYEwPqA8oDqGOGh0dHA6Ly9jY2QuYWNzb2x1dGkuY29tLmJyL2xjci9hYy1zb2x1dGktbXVsdGlwbGEtdjUuY3JsMD+gPaA7hjlodHRwOi8vY2NkMi5hY3NvbHV0aS5jb20uYnIvbGNyL2FjLXNvbHV0aS1tdWx0aXBsYS12NS5jcmwwHQYDVR0OBBYEFEQpX0L7RI2iQEO7BYazWIMWfiuDMA4GA1UdDwEB/wQEAwIF4DANBgkqhkiG9w0BAQsFAAOCAgEAt3BHXB/K11p+ORI2Slpwx+OiJLUwfX8lLoopTJcPDWWRr/FkWnHU3L7pyXYlL3tc5kcuLewzt+zHvyUh1rV/20EvZ2V6JLzn1dFS21kx/Nx+sd5ohyiXQ7tOHmrpX0v+8xiGvyCk6fS+ltq2/yY5L6CcIeVaik6u7VDh5rRbRtrtgltpQOnuMqm9DBoxbTgyIJlRKKYgX4j1dnesn4uDK6k9uel8sIsxd/B9l5rOL1uEEGF7psSWDXVxBXA4ExYL6jTPbbNcrV88NZdJ+37/lG5ETCZd354Uq4kAZIhz1S2IJxQ+RTtnqeFxW2qDjnhI6ynpfoDOG/n2bh9y/Goi/JpFENwo4ShzyMsbdKFmaOJIBzvBoQgDWrUg8a9ZUZfJjZ7y40cdHx3SUVKwunodWqRRHCjFEkkMKQoPW4YgwGOoQLh3gpAfSBstMUwQZy37WiikxkM3kQY2AbtNJerjJ61bOITwSXDh+bZSOZjNdrQq9wvIiCbaW53z4BhEeQ2PiSRboEi5uuIZsfidssr3umy2mXxK9rGPd79JAe2MI1TEJSBnCZl2JkycutmGzRMcddLQj2nYbZtf0c3SO2dWtCUgBNRBW+t7uD0XZz7F77TD/OOHZGSUe0d+7qm0IPg0qzVcHfc9xTBAIdilgAxNOmSmhcweOLwuI5HUZe+DRCc=</X509Certificate></X509Data></KeyInfo></Signature></NFe> Fiz os caculos no excel, me parece ser um erro no sistema com quantidade com 3 casas decimais.
  4. Bom dia {"nomeBeneficiario":"PERFILSIS DESENVOLVIMENTO DE SOFTWA","cnpjCpfBeneficiario":"08030107000194","tipoPessoaBeneficiario":"JURIDICA","dataHoraSituacao":"15\/07\/2021 00:00","codigoBarras":"07796869600000010000001112050675100701552434","linhaDigitavel":"07790001161205067510207015524346686960000001000","dataVencimento":"29\/07\/2021","dataEmissao":"14\/07\/2021","seuNumero":"6","valorNominal":10.00,"nomePagador":"BIO MOVEIS E DECORACOES LTDA","emailPagador":"[email protected]","dddPagador":"11","telefonePagador":"44363936","tipoPessoaPagador":"JURIDICA","cnpjCpfPagador":"01281218000124","codigoEspecie":"OUTROS","dataLimitePagamento":"27\/09\/2021","valorAbatimento":0.00,"situacaoPagamento":"BAIXADO","situacao":"PAGO","mensagem":{"linha1":"MULTA DE 3,50 E JUROS DE 0,25 AO DIA APÓS O VENCIMENTO","linha2":"Nosso whatsapp (31) 98856-1070 - nosso site www.perfilsistemas.com.br","linha3":"Boleto emitido através do software GestãoClick - www.gestaoclick.com.br","linha4":"","linha5":""},"desconto1":{"codigo":"NAOTEMDESCONTO","taxa":0.00,"valor":0.00},"desconto2":{"codigo":"NAOTEMDESCONTO","taxa":0.00,"valor":0.00},"desconto3":{"codigo":"NAOTEMDESCONTO","taxa":0.00,"valor":0.00},"multa":{"codigo":"VALORFIXO","data":"2021-07-30","taxa":0.00,"valor":3.50},"mora":{"codigo":"VALORDIA","data":"2021-07-30","taxa":0.00,"valor":0.25},"valorTotalRecebimento":10.00} Estou tentando ler este JSON. Quando eu tenho mais de um NO eu consigo ler os dados do JSON. Eu agora estou precisando pegar a situação do boleto que neste JSON esta como pago. Tudo tento fazer como se fosse um JSON simples sem no da acess violation Alguém pode me ajudar com pego a situação do boleto? Pessoal, Deu certo aqui fiz isto var js:TJSONObject; begin js:=TJSONObject(TJSONObject.ParseJSONValue(Memo1.Text)); if js<>nil then begin ShowMessage(TJSONArray(js.Values['situacao']).ToString);
  5. Resolvido! Era versão do FB de fato diferente do compilado pelo app
  6. Agora a conexão funcionou porem no programa compilado da o erro: hint: check it in the path or applicaition exe direcictory, and has x64 bitness Como se fosse versão de firebird incompativel mas isto não fazer menor sentido, peguei as dll da pasta bin do firebird C:\Program Files (x86)\Firebird\Firebird_2_5\bin e joguei no diretório do aplicativo e erro permanece Mas pra tentar resolver fui no site do firebird instalei a versão 64 bits, dai na IDE deu erro e no aplicativo não deu erro. Com Delphi 2009 não tenho essa zica kkk
  7. Olá, Boa noite, Pessoal estou usando fireday delphi rio O que esta acontecendo? Dando o erro: Error: [FireDAC][Phys][FB]-314. Cannot load vendor library [C:\Program Files (x86)\Firebird\Firebird_2_5\bin\bin\C:\Program Files (x86)\Firebird\Firebird_2_5\bin\fbclient.dll]. Não foi possível encontrar o módulo especificado Hint: check it is in the PATH or application EXE directories, and has x86 bitness. Failed to load DBMS client ! Já coloquei o fbclient.dll em tudo quanto e pasta que vocês possam imagem. Da erro tanto em tempo de educação e desenvolvimento conforme print. No componente: FDPhysFBDriverLink1 coloquei o caminho onde esta a dll de instalação do FB na pasta bin Já coloquei esta dll na pasta bin do delphi, do windows, de forma alguma funciona. INfelizmente não consegui anexar imagem aqui, a imagem tem 160 KB. Database=D:\Sistemas\GFinance\Dados\DADOS.FDB User_Name=SYSDBA Password=masterkey Port=3050 DriverID=FB Server=127.0.0.1 Protocol=TCPIP
  8. Pessoal conseguem me ajudar na leitura deste json? Quero pegar os dados do boleto na tab content {"totalPages":1,"totalElements":6,"numberOfElements":6,"last":true,"first":true,"size":20,"summary":{"recebidos":{"quantidade":1,"valor":10.00},"previstos":{"quantidade":2,"valor":20.00},"baixados":{"quantidade":3,"valor":179.90},"expirados":{"quantidade":0,"valor":0}},"content":[{"nossoNumero":"00701439376","seuNumero":"1","cnpjCpfSacado":"12342","nomeSacado":"JULIO CEZAR MARTINS DE SOUZA","codigoBaixa":"FALTADESOLUCAO","situacao":"BAIXADO","dataPagtoBaixa":"14/07/2021","dataVencimento":"28/07/2021","valorNominal":90.00,"telefone":"","email":"[email protected]","dataEmissao":"14/07/2021","dataLimite":"26/09/2021","linhaDigitavel":"07790001161205067510207014393768186950000009000","valorJuros":25.00,"valorMulta":3.50,"desconto1":{"codigo":"NAOTEMDESCONTO","taxa":0.00,"valor":0.00},"desconto2":{"codigo":"NAOTEMDESCONTO","taxa":0.00,"valor":0.00},"desconto3":{"codigo":"NAOTEMDESCONTO","taxa":0.00,"valor":0.00},"multa":{"codigo":"VALORFIXO","data":"2021-07-29","taxa":0.00,"valor":3.50},"mora":{"codigo":"VALORDIA","data":"2021-07-29","taxa":0.00,"valor":25.00},"valorAbatimento":0.00},{"nossoNumero":"00701481691","seuNumero":"3","cnpjCpfSacado":"12232","nomeSacado":"ROGERIO TADEU COSTA DE OLIVEIRA","codigoBaixa":"FALTADESOLUCAO","situacao":"BAIXADO","dataPagtoBaixa":"14/07/2021","dataVencimento":"27/07/2021","valorNominal":79.90,"telefone":"","email":"[email protected]","dataEmissao":"14/07/2021","dataLimite":"25/09/2021","linhaDigitavel":"07790001161205067510207014816917586940000007990","valorJuros":0.25,"valorMulta":3.50,"desconto1":{"codigo":"NAOTEMDESCONTO","taxa":0.00,"valor":0.00},"desconto2":{"codigo":"NAOTEMDESCONTO","taxa":0.00,"valor":0.00},"desconto3":{"codigo":"NAOTEMDESCONTO","taxa":0.00,"valor":0.00},"multa":{"codigo":"VALORFIXO","data":"2021-07-28","taxa":0.00,"valor":3.50},"mora":{"codigo":"VALORDIA","data":"2021-07-28","taxa":0.00,"valor":0.25},"valorAbatimento":0.00},{"nossoNumero":"00701550032","seuNumero":"1","cnpjCpfSacado":"122211","nomeSacado":"JOHN","codigoBaixa":"FALTADESOLUCAO","situacao":"BAIXADO","dataPagtoBaixa":"14/07/2021","dataVencimento":"24/07/2021","valorNominal":10.00,"telefone":"","email":"","dataEmissao":"14/07/2021","dataLimite":"22/09/2021","linhaDigitavel":"07790001161205067510207015500320686910000001000","valorJuros":0.00,"valorMulta":0.00,"desconto1":{"codigo":"NAOTEMDESCONTO","taxa":0.00,"valor":0.00},"desconto2":{"codigo":"NAOTEMDESCONTO","taxa":0.00,"valor":0.00},"desconto3":{"codigo":"NAOTEMDESCONTO","taxa":0.00,"valor":0.00},"multa":{"codigo":"NAOTEMMULTA","taxa":0.00,"valor":0.00},"mora":{"codigo":"ISENTO","taxa":0.00,"valor":0.00},"valorAbatimento":0.00},{"nossoNumero":"00701552434","seuNumero":"6","cnpjCpfSacado":"1232","nomeSacado":"BIO MOVEIS E DECORACOES LTDA","situacao":"PAGO","dataPagtoBaixa":"15/07/2021","dataVencimento":"29/07/2021","valorNominal":10.00,"valorTotalRecebimento":10.00,"telefone":"1144363936","email":"[email protected]","dataEmissao":"14/07/2021","dataLimite":"27/09/2021","linhaDigitavel":"07790001161205067510207015524346686960000001000","valorJuros":0.25,"valorMulta":3.50,"desconto1":{"codigo":"NAOTEMDESCONTO","taxa":0.00,"valor":0.00},"desconto2":{"codigo":"NAOTEMDESCONTO","taxa":0.00,"valor":0.00},"desconto3":{"codigo":"NAOTEMDESCONTO","taxa":0.00,"valor":0.00},"multa":{"codigo":"VALORFIXO","data":"2021-07-30","taxa":0.00,"valor":3.50},"mora":{"codigo":"VALORDIA","data":"2021-07-30","taxa":0.00,"valor":0.25},"valorAbatimento":0.00},{"nossoNumero":"00702246168","seuNumero":"2","cnpjCpfSacado":"13232","nomeSacado":"TAMARA DE OLIVEIRA","situacao":"EMABERTO","dataVencimento":"26/07/2021","valorNominal":10.00,"telefone":"","email":"","dataEmissao":"16/07/2021","dataLimite":"24/09/2021","linhaDigitavel":"07790001161205067510207022461680486930000001000","valorJuros":0.00,"valorMulta":0.00,"desconto1":{"codigo":"NAOTEMDESCONTO","taxa":0.00,"valor":0.00},"desconto2":{"codigo":"NAOTEMDESCONTO","taxa":0.00,"valor":0.00},"desconto3":{"codigo":"NAOTEMDESCONTO","taxa":0.00,"valor":0.00},"multa":{"codigo":"NAOTEMMULTA","taxa":0.00,"valor":0.00},"mora":{"codigo":"ISENTO","taxa":0.00,"valor":0.00},"valorAbatimento":0.00},{"nossoNumero":"00702254972","seuNumero":"4","cnpjCpfSacado":"32323","nomeSacado":"JULIO CEZAR MARTINS DE SOUZA","situacao":"EMABERTO","dataVencimento":"18/07/2021","valorNominal":10.00,"telefone":"","email":"","dataEmissao":"16/07/2021","dataLimite":"16/09/2021","linhaDigitavel":"07790001161205067510207022549724386850000001000","valorJuros":0.00,"valorMulta":0.00,"desconto1":{"codigo":"NAOTEMDESCONTO","taxa":0.00,"valor":0.00},"desconto2":{"codigo":"NAOTEMDESCONTO","taxa":0.00,"valor":0.00},"desconto3":{"codigo":"NAOTEMDESCONTO","taxa":0.00,"valor":0.00},"multa":{"codigo":"NAOTEMMULTA","taxa":0.00,"valor":0.00},"mora":{"codigo":"ISENTO","taxa":0.00,"valor":0.00},"valorAbatimento":0.00}]} Até usei peguei este codigo no stackoverflow e pra mim ele não funcionou. procedure ParseJSON(JSONText:String); var js:TJSONObject; jDadosPedido:TJSONObject; jFormapagto:TJSONObject; IDFormapagto:string; jArrFormapagto:TJSONArray; iter:integer; begin js:=TJSONObject(TJSONObject.ParseJSONValue(JSONText)); if js<>nil then begin jDadosPedido:=TJSONObject(js.Values['dadospedido']); if jDadosPedido<>nil then begin jArrFormapagto:=TJSONArray(jDadosPedido.Values['formapagto']); for iter := 0 to jArrFormapagto.Count-1 do begin jFormapagto:=TJSONObject(jArrFormapagto.Items[iter]); IDFormapagto:=jFormapagto.Values['ID'].Value; end; end; js:=nil; end; end;
  9. Obrigado pela resposta!
  10. johnbh3

    ACBR boleto banco inter?

    ACBR boleto banco inter esta disponivel no ACBR? Eles tem um manual. Não consegui postar aqui Segue link https://static.bancointer.com.br/openbanking/cnab/manual/manual.pdf
  11. Olá, Eu fiz a configuração indicada, o erro HTTP: 400 continuou aparecendo. Só funcionou após mudar pra essa configuração da print. nunca usei esta configuração, completamente incomum pra mim em 3 anos de aCBR
  12. Eu vi aqui como passar direito, vou testar la e reporto.
  13. bom dia Ítalo, desculpe incomodar. Mas como eu faço isso? O problema são os erros estranho de HTTP: 400. Mas vou fazer isso que você sugeriu, porque acho que no caso do server, embora eu ache que o o erro HTTP: 400 vai acontecer apos eu fazer isso. Enfim estou chutando que o erro certificado não encontrado ocorre antes do HTTP: 400. Portando pode acontecer ele apos encontrar o ceriticado. Mas não custa tentar ne. Como eu seto pra pegar o arquivo direto, me parece uma alternativa interessante pra testar.
  14. boa tarde, Pessoal estou com uma dor de cabeça sem entender. Tenho um cliente onde o parque deles maioria dos micros são windows 7 (Nenhum funciona) Tem um micro com windows 10 funciona normalmente a emissão da nfse Eles tem um servidor Windows serve 2012. Da um erro tanto no windows server como no windows7. No meu micro de desenvolvimento também funciona normalmente. Erro HTTP: 400 URL: https://producao.ginfes.com.br/ServiceGinfesImpl Nem se eu copiar a pasta do Windows 10 que funciona este erro desaparece. Ai tentamos usar uma solução rdp (Ocorre uma coisa estranha) um botão que tem a função - ACBrNFe1.SSL.SelecionarCertificado lista todos ceriticados no micro, uso ACBr a mais de 5 anos. Nunca aconteceu isto, ele lista uma carga de certificado vencidos que nem instalados estão mais no micro. Quando se abre o internet explorer pra conferir os certificados instalados, estão certificados validos e dentro da validade, onde tem 10 certificados, e no sistema mostra apenas 2 vencidos, eu não faço ideia de onde esta tirando isto, só acontece quando tento usar o sistema via RDP. Por fim tentamos usar diretamente no Windows server 2012 e onde ocorre o mesmo erro do windows 7 (Erro HTTP: 400 URL: https://producao.ginfes.com.br/ServiceGinfesImpl ) Sistema completamente atualizado, fontes do ACBr, ja mechi em tudo que era orientação antiga no internet explorer de TLS, windows 7 original, windows server também, tentei de um tudo nas configurações LT_TLSv1_2, LT_all, etc. Uso o sistema de NFSe com windows 10 em outro cliente, eu mesmo uso pra emitir minhas notas fiscais. No windows server via RDP o erro já e certificado não encontrado pelo relato acima de carregar certificados que nem estão mais na máquina. Então e provável que possa acontecer o mesmo http 400, mas como nem encontra o certificado ele da erro de certificado não encontrado.
  15. Resolvido !
  16. johnbh3

    FastReport v6 com ACBR

    Ola Bom dia pessoal, estou querendo instalar o FastReport v6.3.7 no Delphi 2009. Atualmente uso a versão 4. Queria saber se o ACBR funciona nesta versão 6.
  17. johnbh3

    Erro HTTP: 400

    Eu fiz finalmente um teste no windows no parque do cliente. Então o problema só pode ser windows 7.
  18. johnbh3

    Erro HTTP: 400

    Pra mim isto não resolveu
  19. johnbh3

    Erro HTTP: 400

    Bom dia Pessoal, estou com um erro num usuario que começou inesperadamente a 3 dias. Erro HTTP: 400 URL: https://producao.ginfes.com.br/ServiceGinfesImpl Este erro ocorre na NFSe de contagem, ma mudeou TLS_ALL, já mudei tudo possível em em - SSLXmlSignLib Lá esta com Windows 7 Sabem me dizer se foi modificado o endereço de comunicação? ou e falha por ser windows 7?
  20. johnbh3

    Erro SSL em Minas Gerais

    Olá Bom dia Hoje pela manhã e ontem, mas mais hoje pela manha alguns casos de SSL no envio da NFe. Observei que são são usuarios com windows 8 O erro começou inesperamente
  21. Pessoal, bom dia Um cliente esta questionando que deve sair o ICMS ST retido na fonte. Ele e do simples nacional e esta colocando CSONS: 500 - ICMS ST cobrado anteriormente por ST Eu estou colocando essas informações nos campos vBCSTRet :=SP_TabPROD_NFVBCSTRET.AsFloat; pST :=SP_TabPROD_NFpST.AsFloat; vICMSSubstituto:=SP_TabPROD_NFvICMSSubstituto.AsFloat; vICMSSTRet :=SP_TabPROD_NFvICMSSTRet.AsFloat; -<ICMSSN500> <orig>0</orig> <CSOSN>500</CSOSN> </ICMSSN500> No XML esta assim. O que estou fazendo de errado? a PROPRIEDADE: ACBrNFe1.Configuracoes.Geral.ForcarGerarTagRejeicao938:=fgtSempre JÁ coloquei pra fgtSempre
  22. Ola Favor encerrar o post. Foi erro meu !
  23. Ola Boa tarde Na NFe estou. Todas condições de pagamento que eu informo. Sai uma com valor zero. Mas eu não programei isto. Até dei um um clear nos pagamento antes de iniciar. Estranhamente, ele gera as cobranças certinho e na tag DetPag gera as 3 condições que eu informei e por ultimo gera uma com valor zerado. O forum não me deixar anexar a imagem esta com apenas 41 sem permissão. Mas anexei o XML -<pag> -<detPag> <tPag>15</tPag> <vPag>8.33</vPag> </detPag> -<detPag> <tPag>15</tPag> <vPag>8.33</vPag> </detPag> -<detPag> <tPag>15</tPag> <vPag>8.34</vPag> </detPag> -<detPag> <tPag>01</tPag> <vPag>0.00</vPag> 31200210918477000104550010000051191881998807-nfe.xml
  24. Eu fiz uma conversão da hora para segundos aparentemente vai resolver. TimeA:=(SecondsBetween(data1,data2)) TimeB:=ScondsBetween(HoraDiaria),StrToTime('00:00:00')) Resto:=TimeA mod TimeB; Depois usei esta função function SecondToTime( Segundos : Cardinal ) : String; var Seg, Min, Hora: Cardinal; begin Hora := Segundos div 3600; Seg := Segundos mod 3600; Min := Seg div 60; Seg := Seg mod 60; Result := FormatFloat(',00', Hora) + ':' + FormatFloat('00', Min) + ':' + FormatFloat('00', Seg); end; Converti o segundos por hora
×
×
  • 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...