Tatiane Peixoto

Perdao BigWings , Realmente, você tem razão! Apos testes aqui na pratica , a função ja atende o requisito do banco ! Obg

Ola equipe ACBR, Verificando o manual do banco SANTANDER sobre o novo fator de vencimento , o manual diz: Sendo que a função do ACBRBoleto esta assim: function TACBrBancoClass.CalcularFatorVencimento(const DataVencimento: TDateTime): String; begin {** Padrão para vencimentos até 21/02/2025 **} //Result := IntToStrZero( Max(Trunc(DataVencimento - EncodeDate(1997,10,07)),0),4 ); {** Padrão com suporte a datas superiores a 21/02/2025 http://www.abbc.org.br/images/content/manual operacional.pdf **} if DataVencimento = 0 then Result := '0000' else Result := IntToStrZero(Max((Trunc(DataVencimento) - Trunc(EncodeDate(2000,07,03))) mod 9000 + 1000, 0), 4); end; Dessa forma o Resultado do exemplo dia 22/02/2025 de acordo com a função sera 1001. E de acordo com exemplo do manual deve ser 1000. Tem alguma correção recente nesta função para correção? Cobranca-Codigo-de-Barras-Julho-2022-v35-Portugues.pdf

Obg pessoal pelas informações!

Mim tirem uma dúvida , o proprio componente tras essa lista de acordo com banco configurado no mesmo?

Oi Antonio, Sim , eu gostaria de povoar um combobox por exemplo com essas opções de registros na hora de gerar a remessa, tem algum exemplo?

Ola, Pessoal ! Tenho uma dúvida sobre a lista de Tipo de Ocorrencias da Remessa dos bancos. No Acbr tem alguma função que retorne esta lista para que eu possa popular um combobox por exemplo e dar opção ao usuário de selecionar qual tipo de Remessa do registro? Outra Dúvida é ,essa lista de ocorrencias varia de acordo com cada banco? o ACBR já faz isso quando monta?

Ola Juliomar, Já foi feito isso! Já tentamos varias coisas, permissões de rede etc! Deve ser alguma coisa de estrutura de rede mesmo!

Bom dia, Estou com este problema em anexo que só acontece quando tento pegar o caminho da rede, se for local passa! Já verifiquei tudo que podia para tentar corrigir e não conseguir! Poderiam mim ajudar?

Italo, bom dia! Após atualização dos fontes hoje pela manha o problema foi resolvido! Obrigada pela atenção!

Italo, eu preciso gerar o arquivo xml antes e depois enviar, sempre usei desta forma! Mesmo antes de atualizar os fontes do acbr nunca tive problemas em fazer desta forma. Com essa atualização terei que mudar isso?

Italo, debugando mais ainda pude observar que esta entrando a segunda vez no momento que faço este comando : ACBrMDFe1.Enviar(IntToStr(iPedido),false); O que estou fazendo de errado ?

Italo, é o seguinte rodei com debug e nao sei por qual motivo esta passando 2 vezes nestas linhas: if (MDFe.infMDFe.versao >= 3) and (MDFe.ide.indCanalVerde = tiSim) then Gerador.wCampo(tcStr, '#027', 'indCanalVerde', 01, 01, 0, TindicadorToStr(MDFe.ide.indCanalVerde), DSC_INDCANALVERDE); if (MDFe.infMDFe.versao >= 3) and (MDFe.ide.indCarregaPosterior = tiSim) then Gerador.wCampo(tcStr, '#028', 'indCarregaPosterior', 01, 01, 0, TindicadorToStr(MDFe.ide.indCarregaPosterior), DSC_INDCARREGAPOSTERIOR); A primeira vez a tag indCarregaPosterior esta atribuido o valor tiNao e na segunda vez já vem atribuido tiSim. Ja analisei minha rotina e só gera o mdf-e uma vez só pelo comando: ACBrMDFe1.Manifestos.GerarMDFe;

Boa tarde Italo, Vou fazer isso! Retorno com novidades!

Não estou atribuindo o valor tiSim! Ja verifiquei isso! Achei os códigos e vc fez referência e estão iguais! Então na teoria esta tudo certo! Mas continua gerando a tag mesmo forçando e atribuindo tiNao.

Sim todas as pastas! Na realidade apaguei e baixei toda nova, e instalei tudo denovo no delphi berlin com sucesso! em qual pas esta TMDFeW.GerarId ? so achei o constructor TIde.Create e esta certo!

Bom dia Pessoal, Estou tentando fazer testes de homologação da MDF-e e após atualizar os componentes me deparei com uma falha durante a transmissão do MDF-e. Falha esta relacionadas as tags : indCanalVerde e indCarregaPosterior onde o componente cria automaticamente e atribui o valor 1 a estas tags! Como faço para que o componente não crie essas tag na hora da geração do XML da MDFe? Pois de acordo com o layout não é obrigatório essas tags. MDFe000002764.XML

Obg Daniel, era isso mesmo! Existiam algumas dependências mesmo não usando deveria instalar! Resolvido!

