Paulo C. L. Vicente

Boa tarde. Após atualização(não sei exatamente de qual dia) passou a ocorrer mensagem de erro out of memory no componente ACBrNFSe ao carregar o XML de Curitiba. unit ACBrNFSeNotasFiscais function TNotasFiscais.LoadFromString function PosRPS pelos teste que fiz faltou inicializar a variável de retorno da função function PosRPS(AProvedor: TnfseProvedor): Integer; begin Result := 0; TamTAG := 5; if (VersaoNFSe < ve200) and (AProvedor <> proAgili) then begin ... Ao acrescentar a linha para inicializar o Result resolveu. Att Paulo C. L. Vicente

Boa tarde. No dia 07/04(data que tenho) foi feita uma alteração no arquivo DSFSJC.ini Layout=ABRASFv1 VersaoDados=1.00 VersaoXML=1.00 NameSpace=http://www.abrasf.org.br/nfse.xsd Cabecalho=1 Dados=1 Com essa versão está sendo gerado lote com o cabeçalho <?xml version="1.0" encoding="utf-8"?> <ns3:EnviarLoteRpsEnvio xmlns:ns3="http://www.abrasf.org.br/nfse.xsd" xmlns:ns4="http://www.abrasf.org.br/nfse.xsd/nfse.xsd"> E há erro de validação 1871 - Element '{http://www.abrasf.org.br/nfse.xsd/nfse.xsd}NumeroLote': This element is not expected. Expected is ( {http://www.abrasf.org.br/nfse.xsd}NumeroLote ). Com a versão anterior do arquivo DSFSJC.ini [XML] Layout=ABRASFv1 VersaoDados=1.00 VersaoXML=1.00 NameSpace=http://www.abrasf.org.br/ Cabecalho=1 Dados=1 Gera o lote com o cabeçalho <?xml version="1.0" encoding="utf-8"?> <ns3:EnviarLoteRpsEnvio xmlns:ns3="http:/www.abrasf.org.br/nfse.xsd" xmlns:ns4="http:/www.abrasf.org.br/nfse.xsd"> E o lote é validado sem erros. Obrigado! Paulo C. L. Vicente

Bom dia. Testei hoje e o PDF gerado permite selecionar as informações normalmente. Já faz um bom tempo que não há alterações na rotina em questão. Não encontrei uma explicação nem para o início e nem para o termino do problema. Obrigado pela atenção.

Boa tarde. Aceito as considerações e orientações de todos. Ajudam e são bem vindas. Obrigado.

Boa tarde. Tenho acompanhado esse desafio da comunicação com a Prefeitura de Blumenau, agradeço a todos pelo empenho em buscar uma solução. Devido a estrutura que tenho, com três etapas separadas, peço indicar nos ambientes de produção e de homologação, quais métodos usar para: gerar o lote enviar o lote consultar o processamento do lote Obrigado.

Bom dia Estou usando o ACBrBoletoFCFR a partir de ACBrBoleto.GerarPDF Obrigado.

Boa tarde. O PDF que gero com o ACBrBoleto não permite marcar com o mouse e copiar informações. Estou fazendo algo errado? Alguma configuração para gerar um PDF que permita a cópia das informações da linha digitável? Obrigado!

Bom dia Emerson Concordo que a posição padrão(posição 38 a 62) usada na maioria das implementações não seja obrigatória, você tem razão em dizer que importante é enviar e receber a mesma informação. A diferença ocorre na medida em que a propriedade SeuNumero se refira a identificação do título na empresa que na maioria das implementações tem 25 caracteres e no manual do Banco Safra tenha 10 caracteres conforme imagem que você enviou anteriormente. O que é descrito como identificação do título na empresa(ou algo parecido) em outros bancos, no manual do Banco Safra está descrito como: uso exclusiva da empresa. A atribuição de nome, neste caso, causa confusão. Por esse motivo entendo que a versão que está no repositório segue o padrão das demais implementações e no meu entendimento deve ser mantida. Obrigado

