Ir para conteúdo
  • Cadastre-se
Seja bem-vindo
Regras e orientações da nossa comunidade Participe do Discord do ACBr

Gabriel Bonzanini

Membros
 Perfil  Explorar Conteúdo

  • Total de ítens

    125

  • Registro em

  • Última visita

  • Days Won

    1

 Tipo de Conteúdo 

Tudo que Gabriel Bonzanini postou

  1. Gabriel Bonzanini
    Bom dia. Estou tendo problemas com alguns clientes depois da última atualização referente à comunicação com os certificados digitais. Gostaria de saber como ajustar as propriedades para que os componentes trabalhem da mesma forma utilizada anteriormente ao refactoring. Reparei que o valor defaul para as propriedades é 'none': constructor TGeralConf.Create(AConfiguracoes: TConfiguracoes); begin ... FSSLLib := libNone; FSSLCryptLib := cryNone; FSSLHttpLib := httpNone; ... end; Dependendo do sistema operacional do cliente, estão sendo apresentados os seguintes erros: Método "Enviar" não implementado em: TDFeSSLHttpClass; Parâmetro incorreto; Falha em obter Provedor de Cripotografia do Certificado. Erro: 80090016. Como proceder? Obrigado.
  2. Gabriel Bonzanini

    LinkNFSe

    Gabriel Bonzanini replied to Zottis's tópico in ACBrNFSe

    Bom dia pessoal. Alguém sabe me dizer se este padrão de link se aplica a todos os provedores? Estou tendo problemas em obter o link correto para Nova Petrópolis/RS (provedor PRONIM). server21.novapetropolis.rs.gov.br aparentemente não existe. Grato pela atenção.
  3. Gabriel Bonzanini
    Ah, entendi Daniel... Achei que vocês não mantivessem o suporte para Delphi 7. Vou alterar e volto a postar. Obrigado pelo retorno.
  4. Gabriel Bonzanini
    Boa tarde pessoal. Tivemos um problema no envio da nota para o provedor Betha, e a mensagem apresentada foi a seguinte: Enquanto no Fly e-Nota, a mensagem foi a seguinte: Ao meu ver, para que a mensagem de erro seja compreensível ao executar o Raise no componente, é preciso uni-la ao conteúdo do campo 'Correcao' ("O valor do campo valor líquido deve estar entre..."). Para resolver esta questão, adicionei este campo às mensagens de retorno dos serviços. Agradeço se puderem avaliar o arquivo em anexo, e adicionar as alterações ao projeto oficial. ACBrNFSeWebServices.pas
  5. Gabriel Bonzanini
    Boa tarde Juliomar. Sim, resolvi desta forma. Existe a possibilidade de colocar zero como valores default no Create para as margens (assim como era originalmente), para que esse código possa ser removido do projeto? Obrigado.
  6. Gabriel Bonzanini
    Obrigado pelo retorno Anderson. Será que as margens default do componente (Create) não deveriam vir zeradas para manter a compatibilidade? Alguém sabe o motivo destes valores default listados abaixo? FMargemInferior := 0.8; FMargemSuperior := 0.8; FMargemEsquerda := 0.6; FMargemDireita := 0.51; Obrigado pela atenção.
  7. Gabriel Bonzanini
    Boa tarde. Em anexo, implementação da exportação de taras para balanças Toledo, tanto o cadastro das mesmas (Tara.txt) quanto o campo do produto, indicando o peso da embalagem do mesmo. Obs: Aproveitei e fiz um refactoring na classe TACBrCargaBalItens utilizando a técnica Generics (listas genéricas), deixando o código um pouco mais limpo. Verifiquem se está no padrão correto e qualquer coisa me avisem. Abraço, Gabriel. ACBrCargaBal.pas
  8. Gabriel Bonzanini
    Boa tarde. Após atualizar os fontes esta semana, a impressão do NFC-e ficou desconfigurada. Analisando o código fonte, cheguei ao seguinte bloco (ACBrNFeDANFEFR.pas, linha 295), adicionado recentemente: for i := 0 to FdmDanfe.frxReport.PreviewPages.Count - 1 do begin Page := FdmDanfe.frxReport.PreviewPages.Page[i]; if MargemSuperior > 0 then Page.TopMargin := MargemSuperior * 10; if MargemInferior > 0 then Page.BottomMargin := MargemInferior * 10; if MargemEsquerda > 0 then Page.LeftMargin := MargemEsquerda * 10; if MargemDireita > 0 then Page.RightMargin := MargemDireita * 10; FdmDanfe.frxReport.PreviewPages.ModifyPage(i, Page); end; Em anexo duas impressões, uma delas sem o bloco de código (Versão Anterior.pdf), e outra com o bloco de código (Versão Atual.pdf). Obrigado, Gabriel. Versão Anterior.pdf Versão atual.pdf
  9. Gabriel Bonzanini
    Boa tarde. Liguei pra INVIA hoje pela manhã, e conversei com um de seus técnicos. Ele me explicou que, após enfrentar diversos problemas de incompatibilidade com o ACS Cryptomate, não estão mais comercializando este certificado digital. No caso do nosso cliente, o certificado vence só em 2018, então não poderia sequer sugerir que ele comprasse outro certificado. A solução que eles estão aplicando nestes casos é substituir o certificado digital do cliente por outro em formato de arquivo (A1). Esta foi a mesma solução aplicada à empresa do colega DIOGOWAR segundo relato do técnico, então se quiserem o tópico pode ser encerrado. Obrigado pela atenção.
  10. Gabriel Bonzanini
    Obrigado pelo retorno,Gr@c@. Concordo, estes certificados são péssimos, possuem pouca documentação e a única fonte parece ser o próprio site do fabricante (mas estamos expandindo um pouco com este post). O CD que acompanha o dispositivo contém um driver e um software para administração, que não funcionaram. Entrei em contato com a INVIA, realizei uma conexão remota com um de seus técnicos, que fez a instalação utilizando drivers hospedados em seu site. A partir daí, o certificado passou a ser listado como uma opção na lista, funcionando com o emissor gratuito de NF-e, com o site da prefeitura para emissão de NFS-e, mas não com o ACBr. Isso é o mais estranho. Link dos drivers atualizados, a quem possa interessar futuramente: 32 bits: http://invia.com.br/acs32.rar 64 bits: http://invia.com.br/acs64.rar
  11. Gabriel Bonzanini
    Fiz o debug e o erro ocorre na função mencionada... Porém, não é possível entrar na mesma por se tratar de uma referência à dll da capicom. Esta marca de certificados digitais deve ser tão pouco usada que o erro quase passa despercebido... Mas a questão é que o ACBr capicom não está compatível com o mesmo...
  12. Gabriel Bonzanini
    Juliomar, se não puder contribuir, por favor peço que deixe o espaço para que os usuários troquem uma ideia entre si. Vou aguardar a resposta do colega DIOGOWAR. As mensagens anteriores não me ajudaram em absolutamente nada.
  13. Gabriel Bonzanini
    Juliomar, já instalei e reinstalei em 3 máquinas diferentes, aproximadamente 5 vezes em cada uma. E, da mesma forma que o DIOGOWAR comentou, com o emissor gratuito do SEFAZ funciona perfeitamente, o que indica que não é problema na instalação do certificado digital.
  14. Gabriel Bonzanini
    Boa tarde pessoal. Estou tendo exatamente o mesmo problema. Alguma novidade à respeito, DIOGOWAR? Fiz um debug, e o erro ocorre no comando signedKey := xmldsig.sign(dsigKey, $00000002);, da função TDFeCapicom.Assinar. Abraço.
  15. Gabriel Bonzanini
    http://www.sicredi.com.br/websitesicredi/upload/files/28379_Manual_Empresas_Conveniadas___CNAB_240___18062014.pdf Tipo de dado C047 (Motivo da Ocorrência), páginas 26, 27, 28 e 29. Só por curiosidade, qual manual vocês estão consultando?
  16. Gabriel Bonzanini
    Estou tentando contribuir com o projeto, ao contrário de muitos que só postam quando têm problemas, cobrando soluções. Depois dessa suspensão de 3 dias, vou pensar duas vezes antes de ajudar.
  17. Gabriel Bonzanini
    Desculpa Juliomar... É que imaginei que seria mais fácil para que os responsáveis pelas alterações no código-fonte visualizassem, já que fazem alguns dias e ainda não havia recebido nenhum tipo de posição sobre a alteração, que é relativamente simples.
  18. Gabriel Bonzanini
    Up
  19. Gabriel Bonzanini
    Up
  20. Gabriel Bonzanini
    Alguém poderia verificar se a alteração é viável? Obrigado.
  21. Gabriel Bonzanini
    Esta crítica é retornada em duas situações: A base de cálculo total realmente não condiz com a soma da base de todos os itens da nota; O CST/CSOSN informado em algum dos itens não gera valores (Ex: 40, 41, 50, etc.). Este tratamento é feito no próprio componente, no momento da geração das tags, não sendo enviado o valor de imposto mesmo que tenha sido preenchido no item. Abraço.
  22. Gabriel Bonzanini
    Bom dia pessoal. Segue uma alteração que fiz no componente para que o caminho do arquivo de evento (*-procEventoNFe.xml) possa ser acessado e armazenado logo após o envio do mesmo: if FPConfiguracoesNFe.Arquivos.Salvar then begin NomeArq := OnlyNumber(FEvento.Evento.Items[i].InfEvento.Id) + '-procEventoNFe.xml'; PathArq := PathWithDelim(GerarPathEvento(FEvento.Evento.Items[I].InfEvento.CNPJ)); FPDFeOwner.Gravar(NomeArq, Texto, PathArq); {Adicionei esta linha, no mesmo molde do bloco abaixo, que armazena o conteúdo do xml para ambos objetos} EventoRetorno.retEvento.Items[J].RetInfEvento.NomeArquivo := PathArq + NomeArq; {FEvento é um objeto privado da classe, portanto não pode ser acessado externamente} FEvento.Evento.Items[I].RetInfEvento.NomeArquivo := PathArq + NomeArq; end; { Converte de UTF8 para a String nativa e Decodificar caracteres HTML Entity } Texto := ParseText(Texto); EventoRetorno.retEvento.Items[J].RetInfEvento.XML := Texto; FEvento.Evento.Items[I].RetInfEvento.XML := Texto; Peço que analisem e vejam se isto pode ser enviado à versão oficial. Obrigado pela atenção, abraço. ACBrNFeWebServices.pas
  23. Gabriel Bonzanini
    Boa tarde pessoal. Adicionei alguns motivos de rejeição à função TACBrBancoSicredi.CodMotivoRejeicaoToDescricao, de acordo com o manual CNAB240 do Sicredi. O código já está em produção há alguns meses em nosso sistema, mas fiquem à vontade para verificar se está de acordo. Abraço. ACBrBancoSicredi.pas
  24. Gabriel Bonzanini
    Eu que agradeço Italo... O trabalho de vocês é excelente e ajuda muita gente, parabéns.
  25. Gabriel Bonzanini
    Bom dia pessoal. Ao gerar o xml da nota fiscal para o provedor Betha (ABRASF v1), se a mesma contiver faturas, o componente retorna um alerta acerca da data de vencimento: TAG:<Rps><InfRps Id="65SVC"><CondicaoPagamento><Parcelas> ID:#55/DataVencimento(Data de vencimento) - Tamanho menor que o mínimo permitido [25/02/2016]. Verifiquei que o problema está no procedimento TNFSeW_ABRASFv1.GerarCondicaoPagamento, que define um conteúdo de 19 caracteres (data/hora) para o campo. Contudo, o tipo tcDatVcto, informado no primeiro parâmetro de Gerador.wCampoNFSe, faz uma formatação de data simples (o que imagino que seja o correto, pois nunca se estipula um horário de vencimento), resultando em 10 caracteres: Gerador.wCampoNFSe(tcDatVcto, '#55', 'DataVencimento', 19, 19, 1, NFSe.CondicaoPagamento.Parcelas.Items[i].DataVencimento, DSC_DVENC); Substituindo-se o 19 por 10, tanto no tamanho máximo quanto no mínimo, o alerta não é mais retornado pelo componente. Em anexo, o arquivo com a alteração. Analisem se interpretei a situação corretamente e, caso sim, peço o favor de que enviem ao servidor para que não precise alterar manualmente toda vez que sincronizar os fontes. Desde já agradeço a atenção. Abraço, Gabriel. pnfsNFSeW_ABRASFv1.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.