Werner_Marques
Membros Pro-
Total de ítens
780 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Tudo que Werner_Marques postou
-
Erro Ao Atualizar Acbr
Werner_Marques replied to Werner_Marques's tópico in NFe/NFCe - Nota Fiscal Eletrônica
Não, somente o Delphi7 -
Erro Ao Atualizar Acbr
Werner_Marques replied to Werner_Marques's tópico in NFe/NFCe - Nota Fiscal Eletrônica
André, aparece a seguinte mensagem: -
Erro Ao Atualizar Acbr
Werner_Marques replied to Werner_Marques's tópico in NFe/NFCe - Nota Fiscal Eletrônica
Obrigado pela resposta André. Acabei de dar um update na pasta dos fontes e continua apresentando o mesmo erro. -
Pessoal, bom dia. Hoje eu atualizei meu ACBr hoje e apareceram alguns erros: [Error] ACBrNFeWebServices.pas(3732): Undeclared identifier: 'stEnvioWebService' [Fatal Error] ACBrNFeNotasFiscais.pas(182): Could not compile used unit 'ACBrNFeWebServices.pas' Já dei uma pesquisada no forum e não encontrei solução, alguém já teve este problema e poderia me ajudar? Estou usando o delphi 7
-
Cancelamento De Nfe Versão 3.10
Werner_Marques replied to Werner_Marques's tópico in NFe/NFCe - Nota Fiscal Eletrônica
André, fiz os testes com o Demo e o cancelamento deu certo. Verifiquei que no Demo ele está preenchendo da seguinte forma: infEvento.dhEvento := now; No meu software deixei da mesma forma que está no Demo e também funcionou direitinho. Obrigado pela atenção e pelo auxilio. -
Cancelamento De Nfe Versão 3.10
Werner_Marques replied to Werner_Marques's tópico in NFe/NFCe - Nota Fiscal Eletrônica
Me tire uma duvida, O Demo está com a versão 3.10? -
Cancelamento De Nfe Versão 3.10
Werner_Marques replied to Werner_Marques's tópico in NFe/NFCe - Nota Fiscal Eletrônica
André, confesso que não testei com o Demo, mas vou verificar e coloco o resultado aqui. -
Cancelamento De Nfe Versão 3.10
Werner_Marques replied to Werner_Marques's tópico in NFe/NFCe - Nota Fiscal Eletrônica
Pronto, segue em anexo o xml do cancelamento. 1411201533-ped-evento.xml -
Cancelamento De Nfe Versão 3.10
Werner_Marques replied to Werner_Marques's tópico in NFe/NFCe - Nota Fiscal Eletrônica
Bom dia André, Obrigado pela resposta. Meu código está assim: infEvento.dhEvento := IncMinute(PegaDataHoraStatusServico() ,-5); A função PegaDataHoraStatusServico() está assim: try AcbrNfe.WebServices.StatusServico.Executar; except on e: EACBrNFeException do MessageDlg(e.Message, mtError, [mbOk], 1); end; Result:= AcbrNfe.WebServices.StatusServico.dhRecbto; end; Eu não informei anteriormente, mas já entrei em contato com a SEFAZ daqui e fiz todos os procedimentos que eles me orientaram como: alterar o horario do computador, colocar no horario de verão, alterar o fuso, porém nada resolveu e eles me informaram que era problema do software. -
Cancelamento De Nfe Versão 3.10
um tópico no fórum postou Werner_Marques NFe/NFCe - Nota Fiscal Eletrônica
Boa Tarde, meus caros, estou concluido a implantaçã da NFe 3.10 no meu sistema e estou com um problema ao tentar cancelar uma NFe. Segue em anexo as imagens de erros reportados pelo servidor da SEFAZ: Alguém já passou por isso? como posso corrigir este problema? -
Muito bom saber disso, Italo! Obrigado!
-
Ok, muito obrigado!
-
Bom dia, pessoal! Sobre a versão 3.0 da NFe, ela já está sendo incorporada pelo componente?
-
Olá, bom dia! Tive conhecimento de que houve uma mudança na NFe, na qual novos itens devem ser inseridos. Os novos item são: * xped * nitemped O componente já me fornece o campo xped, mas não o nitemped. O que devo fazer para continuar a implementação? Obrigado.
-
Infelizmente, o problema ainda continua. =/
-
Sim, foi justamento o Memo.Lines que eu passei como parâmetro. Agora tentei fazer dessa forma: with impfiscal.acbr1 do begin AbreRelatorioGerencial(); LinhaRelatorioGerencial('================================================'); LinhaRelatorioGerencial(' <n>COMPROVANTE DE PAGAMENTO</n>'); LinhaRelatorioGerencial('================================================'); ... end; Infelizmente também deu erro, exatamente em AbreRelatorioGerencial(). Vc teria mais alguma dica?
-
Muito obrigado, André! Já estou tentando imprimir um relatório gerencial usando a procedure RelatorioGerencial, na qual eu tenho que passar como parâmetro um objeto TStrings. Porém, não estou conseguindo passar esse parâmetro. Já tentei passar um memo, mas não deu certo. Vc poderia me dar alguma dica?
-
Olá, bom dia! Estou realizando a homologação do PAF e preciso imprimir um comprovante vinculado, referente à venda finalizada com pagamento em duplicata. Entrei em contato com um homologador PAF da minha região e ele me passou a seguinte informação: "A impressora fiscal deve estar cadastrada com a forma de pagamento por meio de BOLETO, ou DUPLICATA, onde não há uma entrada de valor em espécie mas um documento ou relatório gerencial que o cliente assina se responsabilizando pelas dívida e as duplicatas e boletos correspondentes." Existe alguma função ou procedure que imprima tal comprovante vinculado? Desde já obrigado!
-
Olá, bom dia! Gostaria de saber se existe a possibilidade de armazenar na caixa de enviados, a mensagem enviada pela função "EnviarEmail". Se alguém puder me ajudar, agradeço muito. Obrigado!
-
Olá, boa tarde! Obrigado por responder. Tentei fazer dessa maneira, mas não deu certo: try ACBrNFe.NotasFiscais.Items[0].EnviarEmail(...); confirma := true; except confirma :=false; end; if (confirma = true) then CaixaDialogo('E-mail Enviado com Sucesso!','I') else CaixaDialogo('Falha ao enviar E-mail!','E'); Você teria mais alguma dica?
-
Olá, boa tarde! Estou usando a função ACBrNFe.NotasFiscais.Items[0].EnviarEmail(), e gostaria de exibir uma mensagem de confirmação ou de erro para o usuário saber ser o e-mail foi enviado ou não. Como faço para verificar se o e-mail foi realmente enviado?
-
Forma De Pagamento Dinheiro Impressa Por Último No C.f.
Werner_Marques replied to Werner_Marques's tópico in Dúvidas sobre TEF
Ok, obrigado. Bem, eu observei que no DEMO, se eu passar o cartão e depois o dinheiro pelo efetuaPagamento(), realmente no CF o dinheiro sai por último. Porém, se eu passar o cartão pelo CRT e por último passar o dinheiro pelo efetuaPagamento(), o dinheiro virá primeiro. Como posso resolver isso? Pois eu preciso do CRT para passar o cartão. -
Forma De Pagamento Dinheiro Impressa Por Último No C.f.
Werner_Marques replied to Werner_Marques's tópico in Dúvidas sobre TEF
Obrigado por responder, Daniel. Bem, como eu disse anteriormente, o problema também acontece no DEMO, e o que eu consegui localizar a respeito do evento que você citou foi isso: opeImprimePagamentos : begin while mPagamentos.Lines.Count > 0 do begin Linha := mPagamentos.Lines[0] ; P := pos('|',Linha) ; if P > 0 then begin CodFPG := Trim(copy(Linha,1,P-1)) ; ValorFPG := StringToFloatDef( copy(Linha, P+1, Length(Linha) ), 0 ); if (CodFPG <> '') and (ValorFPG > 0) then ACBrECF1.EfetuaPagamento( CodFPG, ValorFPG ); end; mPagamentos.Lines.Delete(0); end; end; -
Forma De Pagamento Dinheiro Impressa Por Último No C.f.
Werner_Marques replied to Werner_Marques's tópico in Dúvidas sobre TEF
Bom dia, pessoal! Bem, EMBarbosa, o problema é que quando eu realizo uma venda com duas formas de pagamento (dinheiro e cartão), no C.F., a forma de pagamento dinheiro aparece por primeiro. Estou homologando a minha aplicação para Cielo e eles exigem que a forma de pagamento dinheiro apareça por último no C.F.. Já fiz o teste no demo e aconteceu a mesma coisa. Não importa a ordem que eu realize os pagamentos, o dinheiro sempre aparece por primeiro. CliSiTef.rar Segue em anexo o log. Obrigado pela atenção de vocês. -
Forma De Pagamento Dinheiro Impressa Por Último No C.f.
Werner_Marques replied to Werner_Marques's tópico in Dúvidas sobre TEF
Pois é. Acontece que estou enviando tal forma de pagamento por último, mas ainda assim ela é impressa no C.F. por primeiro.