Ir para conteúdo
  • Cadastre-se

desenvolvedor2

Membros
  • Total de ítens

    70
  • Registro em

  • Última visita

Tudo que desenvolvedor2 postou

  1. Estamos utilizando o que vem no componente = SP (São Paulo)
  2. Estou implantando a NFCe e o código ainda precisa ser ajustado para tratar os retornos que são diferentes. Tenho problemas também em outros eventos como em carta de correção por exemplo.
  3. Olá! O problema está acontecendo com qualquer evento André. Segue a rotina como solicitado
  4. fiz o procedimento que você pediu e continuo tendo os mesmos problemas com o instalador (mesmo executando como administrador) segue a log de erro e as telas que realmente marquei...aqui é windows 8 64 bits log_Delphi_7.txt
  5. Olá, bom dia! Recompilei todos os componentes relacionados com a NFe e NFCe e estão todos funcionando exceto para envio de eventos. Sim, os fontes do componente foram atualizados usando o SVN e a estrutura das pastas está preservada. O instalador sempre dava erro, então resolvi atualizar pelo SVN e recompilar.
  6. Olá boa tarde, estou tendo um problema no envio do evento de cancelamento da Nfe. Atualizei o componente pelo repositório a versão 2.00 e estou tendo o seguinte erro ao enviar o evento, vou colocar o print do mesmo abaixo agradeço se alguém puder ajudar pois não encontrei em nenhum lugar na internet
  7. Olá, boa tarde! Após baixar e instalar a última versão do ACBr, o meu aplicativo emissor parou de funcionar apresentando o seguinte erro ao validar: 1824 - element ' http //www.portalfiscal.inf.br/nfe}utrib'> 'UN' is not a valid value of the local atomic type Alguém saberia me ajudar com relação a esse erro? Segue o código e o print do erro logo abaixo.
  8. Bom dia Italo! Agradeço o seu retorno, vou realizar os testes. Novamente Obrigado!
  9. Olá Regys! Eu reparei que o xml de carta de correção não tem essas informações, mesmo arquivos gerados por outros emissores, acredito então que essas informações só poderão ser visualizadas quando eu crio o PDF ou mesmo imprimo o Danfe estando ele vinculado a NFe. Seria essa a questão?
  10. Olá Regys, bom dia! Agradeço o seu retorno. Modifiquei o código mas continuei com o mesmo problema. Poderia verificar se estou fazendo algo de forma errada? Segue abaixo o código o xml da carta de correção e um print do DANFE. try Application.ProcessMessages; Aguarde(True,'Enviando Carta de correção...'); Application.ProcessMessages; if frmAlertaNFe = nil then frmAlertaNFe := TfrmAlertaNFe.Create(Application); NumeroLote := dtm.GetGenerator('GEN_ID_CARTA_CORRECAO'); if not dtm.NFe.NotasFiscais.LoadFromFile(dtm.cdsConfiguracaoPATH_NFE_SAIDA.AsString+'\'+dtm.cdsNotaFiscalCHAVE_ACESSO.AsString+'-procNfe.xml') then raise Exception.Create('Não foi possível carregar o XML da Nota Fiscal Eletrônica correspondente!'); dtm.NFe.EventoNFe.Evento.Clear; dtm.NFe.EventoNFe.idLote := NumeroLote; with dtm.NFe.EventoNFe.Evento.Add do begin // DESCOBRIR COMO PREENCHER AS INFORMAÇÕES (RAZÃO, ENDERECO, BAIRRO, CEP, CIDADE, ESTADO, FONE, IE) infEvento.chNFe := dtm.cdsNotaFiscalCHAVE_ACESSO.AsString; infEvento.CNPJ := copy(dtm.cdsNotaFiscalCHAVE_ACESSO.AsString,7,14); infEvento.dhEvento := Now; infEvento.tpEvento := teCCe; infEvento.nSeqEvento := GetNumSeqCartaC(dtm.cdsNotaFiscalID_NOTA_FISCAL.AsInteger); infEvento.detEvento.xCorrecao := AnsiToAscii(edtCorrecaoAnterior.Text)+ AnsiToAscii(edtCorrecao.Text); end; if dtm.NFe.EnviarEventoNFe(NumeroLote) then begin with dtm.NFe.WebServices.EnvEvento do begin if not(EventoRetorno.retEvento.Items[0].RetInfEvento.cStat in [135, 136]) then begin MemoResp.Lines.Add('Ocorreu o seguinte erro ao enviar a carta de correção:'); MemoResp.Lines.Add('Código: '+IntToStr(EventoRetorno.retEvento.Items[0].RetInfEvento.cStat)); MemoResp.Lines.Add('Motivo: '+EventoRetorno.retEvento.Items[0].RetInfEvento.xMotivo); end else begin dtm.cdsCartaCorrecao.Append; dtm.cdsCartaCorrecaoID_CARTA_CORRECAO.AsInteger := NumeroLote; dtm.cdsCartaCorrecaoID_NOTA_FISCAL.AsInteger := dtm.cdsNotaFiscalID_NOTA_FISCAL.AsInteger; dtm.cdsCartaCorrecaoNUMERO_SEQUENCIAL.AsInteger := EventoRetorno.retEvento.Items[0].RetInfEvento.nSeqEvento; dtm.cdsCartaCorrecaoPROTOCOLO.AsString := EventoRetorno.retEvento.Items[0].RetInfEvento.nProt; dtm.cdsCartaCorrecaoDATA_HORA.AsDateTime := EventoRetorno.retEvento.Items[0].RetInfEvento.dhRegEvento; dtm.cdsCartaCorrecaoTEXTO_CORRECAO.AsString := AnsiToAscii(edtCorrecao.Text); dtm.cdsCartaCorrecaoXML.AsString := EventoRetorno.retEvento.Items[0].RetInfEvento.XML; dtm.cdsCartaCorrecao.Post; if dtm.cdsNotaFiscal.ApplyUpdates(0) <> 0 then dtm.cdsNotaFiscal.CancelUpdates; end; memoTmp.Text := EventoRetorno.retEvento.Items[0].RetInfEvento.XML; memoRespWS.Lines.Text := UTF8Encode(dtm.NFe.WebServices.EnvEvento.RetornoWS); LoadXML(memoTmp, WBResposta); MemoResp.Lines.Add(''); MemoResp.Lines.Add('Data do Evento.....: '+DateTimeToStr(EventoRetorno.retEvento.Items[0].RetInfEvento.dhRegEvento)); MemoResp.Lines.Add('Número do Protocolo: '+EventoRetorno.retEvento.Items[0].RetInfEvento.nProt); MemoResp.Lines.Add('Código do Status...: '+IntToStr(EventoRetorno.retEvento.Items[0].RetInfEvento.cStat)); MemoResp.Lines.Add('Motivo do Status...: '+EventoRetorno.retEvento.Items[0].RetInfEvento.xMotivo); end; end else begin with dtm.NFe.WebServices.EnvEvento do begin MemoResp.Lines.Add('Ocorreram erros ao tentar efetuar o cancelamento:'); MemoResp.Lines.Add(''); MemoResp.Lines.Add('Lote....: ' + IntToStr(EventoRetorno.idLote)); MemoResp.Lines.Add('Ambiente: ' + TpAmbToStr(EventoRetorno.tpAmb)); MemoResp.Lines.Add('Orgao...: ' + IntToStr(EventoRetorno.cOrgao)); MemoResp.Lines.Add('Status..: ' + IntToStr(EventoRetorno.cStat)); MemoResp.Lines.Add('Motivo..: ' + EventoRetorno.xMotivo); end; end; Aguarde(false,''); FreeAndNil(frmAlertaNFe); lblQtdCarta.Caption := 'Carta de Correção Emitidas: '+IntToStr(dtm.cdsCartaCorrecao.RecordCount); Correcao := edtCorrecao.Text; except on E: Exception do begin Aguarde(false,''); dtm.cdsNotaFiscal.CancelUpdates; if frmAlertaNFe = nil then frmAlertaNFe := TfrmAlertaNFe.Create(Application); frmAlertaNFe.edtResposta.Lines.Text := E.Message; frmAlertaNFe.ShowModal; end; end; 331410282213490001725500100000002310000002351101101-procEventoNFe.xml
  11. Olá amigos, bom dia! Não encontrei no exemplo e no fórum uma opção para adicionar as informações do destinatário na CC-e. Preciso descobrir como preencher as informações (Razão, Endereço, Bairro, Cep, Cidade, Cidade, Estado, Fone, IE) Segue abaixo o código que estou usando para enviar a CC-e. Alguém conhece uma forma de enviar diferente da usada no exemplo?
  12. desenvolvedor2

    Nf-E Epec

    Olá Juaumkiko, boa tarde! Não consegui encontrar exemplos de como implementar essa rotina por evento. Seria possível me informar um exemplo?
  13. desenvolvedor2

    Nf-E Epec

    Olá amigos, bom dia! Estou com um problema em obter o protocolo de envio para DPCE, o protocolo e data não retornam valores esperados. O protocolo retorna '' e a data retorna 0 Agradeço caso algum dos amigos possa me ajudar. Seguem o código para análise:
  14. Olá Amigos, bom dia! Não consigo instalar o Acbr usando o ACBrInstall.exe. A instalação não consegue compilar o ACBRdiversos.dpk Uso o Delphi 7 e meu sistema operacional é o Windows 8 64 bits. Algum de vocês já teve um problema parecido? Deixo em anexo a log de instalação. log_Delphi_7.txt log_Delphi_7.txt
  15. Olá Amigos, boa tarde! Não consegui localizar no fórum informações sobre como vincular Cupom fiscal NF NFe e CTe na NFe pelo ACBr. Algum amigo poderia me ajudar com relação a isso? Abraços!
  16. Olá Régis, Boa tarde! Eu também entendi isso olhando a log de instalação, mas o fortes que eu tenho instalado é o fortes para XE3, o mesmo está instalado e rodando perfeitamente, na primeira tentativa de instalação em uma versão demo de XE5 a instalação do ACBr correu normalmente porém não gerou os bpls, agora na versão definitiva eu estou passando por esse problema. Pelo que sei não existe um fortes com o arquivo RLibWinDXE5. Será que alguém está usando o ACBr com fortes aqui na comunidade? Vou continuar na pesquisa já que o fortes está funcionando perfeitamente, alguém deve ter encontrado uma solução. Oque você me orienta a fazer amigo?
  17. Olá Amigos, Boa tarde! Tentei instalar o ACBr em uma versão final do XE5 e encontrei problemas na instalação, alguns pacotes não foram compilados. Log de instalação: https://app.box.com/s/80tnly4ug54o9tyzuhgj Caso algum amigo possa me ajudar ficarei agradecido.
  18. Putz! E se eu colocar as bpls de outra máquina? Valeu Solivan, vou dar meus pulos aqui então.
  19. Olá Juliomar, boa tarde! Sim, logo na primeira vez eu instalei o ACBr com direitos de administrador. Mesmo assim os arquivos *.bpl não foram criados.
  20. Olá Amigos, Bom dia! Estou passando pelo mesmo problema citado aqui, porém estou usando o windows 8 pro e o Rad Studio XE5, vou postar um print com o erro que encontro ao abrir a IDE e a log de instalação do ACBr. Link com a Log de instação do ACBr: https://app.box.com/s/klpuyzat8pud69mdqwra Caso alguém tenha passado pelo problema, fico na espera que possa me ajudar. Abraço!
×
×
  • 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...