Ir para conteúdo
  • Cadastre-se

Painel de líderes

Conteúdo popular

Showing content with the highest reputation on 03-06-2017 em Posts

  1. Tive um problema na última atualização de NFC-e em contigência (Off-line). O erro é que está tentando validar antes de assinar, sendo que o XML é gerado somente na assinatura pelo que parece. ACBrECFVirtualNFCe.pas
    1 ponto
  2. @magnosystem, Que tenha internet ou não, SEMPRE terá que ser coletado essas informações MANUALMENTE, tendo em vista que o RETORNO do VerificaStatusValidor NÃO TRAS essas informações. Estou certo?
    1 ponto
  3. Boa tarde. A fonte das informações pode ser a qual ele considerar mais adequada. Vc pode mandar o comprovante pra ser impresso pelo POS, vc preenche esse campo qdo quiser que o POS imprima, senão vc manda em branco. Caso ainda restem dúvidas a serem esclarecidas, o ideal é criar um novo tópico com os detalhes da mesma. Att.
    1 ponto
  4. Bom dia, É possível apenas incluir um novo motorista no manifesto que está em aberto: ACBrMDFe1.EventoMDFe.Evento.Clear; ACBrMDFe1.EventoMDFe.idLote := XNumeroLote; with ACBrMDFe1.EventoMDFe.Evento.Add do begin InfEvento.chMDFe := xChaveAcesso; infEvento.CNPJ := xCNPJ; infEvento.dhEvento := Now; infEvento.tpEvento := teInclusaoCondutor; infEvento.nSeqEvento := nSeqEvento; infEvento.detEvento.nProt := xProtocolo; infEvento.detEvento.xNome := xNomeMotoristaAIncluir; infEvento.detEvento.CPF := xCPFMotorista; end; // Enviar o evento inclusao de condutor if ACBrMDFe1.EnviarEvento(xNumeroLote) then begin
    1 ponto
  5. Veja qual versão do Lazarus você instalou... se for a versão 64 bits ela vem com o FPC 64 bits, e portanto o seu .EXE dependerá de DLLs de 64 bits https://www.lazarus-ide.org/index.php?page=downloads Se você instalou o "Cross Compiling", pode selecionar o tipo de binário em: http://wiki.lazarus.freepascal.org/Cross_compiling#From_win32_to_win64
    1 ponto
  6. consegui resolver o meu problema fazendo a seguinte mudança alterei a ACBrNFeDANFEFRDM.pas na procedure CarregaPagamento if vTroco > 0 then begin Last; Edit; FieldByName('vPag').AsFloat := FieldByName('vPag').AsFloat + vTroco; Post; Append; FieldByName('tPag').AsString := 'Troco R$'; FieldByName('vPag').AsFloat := vTroco; Post; end;
    1 ponto
×
×
  • 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...
The popup will be closed in 10 segundos...