Ir para conteúdo
  • Cadastre-se

DSilva

Membros
  • Total de ítens

    186
  • Registro em

  • Última visita

Posts postados por DSilva

  1. Ola amigos, preciso de uma ajuda de vcs. anexo tem duas imagens a nota de numero 722 foi feito no ambiente homologação aqui na empresa possui os dados de pgto ok.

    a nota de 117467 foi feita no cliente no ambiente produção olha que as informações de pgto nao constam, o que pode ser. 

    se alguém tem alguma ideia me ajudem, estou atualizando o primeiro cliente para versão 4.0.

    abraço.

     

    Capturar.PNG

    Capturar1.PNG

  2. Ola, amigos, gostaria de uma informação em relação a minha configuração do componente de impressao ACBrPosPrinter.

    meu pdv é somente cupom eletronico por tanto uso somante os componente da nfe e o ACBrPosPrinter.

    minha duvida que hoje me ocorre perda de comunicação com a impressora Bematech MP4200 TH USB

    para uma melhor explicação eu instalei o driver  nos clientes :

    ->BematechSpoolerDrivers_x86_v4.5.0.0.

    porem gostaria que alguem me desse uma dica quais opçoes que tenho que alimentar no meu componente ACBrPosPrinter, para um melhor desempenho e um padrao.

    abaixo segue o trecho de como faço hoje para configurar o ACBrPosPrinter.

    Ha!! sempre que eu mando um comando para imprimir qualquer coisa chamo estas configuraçoe em tempo de execução. 

    Pergunto se isso é o correto e se for, continuo usando essas configuraçoes a baixo.

    abraço aos amigos .

     

                try
                   if (ACBrPosPrinter.Ativo) then
                      ACBrPosPrinter.Desativar;
                except
                    on E: Exception do
                       GerarLogErroPDV('Erro Linha: |'+'CONFIGURARIMPRESSORA_0 '+'|'+E.Message);
                end;
                /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
                // CONFIGURANDO COMPONENTE IMPRESSORA //
                   //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
                   ImpOK                                    := True;
                   //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
                   // MODELO //
                   ACBrPosPrinter.Modelo                     :=  TACBrPosPrinterModelo(Dm.qECF['MODELO']);
                   // DEVICE //
                   ACBrPosPrinter.Porta                          := Dm.qECF['PORTA'];
                   ACBrPosPrinter.Device.Baud                := Dm.qECF['BAUD_RATE'];
                   ACBrPosPrinter.Device.Data                := Dm.qECF['DATA_BITS'];
                   ACBrPosPrinter.Device.Parity              := TACBrSerialParity(Dm.qECF['PARITY']);
                   ACBrPosPrinter.Device.Stop                := TACBrSerialStop(Dm.qECF['STOP_BITS']);
                   ACBrPosPrinter.Device.HandShake           := TACBrHandShake(Dm.qECF['HANDSHAKING']);
                   ACBrPosPrinter.Device.TimeOut             := 100;
                   ACBrPosPrinter.Device.SendBytesInterval   := 1000;
                   // GERAL //
                   ACBrPosPrinter.ControlePorta              := Dm.qECF['CTRLPORTA'];
                   ACBrPosPrinter.CortaPapel                 := Dm.qECF['CTAPAPEL'];
                   ACBrPosPrinter.LinhasBuffer               := Dm.qECF['LNHBUFFER'];
                   ACBrPosPrinter.LinhasEntreCupons          := Dm.qECF['LNHENTRECP'];
                   ACBrPosPrinter.PaginaDeCodigo             := TACBrPosPaginaCodigo(Dm.qECF['PAGCODIGO']);
                   //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
                   // ATIVAR //
                   ImpPosPrinter.Ativar;
                   //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////

  3. Obrigado por me responde, 

    Daniel, olhei o exemplo do ACBrTCPServer mas nao sei como fazer com que o servidor devolva ao cliente uma consulta no formato de (tabela ou quary ou ate mesmo formato Json).

    eu sei que  existe DatSnap ja testei e funciona, mas o problema é eu ter que migrar as duas aplicaçoes que tenho hoje em socket.

    algum exemplo se possivel.

  4. Boa tarde, gostaria de uma ajuda dos amigos, estou precisando do seguinte processo.

    Atualmente uso duas aplicaçoes utilizando socket usando texto de um lado para outro tudo certo.

    agora estou precisando fazer uma rotina que o meu cliente solicita uma consulta para o meu servidor via socket,

    e o servidor execute um select no banco de dados e me retorne para o cliente o resultado dessa consulta num formato de query

    no lado do cliente em posse de query vou andar nela e fazer meu insert ou update.

    existe alguma forma de fazer isso utilizando minha estrutura atual.

    Obrigado .

     

     

  5. componente do tef

    procedure TForm1.ACBrTEFD1ExibeMsg(Operacao : TACBrTEFDOperacaoMensagem;
       Mensagem : String; var AModalResult : TModalResult);
    var
       Fim : TDateTime;
       OldMensagem : String;
    begin
      StatusBar1.Panels[1].Text := '' ;
      StatusBar1.Panels[2].Text := '' ;

      case Operacao of

        opmOK :
           AModalResult := MessageDlg( Mensagem, mtInformation, [mbOK], 0);

        opmYesNo :
           AModalResult := MessageDlg( Mensagem, mtConfirmation, [mbYes,mbNo], 0);

        opmExibirMsgOperador, opmRemoverMsgOperador :
             lMensagemOperador.Caption := Mensagem ;

        opmExibirMsgCliente, opmRemoverMsgCliente :
             lMensagemCliente.Caption := Mensagem ;

        opmDestaqueVia :
           begin
             OldMensagem := lMensagemOperador.Caption ;
             try
                lMensagemOperador.Caption := Mensagem ;
                pMensagemOperador.Visible := True ;
                pMensagem.Visible         := True ;

                { Aguardando 3 segundos }
                Fim := IncSecond( now, 3)  ;
                repeat
                   sleep(200) ;
                   lMensagemOperador.Caption := Mensagem + ' ' + IntToStr(SecondsBetween(Fim,now));
                   Application.ProcessMessages;
                until (now > Fim) ;

             finally
                lMensagemOperador.Caption := OldMensagem ;
             end;
           end;
      end;

      pMensagemOperador.Visible := (lMensagemOperador.Caption <> '') ;
      pMensagemCliente.Visible  := (lMensagemCliente.Caption <> '') ;

      pMensagem.Visible := pMensagemOperador.Visible or pMensagemCliente.Visible;
      Application.ProcessMessages;
    end;

     

  6. Blz, realmente tinha o ACBrD5 em algusn dos meu fontes, removi da uses, porem ao compilar meu projeto apareceu erro nessa funçao

                             Fim := IncSecond(now,3);
                             repeat
                                 Sleep(100);
                                 Application.ProcessMessages;
                             until (now > Fim);
    nem lembrava que eu tava utilizando, o que devo fazer ? existe outra forma de usar ?

  7. Ola, amigos to precisando de uma ajudinha, apos instalar todos os components do Acbr pelo instalador no Delphi berlin 10.1

    ao compilar a minha aplicação, esta dando um erro da Unit ACBrD5, quando removo da minha uses ai compila, porem tenho umas function que esta la, e uso, sabem o porque disso?

    agradeço a ajuda.

    obrigado.

  8. Sobre isso que iria te perguntar,

    minha ideia então seria centralizar num servidor para gerar e validar os cupom nfc-e usando entao a sua ideia do AcbrMonitor 

    e tb evitando de instalar  o certificado em cada pdv do cliente. e liberando o acesso a internet, tenho alguns clientes com mais de 10 pdvs

    outros menos, mas a manutenção desses certificado apos o vencimento seria exaustiva.

    vou precisar de algumas informaçoes do amigo, se puder me ajudar volto postar. ou se vc tiver algum e-mail. agradeço.

  9. Obrigado amigos pelas resposta.

    Então é possivel centralizar num unico servidor todos os cupom enviados pelos pdvs,  com o AcbrMonitor, mas tenho que seguir algumas regras.

    pergunto se fica lento para autenticar os cupons ?

    ex; 10 pdv manda para o acbrMonitor, cada um com sua serie, numero do terminal e o cupom.

    como o juliomar disse o AcbrMonitor, nao é mult-thred como que fica esse tempo?

     

     

  10. Ola, amigos venho adquirir uma opinião dos mais experientes aqui.

    Meu sistema PDV atualmente gera, valida e faz a transmissão do cupom para sefaz, para isso tenho que ter internet nos PDV,

    Imagina um cenário de um cliente meu desta forma;

    20 pdv rodando no mesmo cliente e transmitindo cupom e todos acessando internet. tem seus pos e contras. 

    mas gostaria de centralizar num servidor usando o AcbrMonitor para fazer isso, e assim desabilitar o acesso a internet nos PDV.

    Alguém por aqui que usa dessa forma. com o AcbrMonitor. ?

    Funciona rápido e é eficaz ?

    Abraço 

     

  11. ok, obrigado, mas ainda estou com problemas no cliente com essa dr800, fiz todas as tentativas aqui indicadas pelos amigos. mas nao obtive sucesso.

    Na empresa aqui tenho uma bematech MP4200 USB. instalei la no cliente neste fim de semana sexta passada, no lugar de uma  DR800. 

    acreditem, nao deu nenhum problema ate agora. funcionando 100%. 

    ja a Dr800, erro de comunicação 2 vezes.

    so me resta agora em trocar todas elas. to sem alternativas.

×
×
  • 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.