Ir para conteúdo
  • Cadastre-se

RobertoSchuster

Membros
  • Total de ítens

    65
  • Registro em

  • Última visita

  • Days Won

    1

Tudo que RobertoSchuster postou

  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
  14. Você se refere ao processo de homologação, certo? Ou o próprio caixa do banco iria recusar? Digo porque na prática homologamos o layout padrão e o arquivo de remessa.
  15. Boa tarde pessoal, Um cliente está me questionando sobre imprimir boleto diretamente em impressora portátil de 80mm, acredito que sejam essas impressoras Leopardo A7. Testei os layouts disponíveis no ACBrBoleto e não obtive sucesso. Esta necessidade já ocorreu por aqui? Existe alguma alternativa atualmente através do ACBr (utilizo a impressão do Fortes)? Pesquisando aqui no fórum vi que em outro post a pessoa adaptou o relatório em Fast, porém foi questionado se o layout é homologado e se respeita tamanhos mínimos exigidos. Neste caso, desculpe pela pergunta, mas o qual seria o problema em utilizar um layout com tamanho não homologado?
  16. Bom dia, obrigado pela dica @BigWings, eu não conhecia esta propriedade. Se não houver alguma contra indicação, vou deixar ela sempre marcada. Obrigado pelas orientações @Kiko Fernandes! Vou tentar seguir estas práticas. Só pra vocês entenderem o que ocorreu: o computador A e B transmitiram "ao mesmo tempo", a nota do computador A autorizou, mas o retorno foi recebido pelo computador B. Por consequência, a nota do computador B salvou e o computador A recebeu o retorno de duplicidade (que deveria ser do computador B). Foi um caso isolado, mas deu um bom trabalho pra corrigira situação. Além das boas práticas sugeridas acima, vocês acham que se a a propriedade "ValidarDigest" estivesse marcada, este caso teria sido evitado?
  17. Boa tarde, Supondo que dois computadores da mesma empresa tentem transmitir uma NF-e ao mesmo tempo (duas notas diferentes, e em virtude disso a chave de acesso gerada seja a mesma entre os dois, existe a possibilidade de um computador obter o retorno do outro computador e vice versa? Se sim, existe alguma maneira de prevenir esta situação, algum código, protocolo que possa ser validado? Obrigado.
  18. Olá, verifiquei que na revision 12732, de 26/12/2016, foi incluída a seguinte linha na unit do banco Santander, na função LerRetorno240: Vencimento := StrToDateDef(Copy(Linha, 70, 8), 0); Contudo, este código não deve obter a data corretamente pois o valor extraído vem sem as barras "/". Neste sentido sugiro o seguinte código: Vencimento := StringToDateTimeDef(Copy(Linha, 70, 2)+'/'+ Copy(Linha, 72, 2)+'/'+ Copy(Linha, 74, 4), 0, 'dd/mm/yyyy' ); PS: Não estou anexando o fonte pois tenho alterações aqui no arquivo local.
  19. Boa tarde, deu certo dessa forma? @Régys Silveira, somente informando estes 3 campos não irá rejeitar? Mesmo sem partilha? Estou com um caso similar, em que a contabilidade de um cliente exige que, independente de ter partilha, o FCP deve ser declarado na nota, porém eu só conheço o campo Det.Imposto.ICMSUFDest.vFCPUFDest. Saberia me informar se já existe outro campo para informar o FCP separado do grupo da partilha? Obrigado.
  20. Olá Juliana, Entendo. Foi hoje para homologação, estou aguardando o resultado.
  21. Bom dia, Fiz um pequeno ajuste na remessa 240 do Santander, pois obtive rejeição em processo de homologação. Caso Valor Mora Juros for maior que zero, Data Mora Juros não pode ser '00000000'. Portanto, neste caso defini a data do vencimento. O que acham? ACBrBancoSantander.pas
  22. Bom dia, No campo Data da Multa (segmento R), a fim de evitar a data 30/12/1899 no arquivo de remessa, fiz um pequeno ajuste para aparecer '00000000' no lugar. Utilizei a mesma variável utilizada na Data de Mora Juros (segmento P), pois pelo que venho acompanhando Data da Multa e Data de Mora Juros são consideradas a mesma. Correto? ACBrBancoSantander.pas
×
×
  • 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.