Boa tarde Juliana. Eu não verifiquei todos os implementados, verifiquei os que tinha manual em mãos e somente da CEF havia uma diferença de posição. Mas me disponho a fazer um levantamento e postar o resultado, se me indicar um local onde encontro os manuais das implementações no ACBrBoleto. Obrigado.

Boa tarde Há um problema criado em função da atribuição de nome que cada banco dá a informação da posição 38 a 62. Nesta posição em vários manuais que consultei, os registros detalhe de remessa e retorno tem a descrição: uso exclusivo da empresa ou número de controle do participante ou identificação do título para o cedente ou algo parecido. Há várias implementações no ACBrBoleto em que esta posição é identificada como SeuNumero. Esta informação quando enviada no arquivo de remessa se mantém inalterada e consta no arquivo de retorno na mesma posição. Isto permite uma busca precisa no banco de dados ao fazer o processamento do retorno, a baixa ou qualquer outro ajuste dos recebimentos. Além de permitir saber inclusive visualmente(porque não estaria preenchida) se a remessa foi gerada pelo projeto em que atuamos. Como me baseio na informação da posição 38 a 62 para processar o retorno tenho que fazer nova leitura do arquivo de retorno logo após usar o método LerRetorno para forçar a atribuição do conteúdo nos bancos que não seguem o padrão de nome e posição para SeuNumero. Claro que dependo de SeuNumero ter tamanho de 25 e ter sido enviado na posição 38 a 62 no arquivo de remessa. Gostaria de propor que, independente do nome que o banco use no manual, SeuNumero estivesse sempre na posição 38 a 62 de maneira que seja possível atribuir conteúdo a essa propriedade para gerar a remessa e consultar essa propriedade no retorno para obter a mesma informação. Caso a idéia seja aceita estou a disposição para ajudar. Obrigado.

Boa tarde Emerson. Olhando o manual entendo seu argumento. O problema acaba sendo como cada manual identifica a informação SeuNumero. Criei um novo tópico para que isso possa ser avaliado. Obrigado.

Bom dia. Por exemplo na geração do registro 400 dos bancos Bradesco, Banco do Brasil, Caixa e Santander o campo SeuNumero é gerado na posição 38 a 62 e o campo NumeroDocumento na posição 111 a 120. Então seguindo este padrão, o que estaria invertido é na geração do registro 400 e consequentemente no retorno do banco Safra deste arquivo enviado pelo Emerson. Obrigado.

Bom dia. Também continuo com o erro de assinatura. Caso alguém consiga um XML aceito por favor compartilhe. Obrigado.

Bom dia Recebi esta mensagem de erro ao enviar lote para Blumenau/SC 1845 - Element '{http://nfse.blumenau.sc.gov.br}EnviarLoteRpsEnvio': No matching global declaration available for the validation root. Fiz uma pesquisa e os últimos tópicos são de agosto. Houve alteração no WebService para o padrão ABRASF versão 2.3 dia 16/09 Documentação https://blumenau.simplissweb.com.br/contrib Peço apoio para tratar a questão Obrigado. MM2000004-NFSeAssinada.xml

Bom dia. Na procedure GerarRegistroTransacao400 Foi feita alteração de PadRight(SeuNumero, 25, ' ') + // 38 a 62 - Uso exclusivo da Empresa para Space(25) + // Uso exclusivo da Empresa Isto faz uma diferença muito grande para nosso projeto porque usamos preferencialmente essa informação no retorno para fazer a baixa dos recebimentos. Por isso peço que essa linha fique como estava antes da atualização. Obrigado.

Depois atualizar os fontes com as alterações liberadas pelo Italo o XML passou a ser aceito pela WebService. Agora é questão de ajuste no preenchimento de algumas TAGs. Muito obrigado pela paciência e boa vontade de todos.

Com esta alteração parou de gerar o lote. Ainda não encontrei a combinação de alterações necessárias.

