Ir para conteúdo
  • Cadastre-se

BrunoConsyst

Membros
  • Total de ítens

    12
  • Registro em

  • Última visita

Contact Methods

  • Website URL
    www.consystsistemas.com.br

Últimos Visitantes

O bloco dos últimos visitantes está desativado e não está sendo visualizado por outros usuários.

BrunoConsyst's Achievements

Apprentice

Apprentice (3/14)

  • Dedicated Rare
  • First Post
  • Collaborator Rare
  • Conversation Starter
  • Week One Done

Recent Badges

2

Reputação

1

Community Answers

  1. Realmente o problema era o ambiente no momento do envio. Mais uma vez BigWings solucionando meus problemas, obrigado amigo de asas grandes!!!
  2. Estou setando pra produção diretamente na linha de código: procedure TFrmNFe.BitBtn2Click(Sender: TObject); var Chave, idLote, CNPJ, nSeqEvento, Correcao : string; NumeroLote : Integer; begin if Application.MessageBox('Deseja Enivar uma Carta de Correção?','ATENÇÃO - CONSYST Sistemas Empresariais',MB_ICONQUESTION + MB_YESNO)=mryes then begin idLote := FormatDateTime('yyddmmhhmm', Now); nSeqEvento := '1'; NumeroLote := 1; ACBrNFe1.EventoNFe.Evento.Clear; with ACBrNFe1.EventoNFe.Evento.Add do begin InfEvento.tpAmb := taProducao; infEvento.chNFe := ed_chave.Text; InfEvento.CNPJ := dm1.TB_EMPRESACNPJ.Value; infEvento.dhEvento := now; infEvento.tpEvento := teCCe; infEvento.nSeqEvento := StrToInt(ed_cceSqc.Text); infEvento.detEvento.descEvento := 'Carta de Correção'; infEvento.detEvento.xCorrecao := ed_jusficativa.Text; end; ACBrNFe1.EnviarEvento(StrToInt(idLote)); MemoResp.Lines.Text := ACBrNFe1.WebServices.EnvEvento.RetWS; LoadXML(MemoResp, WBResposta); ShowMessage('Carta de Correção Registrada com Sucesso!'); end; end; Eu percebi que a opção taProdução (0) e Homologação é taHomologação (1), pq mp XML aparece 2?
  3. Boa tarde pessoal, Estou tendo problemas pra emitir uma CC-e em produção. Fiz todo procedimento de envio conforme o exemplo porém persiste em rejeição 494: Chave de Acesso inexistente! - <retEnvEvento versao="1.00" xmlns="http://www.portalfiscal.inf.br/nfe"> <idLote>1917041520</idLote> <tpAmb>2</tpAmb> <verAplic>NFEPE_H_22.01.07.185</verAplic> <cOrgao>26</cOrgao> <cStat>128</cStat> <xMotivo>Lote de Evento Processado</xMotivo> - <retEvento versao="1.00"> - <infEvento> <tpAmb>2</tpAmb> <verAplic>NFEPE_H_22.01.07.185</verAplic> <cOrgao>26</cOrgao> <cStat>494</cStat> <xMotivo>Rejeição: Chave de Acesso inexistente</xMotivo> <chNFe>26190307097998000133550010000001981000001985</chNFe> <tpEvento>110110</tpEvento> <dhRegEvento>2019-04-17T15:22:00-03:00</dhRegEvento> </infEvento> </retEvento> </retEnvEvento> 1917041520-eve.xml 1917041520-eve-soap.xml 1917041520-ped-eve.xml 1917041520-ped-eve-soap.xml
  4. Estou precisando compilar meu projeto em 64bits, porém qndo abro o instalador do ACBr para fazer isso não me carrega a opção de escolher!
  5. Boa tarde pessoal, Estou com um pequeno dilema! Preciso que antes de chamar o tef verificar se na minha nfce existe alguma coisa que dará rejeição, para que o cliente possa consertar a venda antes de passar o cartão! Bom, eu fiz um procedimento que antes de chamar o tef, eu alimento todo o componente nfe, assino e valido, ficando pendente somente o comando de enviar para depois que a transação for aprovada (Na verdade após ser aprovada eu limpo o componente e alimento novamente incluindo as informações dos pagamentos)! O que acontece é que no primeiro processo a nota fiscal é validada msm tendo produtos que estão com rejeição! E no segundo processo, quando mando enviar a nota é que a rejeição retorna como erro para o cliente! Gostaria de saber qual o processo onde eu possa verificar se existe algo que trará rejeição a nota antes de enviar!
  6. Consegui @BigWings, removi novamente os componentes e após salvar observei que eles continuavam a ser chamados na uses, removi da uses, salvei add novamente e rodou! Muito obg pelo apoio!
  7. Pessoal, nada feito! Assisti e li os artigos já porém o procedimento para ignorar as msg do exemplo não aparecem aqui! Já removi o acbr do libery path e dos packges, removi a pasta do acbr do computador, criei outra pasta em outro local e baixei novamente os arquivos pelo svn. Executei o apagarAcbr antes de instalar pelo ACBrInstall_trunk2, fiz a instalação do acbr escolhendo a opção mais demorada aonde ela apaga arquivos antigos, a instalação foi feita normalmente! Abri o meu aplicativo, removi os componentes ESCPOS e DANFCEFORTES e salvei. Depois Inseri eles novamente e salvei novamente! Ao compilar acontece o mesmo erro! Qndo compilo o exemplo da nfe do acbr ela compila normalmente, porém ao tentar compilar minha aplicação da erro! O que fazer?
  8. No caso do ESCPOS e do DANFCeFortes eu configuro no object inspector, porém qndo removo salvo e incluo ele novamente ele persiste com as propriedades, que no caso o primeiro erro da em MostrarPreview, e na linha de código nao chamo essa função em nenhum momento!
  9. Estou usando Delphi 10 Seattle, o erro segue em anexo! Já fiz a reinstalação do Acbr e o erro persiste
  10. Já desinstalei o Acbr, atualizei o svn e reinstalei e os componentes trazem a estrutura antiga no object inspector e da erro na hora de compilar, o que fazer?
  11. Após atualizar o Acbr meu pdv parou de compilar, ao tentar compilar da um erro "Error reading ACBrNFeDANFeESCPOS1.MostrarPreview: Property MostrarPreview does not exist". Isso tbm acontece com o DanfceFortes com a mesma propriedade! Já tentei reverter a atualização, já reinstalei o acbr e o erro persiste! Nos 2 componentes ele trás a propriedade MostrarPreview no object inspector! Alguém me da uma luz ai do que fazer! Obg
×
×
  • 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.