Ir para conteúdo
  • Cadastre-se

Ronaldo.Bispo

Membros
  • Total de ítens

    32
  • Registro em

  • Última visita

2 Seguidores

Contact Methods

  • Website URL
    https://www.linkedin.com/in/ronaldo-bispo/

Últimos Visitantes

644 visualizações

Ronaldo.Bispo's Achievements

Contributor

Contributor (5/14)

  • Reacting Well Rare
  • Collaborator Rare
  • First Post
  • Conversation Starter
  • Week One Done

Recent Badges

6

Reputação

5

Community Answers

  1. Olá... Costumava usar algo parecido com: var nfe: TACBrNFe; numero_serie: string; vencimento: TDateTime; begin nfe := TACBrNFe.Create(nil); try nfe.SSL.SSLCryptLib := cryWinCrypt; numero_serie := nfe.SSL.SelecionarCertificado; vencimento := nfe.SSL.CertDataVenc; finally FreeAndNil(nfe); end; end; espero ter ajudado
  2. Estava olhando no ACBrNFe_Exemplo, parece que define por nota fiscal procedure TfrmACBrNFe.AlimentarNFCe(NumDFe: String); var Ok: Boolean; BaseCalculo, ValorICMS: Double; begin with ACBrNFe1.NotasFiscais.Add.NFe do begin Ide.natOp := 'VENDA'; Ide.indPag := ipVista; Ide.modelo := 65; Ide.serie := 1; Ide.nNF := StrToInt(NumDFe); Ide.cNF := GerarCodigoDFe(Ide.nNF); Ide.dEmi := now; Ide.dSaiEnt := now; Ide.hSaiEnt := now; Ide.tpNF := tnSaida; Ide.tpEmis := TpcnTipoEmissao(cbFormaEmissao.ItemIndex); Ide.tpAmb := taHomologacao; //Lembre-se de trocar esta variavel quando for para ambiente de producao Ide.cUF := UFtoCUF(edtEmitUF.Text); Ide.cMunFG := StrToInt(edtEmitCodCidade.Text); Ide.finNFe := fnNormal; Ide.tpImp := tiNFCe; Ide.indFinal := cfConsumidorFinal; (....) será que funciona se alterar: Ide.tpAmb := taHomologacao; para: Ide.tpAmb := taProducao; No meu caso eu já tenho o xml pronto, então eu não carrego os atributos da classe do acbr, mas no xml é informado o ambiente também na tag ide... verifica como está no seu código se isso ajuda
  3. Boa tarde você está tentando alterar em código, seria: ACBrNFe1.Configuracoes.WebServices.Ambiente := taProducao;
  4. Olá tudo bem? Gostaria de reportar uma alteração de provedor. O município de Medianeira-PR utilizava o IPM agora utiliza o Elotech https://medianeira.oxy.elotech.com.br/iss/home [4115804] ; Incluído em 27/12/2021 ; Atualizado em 05/02/2024 Nome=Medianeira Provedor=EloTech Versao=2.03 ProRecepcionar=https://medianeira.iss.elotech.com.br/iss-ws/nfse203.wsdl HomRecepcionar=https://medianeira.iss.elotech.com.br/iss-ws/nfse203.wsdl Desde já, muito obrigado..
  5. Olá pessoal, tudo bem? Eu procurei nos códigos fontes algo sobre validação de feriados, ou algo que retorne se retorne se a data é um feriado, ou lista de feriados. Alguém sabe dizer se existe algo assim pronto, ou também se tiver alguma dica de uma api gratuita dai podemos contribuir e enviar para a comunidade. Agradecido... muito obrigado
  6. Bom dia! Atualizado e as urls estão estar corretas! Qualquer problema eu reporto. Muito Obrigado.
  7. Olá, tudo bem? Gostaria de reportar uma alteração para enviar NFS-e do munícipio de Gaúcha do Norte - MT. No ACBrNFSeXServicos.ini alterei [5103858] Nome=Gaucha do Norte UF=MT Provedor= para [5103858] Nome=Gaucha do Norte UF=MT Provedor=Coplan Versao=2.01 ProRecepcionar=https://www.gp.srv.br/tributario/gauchadonorte/anfse_web_service ProLinkURL=http://www.gp.srv.br/tributario/gauchadonorte/tnfse_validacao?%CodVerif% Desde já, agradeço... muito obrigado. ACBrNFSeXServicos.ini
  8. Olá, tudo bem.. se ajudar ainda tive alguns problemas parecido com NFS-e. Antes de gerar usamos o metodo do Delphi SetRoundMode(rmUp), então os valores arredondam para cima. SetRoundMode (Delphi) - RAD Studio Code Examples (embarcadero.com) Espero ter ajudado...
  9. Apenas pra reportar, Foi corrigido no commit 30235 dia 1-agosto.. Muito obrigado.
  10. Olá pessoal, tudo bem com vocês? Estou gerando o arquivo de remessa bancária de envio do banco Sisprime 084 (antigo uniprime) e estou com alguns problemas com os dias de protesto. Quando eu deixo sem dias de protesto/negativação é gerado a exception: porém eu não gostaria de informar protesto. No manual diz que posso utilizar a indicação 03 que é 'Sem Protesto / Negativação', e também diz que se indicação for 01,02,07 deve preencher os dias a protestar sendo de 5 a 55 dias. Então me ocorreu que a validação no método TACBrUniprimeNortePR.GerarRegistroTransacao400(ACBrTitulo :TACBrTitulo; aRemessa: TStringList) não está sendo verificado se a indicação é diferente de 3 e 99. então alterei o código na unit ACBrUniprimeNortePR.pas de: if (StrToIntDef(aIdentificacaoOcorrencia,0) < 5) or (StrToIntDef(aIdentificacaoOcorrencia,0) > 55) then raise Exception.Create(ACBrStr('O número de dias a protestar / negativar '+ 'deve ser mínimo 05 a máximo 55 dias')); para: if ( (iInstrucao1 <> 3) and (iInstrucao1 <> 99) and (StrToIntDef(aIdentificacaoOcorrencia,0) < 5) or (StrToIntDef(aIdentificacaoOcorrencia,0) > 55) ) then raise Exception.Create(ACBrStr('O número de dias a protestar / negativar '+ 'deve ser mínimo 05 a máximo 55 dias')); A princípio seriam essas alterações Desde já, muito obrigado ACBrUniprimeNortePR.pas Manual_de_CobranA34a_-_Layout_CNAB_400_Atualizado.pdf
  11. No meu caso foi sempre antes de enviar, consultar, cancelar, substituir. Eu sempre chamo o metodo TACBrNFSeX.GerarToken antes de chamar um desses serviços.
  12. Bom dia, tudo bem? Retornando um feedback a respeito do problemas com o cancelamento e substituição. Foi aberto um chamado no provedor a respeito disso, mas eu fiz os testes no ambiente de homologação fornecido pelo provedor o problema acontece lá também. Como lá ocorre o problema também, então os eventos de cancelamento e substituição estão comunicando corretamente, a principio não é um problema com o ACBr. Por hora é isso mesmo, qualquer coisa se precisar fazer alterações, eu faço e crio um novo tópico comunicando as alterações.
×
×
  • 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.