Jump to content

Tatiane Peixoto

Membros
  • Posts

    37
  • Joined

  • Last visited

Everything posted by Tatiane Peixoto

  1. Ola Juliomar, Já foi feito isso! Já tentamos varias coisas, permissões de rede etc! Deve ser alguma coisa de estrutura de rede mesmo!
  2. 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?
  3. Italo, bom dia! Após atualização dos fontes hoje pela manha o problema foi resolvido! Obrigada pela atenção!
  4. 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?
  5. 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 ?
  6. 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;
  7. 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.
  8. 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!
  9. 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
  10. Obg Daniel, era isso mesmo! Existiam algumas dependências mesmo não usando deveria instalar! Resolvido!
  11. 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!
  12. 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.
  13. 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.
  14. 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.
  15. 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
  16. Oi boa tarde! Fiz o teste conforme o exemplo e não aconteceu o erro! desta forma coloquei na minha rotina! Agradecida, Tatiane Peixoto.
  17. 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).
  18. Bom dia Ricardo! Sim tenho certeza! Inclusive tirei esta linha e o erro persiste! Esta impressora esta definida como padrão do Windows e funcionando normalmente! Atenciosamente, Tatiane Peixoto.
  19. Boa tarde! Estou tentando imprimir o evento de cancelamento de NFC-e através do comando ACBrNFCe1.ImprimirEvento mas acontece o erro "ARGUMENT OUT OF RANGE " justamente na linha fConfigACBR_NFCe.ACBrNFCe1.ImprimirEvento;, como segue a imagem em anexo! O Evento de cancelamento esta sendo realizado com sucesso ,só na hora que mando imprimir o evento acontece o erro. obs: estou usando spooler para Daruma DR800. 26171211705929000132650080000000391006700005-Can.xml
  20. Então não tem como fazer uma impressão para impressora termica seja ela bematech,durama ,jato de tinta,laser etc sem usar esses dois componentes?
  21. Boa tarde! Estou implementando a NFC-e no sistema aqui da empresa e estou utilizando o componente acbrnfe para envio junto com o Fortes REport. No momento a NFC-e esta sendo mostrado em Preview,mas gostaria que fosse impresso numa impressora não fiscal MP-4000 da Bematech. Gostaria de saber se tem como do preview ja mandar a impressão para uma impressora termina ( MP-4000 da Bematech.) ou qualquer outro modelo e marca? E também se existe a necessidade de usar algum componente do Acbr para configuração de impressoras etc,como por exemplo o ACBrNFeDANFeESCPOS e o ACBrPosPrinter? Atenciosamente, Tatiane Peixoto.
  22. Oi Juliomar! Verifiquei e pesquisei em todos os diretórios da minha maquina e só havia num só lugar mesmo os arquivos de instalação do FORTES REPORT! Só conseguir fazendo o procedimento citado acima! Muito estranho né? ,mas de qualquer forma muito obrigada pela ajuda! Atenciosamente, Tatiane Peixoto.
  23. Juliomar, só conseguir instalar o ACBR depois que seguir a dica aqui no forum de alguem onde, ao colocar a pasta de instalação do FORTE REPORT dentro da pasta do delphi no meu caso foi na pasta: C:\Program Files (x86)\Embarcadero\Studio\18.0 desta forma nao deu erro na hora de instalar o ACBR. Atenciosamente, Tatiane Peixoto.
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.