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

656 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.

The popup will be closed in 10 segundos...
The popup will be closed in 10 segundos...