Isso está parecendo cobertor curto. Usando os schemas do repositório do ACBr da pasta DSFSJC gera o XML mas não aceita no WebService da Prefeitura. <xsd:schema xmlns:xsd="http://www.w3.org/2001/XMLSchema" targetNamespace="http://www.abrasf.org.br/nfse.xsd" xmlns="http://www.abrasf.org.br/nfse.xsd" xmlns:dsig="http://www.w3.org/2000/09/xmldsig#" attributeFormDefault="unqualified" elementFormDefault="qualified"> Erro: Arquivo em desacordo com o XML Schema. Usando os schemas repassados pelo Alessandro que deveria ser aceito no WebService não gera o XML <xsd:schema xmlns:xsd="http://www.w3.org/2001/XMLSchema" targetNamespace="http:/www.abrasf.org.br/nfse.xsd" xmlns="http:/www.abrasf.org.br/nfse.xsd" xmlns:dsig="http://www.w3.org/2000/09/xmldsig#" attributeFormDefault="unqualified" elementFormDefault="qualified"> Erro: 1845 - Element '{http://www.abrasf.org.br/nfse.xsd}EnviarLoteRpsEnvio': No matching global declaration available for the validation root. Aceito sugestões. Obrigado.

Boa tarde. Quem conseguiu gerar uma NFSe poderia, por favor, responder com um RPS aceito. Obrigado.

Bom dia. Pelo menos desde 21/02, o método TProcNFe.GerarXML está gerando as TAGs cMsg e xMsg. Não vejo problema nisso, mas tenho clientes cujo sistema de contabilidade está recusando o XML com o argumento de que a NT 2018.005 só vai entrar em produção em 29/04. Para datas de emissão anteriores a 29/04 estou removendo estas TAGs ao enviar o XML para contabilidade, então é só para informar que passei por este problema. Obrigado!

