-
Total de ítens
22 -
Registro em
-
Última visita
Últimos Visitantes
O bloco dos últimos visitantes está desativado e não está sendo visualizado por outros usuários.
wilsonaaugusto's Achievements
-
Obrigado!
-
Boa tarde É possível usar a impressão do boleto no layout lPadraoPIX com outros bancos além do banco do brasil? As informações que vão no QRCode (url, txId e emv) sempre virão de uma API? E os boletos que são enviados via arquivo de remessa? Como eles podem obter os dados para o QRCode?
-
Bom dia! Acabei resolvendo da seguinte maneira: coloquei o valor 68 em 'ACBrTitulo.ACBrBoleto.Cedente.AgenciaDigito' mesmo. O calculo do digito do Nosso Numero ficou correto. Obrigado
-
Boa tarde! Estou gerando boletos para o banco Sicredi. Fui informado que preciso colocar a informação Posto de 2 digitos para ser usado em 'Agência / Código Beneficiário' do boleto. Olhei os fontes e encontrei a função: function TACBrBancoSicredi.MontarCampoCodigoCedente (const ACBrTitulo: TACBrTitulo ) : String; begin Result := ACBrTitulo.ACBrBoleto.Cedente.Agencia + '.' + PadLeft(ACBrTitulo.ACBrBoleto.Cedente.AgenciaDigito,2,'0')+ '.' + PadLeft(ACBrTitulo.ACBrBoleto.Cedente.CodigoCedente,5,'0'); end; Notei que onde me foi indicado para usar o posto está sendo colocado o digito da agencia. No meu caso, o numero que preciso colocar é '68' e o dígito da minha agencia é 2. Onde eu coloco o valor 68 que me foi passado como valor do Posto? Obrigado pela atenção
-
Entendi. Estou, aos poucos, encontrando o que preciso e adaptando o código. Agradeço pela sua atenção. Muto obrigado.
-
Sim, eu vi este trecho de código. Notei o uso do count para erros e Alertas. E, pelo que entendi, usa o LoadXML para "pegar" os dados das notas. Como estou dando manutenção em código herdado, achei que teria algo similar ao que já tenho feito (ex. if NF.NfseCancelamento.DataHora <> 0 then) para não ter que mudar as regras já estabelecidas aqui. Desculpa não prestei atenção no trecho "memoLog.Lines.Add(" Vou ver como adapto aqui. Obrigado
-
Bom dia! Estou trocando os componentes ACBrNFSe pelo ACBrNFSex. Fiz a troca conforme o manual e foi tudo bem. Agora estou revendo os meus fontes e tenho um trecho após usar o ConsultarNFSeporRps: " Result := (NFSE.ConsultarNFSeporRps(NFSE.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Numero, NFSE.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Serie, TipoRPSToStr(NFSE.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Tipo)));" onde utilizo: "if NFSE.WebService.ConsNfseRps.RetornoNFSe.ListaNfse.CompNfse.Count > 0 then "NF := NFSE.WebServices.ConsNfseRps.RetornoNFSe.ListaNfse.CompNfse.Items[0].Nfse;" O problema que estou tendo é que não encontro algo correspondente no ACBrNFSeX. Poderiam me indicar uma solução? Ou onde devo pesquisar? Nos fontes do exemplo não achei nada. Obrigado
-
Data Arquivo Remessa CNAB240 Banco ABC Brasil
wilsonaaugusto replied to wilsonaaugusto's tópico in ACBrBoleto
Bom dia! Gostaria de saber se as alterações foram feitas e atualizadas para eu poder fazer o update. Obrigado. -
Data Arquivo Remessa CNAB240 Banco ABC Brasil
wilsonaaugusto replied to wilsonaaugusto's tópico in ACBrBoleto
Bom dia! Obrigado pela atenção. Complementando, peço para alterarem o seguinte trecho, também: - Onde está IfThen((PercentualMulta > 0), '2', '1') + // 066 - 066 / Código da multa - mudar para IfThen((PercentualMulta > 0), '2', '0') + // 066 - 066 / Código da multa Obrigado -
Data Arquivo Remessa CNAB240 Banco ABC Brasil
wilsonaaugusto replied to wilsonaaugusto's tópico in ACBrBoleto
No ACBrBancoABCBrasil,pas, eu trocaria o trecho: IfThen((PercentualMulta > 0), '2', '1') + // 066 - 066 / Código da multa sDataMoraJuros + // 067 - 074 / Data da multa IfThen(PercentualMulta > 0, IntToStrZero(round(PercentualMulta * 10000), 15), IntToStrZero(0, 15)) + // 075 - 089 / Valor/Percentual a ser aplicado por IfThen((PercentualMulta > 0), '2', '1') + // 066 - 066 / Código da multa IfThen((PercentualMulta > 0), FormatDateTime('ddmmyyyy', DataMulta), '00000000') + // 67 - 74 Se cobrar informe a data para iniciar a cobrança ou informe zeros se não cobrar IfThen(PercentualMulta > 0, IntToStrZero(round(PercentualMulta * 10000), 15), IntToStrZero(0, 15)) + // 075 - 089 / Valor/Percentual a ser aplicado Peguei o trecho usado no ACBrBancoSantander.pas. Obrigado pela atenção. -
Bom dia! Na geração do arquivo remessa CNAB240 do banco ABC Brasil (ACBrBancoABCBrasil.pas), é usado a variável "sDataMoraJuros" para a Data do juros de mora (posições 119 - 126 do segmento P) e para Data da multa (posições 067 - 074 do segmento R). Acredito que a data da multa deveria ser estar em uma variável diferente; para isso eu preencho a propriedade "DataMulta" do título. Olhei os fontes de outros bancos e asa datas são tratadas separadas e no fonte do ABC Brasil não houve esse tratamento. Vou alterar aqui para enviar, mas queria saber se essa alteração poderia ser feita por vocês para novas versões?
-
wilsonaaugusto changed their profile photo
-
Iniciando no uso da API do Mercado Livre
wilsonaaugusto replied to wilsonaaugusto's tópico in Dúvidas não relacionadas ao ACBr
Juliomar, muito obrigado. Vou baixar e começar a testar. -
Você quer dizer Delphi rodando em IOS? Não, eu não tive oportunidade pois os equipamentos da Apple são caros para mim.
-
Iniciando no desenvolvimento Mobile
wilsonaaugusto replied to bnobre's tópico in Dúvidas não relacionadas ao ACBr
Se quiser ver algo para o Delphi mobile, começa pelos vídeos do 99 Coders. Quanto a ferramenta mais utilizada, eu não sei qual poderia apontar... Não tem um canivete suiço como é o Delphi, o mais próximo que achei foi o Electron, mesmo assim é preciso noção do trio HTML+CSS+Javascript. Conhecendo os três, fica mais fácil ver as outras. Tem o Android Studio que é bom. Tem as soluções Java que considero ótimas mas leva tempo de aprendizagem. E o mercado não espera, quer que o profissional já saiba tudo agora. Uma abraço -
Iniciando no desenvolvimento Mobile
wilsonaaugusto replied to bnobre's tópico in Dúvidas não relacionadas ao ACBr
Olá! Estou na mesma situação: muita bagagem no Delphi e querendo ampliar os horizontes. O próprio Delphi 10 já te dá condições para isto. Vai depender de como você precisa fazer esta comunicação. Acredito que o pessoal faz um servidor REST com o próprio Delphi para intermediar a troca de dados entre o Desktop e o Mobile, se este for o caso. E o aplicativo mobile pode ser desenvolvido no Delphi também. Cursos tem aos montes, escolha o mais simples pra começar e faça tentativas e erros. Ou se estiver querendo sair do ambiente Delphi, começa vendo Node.JS para criar a API Rest com Javascript e React Native para o lado mobile. Tem o Electron também, te dá um solução que me parece ser amigável sendo Javascript e podendo gerar um .exe para o Windows. Existem mais soluções, só achei essas mais amigáveis para quem, como eu, pensa e respira Delphi. Boa sorte.