Bom dia, Fiz a instalação dos componentes no lazarus versão 1.8.4 ! Teoricamente foi instalado com sucesso! Só que ao tentar compilar o projeto dar este erro: Unit1.pas(444,35) Error: Identifier not found "TSSLLib" Unit1.pas(445,35) Error: Identifier not found "TSSLCryptLib" Unit1.pas(446,35) Error: Identifier not found "TSSLHttpLib" Unit1.pas(447,35) Error: Identifier not found "TSSLXmlSignLib" Unit1.pas(594,68) Error: Identifier not found "httpWinHttp" Unit1.pas(594,81) Error: Identifier not found "httpOpenSSL" Segue imagem em anexo imagem. Como resolver? já fiz algumas pesquisas e não conseguir encontrar solução!

Bom dia! De um tempo pra cá estamos com problema ao usar a função da acbr para validar o NCM. Estou fazendo desta forma: try if not ffc.ACBrNCMs1.Validar(Trim(Dbe_NCM.Text)) then begin Mensagem('NCM não existe',2); fProdutos.Dbe_NCM.SetFocus; Exit; end; except a propriedade urlconsulta está com := http://www4.receita.fazenda.gov.br/simulador/PesquisarNCM.jsp? Devo trocar para outro para que volte a funcionar? Pois percebi q este link não está funcionando.

Bom dia pessoal! Só retornando pra dizer que foi resolvido, o problema era do componente memo o qual jogava o retorno do xml do cancelamento nele e depois mandava salvar. Tirei o componente memo e coloquei novamente dai salvou certinho, talvez tenha sido alguma configuração do memo.. Agradeço a atenção! Atenciosamente, Tatiane Peixoto.

Bom dia Daniel, Peguei de uma rotina dai deixei do jeito q estava! Mas mesmo assim fiz um teste sem usar essa função para converter o XML e fica da mesma forma.

boa tarde! Estou tentando salvar um retorno do cancelamento de NF-e e está ficando desta forma abaixo: Estou fazendo da seguinte forma o cancelamento da NF-e: // Criar o cancelamento fConfigACBR_NFe.ACBrNFe.EventoNFe.Evento.Clear; //fConfigACBR_NFe.ACBrNFe.EventoNFe.idLote := iNumLotFat; with fConfigACBR_NFe.ACBrNFe.EventoNFe.Evento.Add do begin infEvento.chNFe := chaveNFe; infEvento.CNPJ := gEmpCgc; infEvento.dhEvento := NOW; infEvento.tpEvento := teCancelamento; infEvento.detEvento.nProt := nProtocolo; infEvento.detEvento.xJust := sJustifica; end; try // Enviar o evento de cancelamento if fConfigACBR_NFe.ACBrNFe.EnviarEvento(iNumLotFat) then begin with fConfigACBR_NFe.ACBrNFe.WebServices.EnvEvento do begin if (EventoRetorno.retEvento.Items[0].RetInfEvento.cStat <> 101) and // 101 - cancelamento homologado (EventoRetorno.retEvento.Items[0].RetInfEvento.cStat <> 135) and // 135 - Evento registrado e vinculado a NF-e (cancelamento de NF-e homologado) (EventoRetorno.retEvento.Items[0].RetInfEvento.cStat <> 151) and // 151- cancelamento homologado fora do prazo (EventoRetorno.retEvento.Items[0].RetInfEvento.cStat <> 155) then // 155 - Evento registrado e vinculado a NF-e fora de prazo; begin raise Exception.CreateFmt( 'Ocorreu o seguinte erro ao cancelar a nota fiscal eletrônica:' + sLineBreak + 'Código:%d' + sLineBreak + 'Motivo: %s', [ EventoRetorno.retEvento.Items[0].RetInfEvento.cStat, EventoRetorno.retEvento.Items[0].RetInfEvento.xMotivo ]); end; // retornos sData1 := FormatDateTime('DD/MM/YYYY',EventoRetorno.retEvento.Items[0].RetInfEvento.dhRegEvento); sHOra1 := FormatDateTime('HH:MM:SS',EventoRetorno.retEvento.Items[0].RetInfEvento.dhRegEvento); nProtocoloCanc := EventoRetorno.retEvento.Items[0].RetInfEvento.nProt; wXML := ConverteXMLtoUTF8(EventoRetorno.retEvento.Items[0].RetInfEvento.XML); // aqui eu pego o retorno sStat := IntToStr(EventoRetorno.retEvento.Items[0].RetInfEvento.cStat); sMotivo := EventoRetorno.retEvento.Items[0].RetInfEvento.xMotivo; ffcDB_NFe.rtfProcCancNFe.Text := wXML; //SALVA ARQUIVO XML ASSINADO E PROTOCOLADO ffcDB_NFe.rtfProcCancNFe.Lines.SaveToFile(gLocalAplicativo+'ARQS\XML\NF-e\_CANCELADO\'+s_Arquivo); aqui estou salvando o mesmo sPath := gLocalAplicativo+'ARQS\XML\NF-e\_CANCELADO\'+s_Arquivo; Mensagem('Arquivo XML do cancelamento salvo na pasta: '+gLocalAplicativo+'ARQS\XML\NF-e\_CANCELADO\'+s_Arquivo); O que estou fazendo de errado? Atenciosamente, Tatiane Peixoto. NF000023978_CAN.XML

Oi boa tarde! Fiz o teste conforme o exemplo e não aconteceu o erro! desta forma coloquei na minha rotina! Agradecida, Tatiane Peixoto.

Só carreguei o XML do evento! Vou fazer este teste e retorno

Peguei este forma de impressão aqui mesmo no forum! Onde teoricamente esta correto! Estou querendo imprimir um evento do cancelamento da NFC-e (65).