Jump to content

RobertoSFilho

Usuários SAC
  • Content Count

    65
  • Joined

  • Last visited

  • Days Won

    1

RobertoSFilho last won the day on March 17 2018

RobertoSFilho had the most liked content!

Community Reputation

17 Good

About RobertoSFilho

  • Rank
    Membro

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

  1. Bom dia, Um cliente me questionou por que o campo vBCFCP não estava sendo informado nas notas fiscais. Analisando a Nota Técnica 2016.002, na página 23, verifiquei que o campo vBCFCP não está presente somente na CST 00, que era o caso dele. Já nas demais CSTs, este campo aparece. Dúvida resolvida. Contudo, durante minha investigação eu acabei parando nos fontes do ACBr e identifiquei uma possível correção no carquivo ACBr\Fontes\ACBrDFe\ACBrNFe\PCNNFe\pcnNFeW, que coloquei em anexo. Só não soube explicar se isso está tendo algum efeito, pois se estivesse, já teria sido detectado. Enfim, segue para análise. pcnNFeW.pas
  2. Bom dia, Ao atualiza o ACBr passou a ocorrer um problema ao ler o arquivo de retorno do banco Sicoob 240, pois não está identificando a conta bancária se a mesma possuir mais que 7 dígitos. Verifiquei e isso se deve à linha 504 do arquivo ACBrBancoBancoob.pas, conforme abaixo: Cedente.Conta := PadLeft(IntToStr(StrToIntDef(Cedente.Conta,0)), 7, '0'); Aqui está sendo truncando o número da conta em 7 dígitos e no meu caso a conta possui 8 (sem o dígito verificado). Antes esta linha não estava causando problemas pois ela estava mais no início do código. Portanto, no meu caso apenas alterei de 7 para 10 no PadLeft (acima de 10 ocorre exception). Cedente.Conta := PadLeft(IntToStr(StrToIntDef(Cedente.Conta,0)), 10, '0'); Na verdade não sei se essa linha é realmente necessária, pois pelo que entendi o objetivo dela seria apenas remover os zeros á esquerda. Fonte em anexo. ACBrBancoBancoob.zip
  3. Olá José, obrigado pelo retorno. Pelo que verifiquei as correções estão OK. Novamente obrigado.
  4. Olá José, obrigado pelo retorno. Pelo que verifiquei as correções estão OK. Novamente obrigado.
  5. Olá José, Por gentileza, existe alguma previsão para estas alterações serem avaliadas e "comitadas"? Pergunto apenas para me agendar aqui. Obrigado.
  6. Olá José, Por gentileza, existe alguma previsão para estas alterações serem avaliadas e "comitadas"? Pergunto apenas para me agendar aqui. Obrigado.
  7. Boa tarde, Em processo de homologação com o Sicredi, nos foi enviado o logo atualizado. Portanto estou repassando já nas dimensões apropriadas, colorido e preto e branco. 748.bmp 748.bmp
  8. Olá pessoal, Por gentileza, alguém consegue me explicar o motivo do seguinte código abaixo estar presente nas units do ACBrBoleto? (ACBrBancoAmazonia, ACBrBancoBradesco, ACBrBancoBrasil, ACBrBancoCaixa, ACBrBancoHSBC, ACBrUniprime) // Quando o numero documento vier em branco if Trim(NumeroDocumento) = '' then NumeroDocumento := NossoNumero; ou // prevenir quando o seunumero não vem informado no arquivo, altera para NossoNumero do banco wSeuNumero := StringReplace(SeuNumero, '0','',[rfReplaceAll]); if (AnsiSameText(wSeuNumero, EmptyStr)) then begin SeuNumero := NossoNumero; NumeroDocumento := NossoNumero end; Isso é alguma prática definida nos manuais? Toda vez eu tenho que remover estes trechos de código dos fontes porque, no meu ponto de vista, não tem sentido. São dois campos diferentes: NossoNumero é uma numeração do banco, que pode ser diferente de NumeroDocumento, o qual corresponde a uma numeração interna da empresa, justamente para ser controlada pelo ERP do jeito que cada empresa quiser. Minha sugestão é que cada um controle NumeroDocumento e SeuNumero em seu próprio ERP do jeito que preferir, quem quiser igualar o NumeroDocumento ao NossoNumero, que faça em seus próprios fontes. Do jeito que está agora, este tratamento está sendo imposto, mascarando o valor real que vem no arquivo de retorno. Sem falar que está sendo implementado em apenas algumas units. Ou seja, nem é uma prática padrão. Fontes em anexo. PS: Na unit ACBrbancoBrasil, aproveitei e substituí DataMoraJuros por DataMulta na função GerarRegistroTransacao400 (na função GerarRegistroTransacao240 já estava correto). PS: Estão indo junto as alterações que enviei no tópico Correção na Comparação de Datas (TDatetime) com Null pois ainda não foram comitadas. Concordam? ACBrBancoBrasil.pas ACBrBancoHSBC.pas ACBrBancoBancoob.pas ACBrBancoBrasil.pas ACBrBancoHSBC.pas ACBrBancoCaixa.pas ACBrUniprime.pas ACBrBancoBradesco.pas ACBrBancoAmazonia.pas ACBrBancoItau.pas ACBrBancoCecred.pas ACBrBancoCaixaSICOB.pas
  9. Olá, aproveitei que atualizei meus fontes para repassar essas correções. Ainda existiam algumas comparações de TDateTime com Null, como por exemplo: if Data <> Null then Esta condição sempre será verdadeira pois TDateTime é float e não pode nem receber Null. Portanto, alterei as comparações para: if Data > 0 then Fontes em anexo. ACBrBancoBancoob.pas ACBrBancoItau.pas ACBrBancoCecred.pas ACBrBancoCaixaSICOB.pas ACBrBancoCaixa.pas ACBrBancoBrasil.pas ACBrBancoAmazonia.pas
  10. Bom dia, Eu também estava com este problema e, lendo este tópico, resolvi assinando a nota antes de validar (antes apenas gerava, validava e transmitia). Contudo ficou uma dúvida: antes de saber desta solução, para testar as possibilidades eu apenas removi a chamada ao método Validar e fui direto para a transmissão da nota e transmitiu normal. Isso confere?
  11. Obrigado André! Vou acompanhar e responder por lá então.
  12. Boa tarde, Atualizei o ACBr hoje e passou a ocorrer erro na validação da NF-e (ainda no layout 3.10), mais precisamente na chamada da função ACBrNFe1.NotasFiscais.Validar: Eu estava com o código desatualizado há um bom tempo, portanto além de atualizar e reinstalar todo o ACBr, atualizei os arquivos da pasta Schemas. E utilizo Capicom ainda. Será que falta atualizar alguma coisa?
  13. Olá, Segue em anexo logo do Santander atualizado em preto e branco. Foi rejeitado no processo de homologação com o atual, que inclusive não corresponde à imagem do logo colorido. Obrigado. 033.bmp
×
×
  • Create New...