Erro Comunicação Impressora de cheques Perto

[Emerson Teixeira]

Olá boa tarde.

Estou utilizando o ChqTeste pra comunicar com uma impressora de cheque perto 502s, porém quando chega na function TACBrCHQPerto.EnviaComando(cmd: String; SecTimeOut : Integer): String, no seguinte código:

           try
              ACK := fpDevice.Serial.RecvByte(SecTimeOut) ;
           except
              raise Exception.create(ACBrStr('PertoCheck não responde'));
           end ;

no try o aplicativo trava e logo apos recebo a exception.

Estou utlizando a porta serial.

4800 - Baud

hsDTR_DSR - handshake

none - parity

mas tentei varias configurações na porta serial e nada funciona, o problema parece estar no retorno pois aparentemente a impressora é ativada.

Se alguém puder me ajudar, agradeço desde já

 

[Carlos Ernesto]

Estou com problemas de comunicação também, você conseguiu resolver o seu? Pode me ajudar?

[rodrigoogioni]

Em 29/06/2015 at 15:58, Emerson Teixeira disse:

Olá boa tarde.

Estou utilizando o ChqTeste pra comunicar com uma impressora de cheque perto 502s, porém quando chega na function TACBrCHQPerto.EnviaComando(cmd: String; SecTimeOut : Integer): String, no seguinte código:

           try
              ACK := fpDevice.Serial.RecvByte(SecTimeOut) ;
           except
              raise Exception.create(ACBrStr('PertoCheck não responde'));
           end ;

no try o aplicativo trava e logo apos recebo a exception.

Estou utlizando a porta serial.

4800 - Baud

hsDTR_DSR - handshake

none - parity

mas tentei varias configurações na porta serial e nada funciona, o problema parece estar no retorno pois aparentemente a impressora é ativada.

Se alguém puder me ajudar, agradeço desde já

 

Alguem conseguiu?

Em 29/06/2015 at 15:58, Emerson Teixeira disse:

Olá boa tarde.

Estou utilizando o ChqTeste pra comunicar com uma impressora de cheque perto 502s, porém quando chega na function TACBrCHQPerto.EnviaComando(cmd: String; SecTimeOut : Integer): String, no seguinte código:

           try
              ACK := fpDevice.Serial.RecvByte(SecTimeOut) ;
           except
              raise Exception.create(ACBrStr('PertoCheck não responde'));
           end ;

no try o aplicativo trava e logo apos recebo a exception.

Estou utlizando a porta serial.

4800 - Baud

hsDTR_DSR - handshake

none - parity

mas tentei varias configurações na porta serial e nada funciona, o problema parece estar no retorno pois aparentemente a impressora é ativada.

Se alguém puder me ajudar, agradeço desde já

 

alguem conseguiu?

Editado 18 Janeiro, 2018 por rodrigoogioni

[Pedro E. Braga]

Impressora Perto funciona na velocidade 4800 na Serial, porem está com alguns problemas devido a Timeout, irei realizar ajustes na classe e assim que possível anexo ela para que o pessoal possa subir ao repositório.

[Pedro E. Braga]

Boa Noite, Realizei algumas melhorias para impressora de cheque Perto, segue Unit alterada para quem quiser ir fazendo os testes. Assim que concluir os testes posto os resultados.

ACBrCHQPerto.pas

[Pedro E. Braga]

Seque anexo Unit alterada para comunicação com a impressora Perto, foram feito testes de Impressão de cheque, Leitura de CMC7, e Impressão de Verso. peço integrem a unit ao fonte oficial.

ACBrCHQPerto.pas

[Daniel Simoes]

Obrigado @Pedro E. Braga, enviei para o SVN, com algumas simplificações....

[Pedro E. Braga]

Boa Noite,

Realizei um ajuste para que caso não seja informado valor para o Favorecido ou Cidade o cheque seja impresso, enviando vazio estava gerando erro "001 Mensagem com dados inválidos." no processo de impressão quando valores em branco.

ACBrCHQPerto.pas

[Daniel Simoes]

Obrigado...

Notei que sua Unit está dessincronizada com a atual do SVN... fiz um merge... mas sugiro atualizar sua Unit de acordo com a do repositório...

[italojr_87]

Em 19/02/2018 at 19:34, Pedro E. Braga disse:

Boa Noite,

Realizei um ajuste para que caso não seja informado valor para o Favorecido ou Cidade o cheque seja impresso, enviando vazio estava gerando erro "001 Mensagem com dados inválidos." no processo de impressão quando valores em branco.

ACBrCHQPerto.pas

Boa tarde Pedro.

Estou com erro de impressão da Pertocheck. O Softcheck reconhece a conexão da impressora, mas não imprime. O modelo é a 501S. Você poderia me ajudar? Não entendo de programação. 

[Daniel Simoes]

4 minutos atrás, italojr_87 disse:

Você poderia me ajudar? Não entendo de programação

Desculpe... este fórum se destina a programadores que usam os fontes do Projeto ACBr

Recomendo entrar em contato com o Suporte da empresa que desenvolveu o seu programa...