Pedro A. Araújo

Prezados Seguem os arquivos para análise. Foi realizada uma correção no processamento do arquivo por parte do banco, por isso a demora. Observação: a identificação do título (nosso número) será gerada pelo banco e informada através do arquivo de retorno. A impressão poderá ser feita também pelo internet banking do Inter. ACBrBancoInter.pas ACBrBoleto.pas Alimente o componente com a instrução abaixo: ACBrBoleto1.NomeArqRemessa := 'CI400_001_' + FormatFloat('0000000', NumeroRemessa) + '.rem';

O método LerXML estava buscando TAGs não existentes no retorno do provedor IPM, fazendo com que o ACBrNFSe.ConsultarNFSeporRps sempre retornasse falso, consequentemente, sem código de autorização e sem número da nota emitida. Obrigado. Já está no nosso roadmap a migração para o novo componente. Realizarei os testes e possíveis correções.

Prezados Segue o arquivo com ajustes em TRetornoNFSe.LerXml, mais especificamente na leitura do retorno do provedor IPM. pnfsLerListaNFSe.pas

Estou aguardando o retorno por parte do suporte do Banco Inter, pois está ocorrendo um erro interno no processamento do arquivo. Assim que for concluído, compartilharei os fontes.

Bom dia! Tente aumentar o timeout da comunicação com a SEFAZ. Realmente a SEFAZ está passando por instabilidade nos últimos dias.

Este vídeo ensina a instalar o ACBr no Lazarus:

Você precisa baixar o repositório pelo SVN e compilar as DLLs utilizando o Lazarus. Caso deseje obter os binários já compilados, será necessário assinar o ACBr Pro. Além dos binários, você contará com outras vantagens aqui no fórum.

O ACBr é Open Source. Você pode utilizar os componentes em Lazarus ou Delphi. Para outras linguagens, há o ACBr Lib e ACBr Monitor. Veja as informações sobre o ACBr Lib em https://projetoacbr.com.br/acbrlib/

Ambos utilizam o CEF4Delphi para trabalhar com a versão Web do WhatsApp. Então pode haver sim o risco de banimento.

Para o WhatsApp exite o TInject (versões mais novas do Delphi) e WBot (Lazarus).

Unit blcksock

A versão CE do Delphi tem diversas limitações. Se for para estudar, o Lazarus pode ser uma boa opção, por ser open source e multi plataforma. Se desejar permanecer no Delphi, utilize o FireDac ao invés do DBX, visto que o primeiro possui mais recursos e facilidades em relação ao segundo.

Ele vem com exemplos para VCL, FMX e Lazarus. Você precisa de um scanner ligado ao computador para funcionar.

Já tentou o Delphi Twain? http://www.kluug.net/delphitwain.php

Boa tarde! Estou trabalhando com o CNAB 400 do Inter. Segue o arquivo ACBrBoleto.pas com os ajustes iniciais. O arquivo referente ao Inter está passando por validações. Segue a versão inicial. ACBrBoleto.pas ACBrBancoInter.pas

Provedor alterado de WebISS para IPM. [3107406] Nome=Bom Despacho UF=MG Provedor=IPM NomeURL_H=sync NomeURL_P=sync Cidades.ini

Prezados Durante a realização de testes com a rotina DeduzirBandeiraNFCe, ao utilizar um cartão da bandeira American Express, a bandeira retornada foi "amex". Fiz o ajuste na rotina para aceitar tanto "american" quanto "amex". Segue o arquivo para análise. FormTelaPrincipal.pas

Realizada redução da largura do campo "% Desconto"; aumento da largura do campo "Descrição do Produto/Serviço". Seguem os arquivos PDF e FR3. DANFe.pdf DANFeRetrato.fr3

Antes.pdf Depois.pdf Alteração na largura do campo quantidade dos itens. Falha minha não ter especificado.

Prezados Houve necessidade de aumentar a largura do campo Quantidade, do relatório anexo, para evitar a quebra de linha em caso de valores que ultrapassem a dezena de milhar com quatro casas decimais. DANFeRetrato.fr3

Prezados Estou fazendo os testes dos componentes ACBr em um Raspberry Pi, utilizando cross compile do FPC para Linux ARM. O arquivo anexo, possibilita o funcionamento de diversos componentes. Para NFe, há de se fazer ajustes quanto à divisão por variáveis do tipo Currency, na preparação do DANFe. Bloco alterado, iniciado na linha 649. { Set FreePascal to Delphi mode } {$IFDEF FPC} {$MODE DELPHI} {$IFNDEF CPUARM} {$ASMMODE Intel} {$ENDIF} {$UNDEF BORLAND} {$DEFINE CPUASM} // FPC defines CPU32, CPU64 and Unix automatically {$ENDIF} ACBr_jedi.inc

Depende do dia... Ao programar, ouço sertanejo raiz e rock dos anos 70 e 80.

Prezados. Estou aqui compartilhando as alterações realizadas pelo Ednilson Dudar, as quais foram disponibilizadas em um grupo do Telegram e a pedido do mesmo, que fosse compartilhado aqui também. FortesRep-ce4-Preview.zip

Bom dia! Segue o arquivo. ACBrCEP.pas

Ao forçar lowercase, obtive sucesso realizando a busca pelo endereço de Belo Horizonte. Segue a procedure alterada. procedure TACBrWSViaCEP.BuscarPorLogradouro(const AMunicipio, ATipo_Logradouro, ALogradouro, AUF, ABairro : String); var Municipio, Logradouro, UF: string; begin if AMunicipio = '' then raise EACBrCEPException.Create('Munícipio deve ser informado.'); if ALogradouro = '' then raise EACBrCEPException.Create('Logradouro deve ser informado.'); if AUF = '' then raise EACBrCEPException.Create('UF deve ser informado.'); UF := LowerCase(TiraAcentos(AUF)); Municipio := LowerCase(TiraAcentos(AMunicipio)); Logradouro := LowerCase(TiraAcentos(ALogradouro)); fOwner.HTTPGet( fpURL + UF + '/' + Municipio + '/' + Logradouro + '/xml' ); ProcessaResposta(); end;