Bom dia. Atuo num projeto de ERP e conforme demanda disponibilizamos uma fatia significativa dos módulos de assistência técnica, estoque, faturamento e contratos na web. A solução foi: Delphi + Intraweb + bootstrap + html + css + javascript. Foram necessárias algumas semanas de muito estudo, tentativas, erros e frustrações até migrar do meu habitual conceito VCL para o conceito Web. O resultado apareceu de fato, depois que fiz o curso de Intraweb do Marcelo Giratto (https://marcelogirattocursos.com.br/). Como se não bastasse obter as funcionalidades e o visual desejado, ainda pude aproveitar o código VCL que não usa componentes visuais, com pequenas alterações alterações para compilação condicional nos fontes, que acelerou muito o desenvolvimento. É possível por exemplo gerar, visualizar e fazer download de boleto bancário usando o ACBrBoleto. Iniciamos o desenvolvimento em dezembro de 2017 e o portal está em produção desde março de 2018. Se alguém tivesse solicitado algo próximo do resultado atual a resposta seria: não é possível. Hoje oferecemos como valor agregado ao ERP, um portal Web responsivo, que pode ser acessado via browser em dispositivos que rodam windows, linux, android, ios e não precisa de instalação nem atualização no lado cliente. Abraços Paulo C. L. Vicente

Bom dia Segue manual que usei como referência. Att. Safra CNAB400 2017.pdf

Bom dia. Encaminho em anexo, para avaliação, unit do Banco Safra com alterações que fiz para que o arquivo de remessa fosse homologado na conta de cobrança de um cliente. Costumo usar para comparar os fontes o TextDiff http://www.angusj.com/delphi/diff.zip Att Paulo C. L. Vicente ACBrBancoSafra.alterado.pas

Boa tarde. Esse erro foi desgastante para contornar: O atributo 'Algorithm' tem valor 'http://www.w3.org/2001/04/xmldsig-more#rsa-sha256' que não corresponde ao valor fixo 'http://www.w3.org/2000/09/xmldsig#rsa-sha1' no DTD ou no esquema. Ocorria em computadores com Windows 10 versão de 32 bits. Só uso certificado A1. Estes arquivos mantenho numa pasta compartilhada no servidor: fbclient.dll gds32.dll msvcm80.dll msvcp80.dll msvcr80.dll capicom.dll iconv.dll inpout32.dll libeay32.dll libxml2.dll libxmlsec-openssl.dll libxmlsec.dll libxslt.dll msvcr71.dll msxml5.dll msxml5r.dll ssleay32.dll zlib1.dll Não instalo o sistema nas estações, acesso através da rede. Não uso o instalador do Firebird nas estações. Nas estações, copio para a pasta System32 ou SysWOW64 e registro: capicom.dll msxml5.dll msxml5r.dll Durante o problema estava usando esta configuração: ACBrNFe1.Configuracoes.Geral.SSLLib := libWinCrypt; ACBrNFe1.Configuracoes.Geral.SSLCryptLib := cryWinCrypt; ACBrNFe1.Configuracoes.Geral.SSLHttpLib := httpWinHttp; ACBrNFe1.Configuracoes.Geral.SSLXmlSignLib := xsMsXml; ACBrNFe1.SSL.SSLType := LT_TLSv1_2; No meu caso foi resolvido usando esta configuração: ACBrNFe1.Configuracoes.Geral.SSLLib := libOpenSSL; ACBrNFe1.Configuracoes.Geral.SSLCryptLib := cryOpenSSL; ACBrNFe1.Configuracoes.Geral.SSLHttpLib := httpOpenSSL; ACBrNFe1.Configuracoes.Geral.SSLXmlSignLib := xsXmlSec; ACBrNFe1.SSL.SSLType := LT_ALL; Abraços Paulo C. L. Vicente

Em função do exposto pelo juliomazoni, semelhante ao que já é feito para geração de outros grupos de impostos, minha sugestão para gerar o grupo ICMSUFDest somente quando necessário: procedure TNFeW.GerarDetImpostoICMSUFDest(const i: Integer); begin if (nfe.Det[i].Imposto.ICMSUFDest.vBCUFDest > 0) or (nfe.Det[i].Imposto.ICMSUFDest.pICMSInter > 0) or (nfe.Det[i].Imposto.ICMSUFDest.pICMSInterPart > 0) then begin Gerador.wGrupo('ICMSUFDest', 'NA01'); Gerador.wCampo(tcDe2, 'NA03', 'vBCUFDest', 01, 15, 1, nfe.Det[i].Imposto.ICMSUFDest.vBCUFDest, DSC_VBCUFDEST); Gerador.wCampo(IIf(Usar_tcDe4,tcDe4,tcDe2), 'NA05', 'pFCPUFDest', 01, IIf(Usar_tcDe4,07,05), 1, nfe.Det[i].Imposto.ICMSUFDest.pFCPUFDest, DSC_PFCPUFDEST); Gerador.wCampo(IIf(Usar_tcDe4,tcDe4,tcDe2), 'NA07', 'pICMSUFDest', 01, IIf(Usar_tcDe4,07,05), 1, nfe.Det[i].Imposto.ICMSUFDest.pICMSUFDest, DSC_PICMSUFDEST); // Alterado para ficar em conformidade com o novo Schema Gerador.wCampo(tcDe2, 'NA09', 'pICMSInter ', 01, 05, 1, nfe.Det[i].Imposto.ICMSUFDest.pICMSInter, DSC_PICMSINTER); Gerador.wCampo(IIf(Usar_tcDe4,tcDe4,tcDe2), 'NA11', 'pICMSInterPart', 01, IIf(Usar_tcDe4,07,05), 1, nfe.Det[i].Imposto.ICMSUFDest.pICMSInterPart, DSC_PICMSINTERPART); Gerador.wCampo(tcDe2, 'NA13', 'vFCPUFDest ', 01, 15, 1, nfe.Det[i].Imposto.ICMSUFDest.vFCPUFDest, DSC_VFCPUFDEST); Gerador.wCampo(tcDe2, 'NA15', 'vICMSUFDest ', 01, 15, 1, nfe.Det[i].Imposto.ICMSUFDest.vICMSUFDest, DSC_VICMSUFDEST); Gerador.wCampo(tcDe2, 'NA17', 'vICMSUFRemet', 01, 15, 1, nfe.Det[i].Imposto.ICMSUFDest.vICMSUFRemet, DSC_VICMSUFREMET); Gerador.wGrupo('/ICMSUFDest'); end; end;