Clipper On Line • Ver Tópico - Pin pad Gertec PPC 910
Mudar para estilo Clássico
Projeto Harbour - Compilador de código aberto compatível com o Clipper.
Postar uma resposta

Pin pad Gertec PPC 910

25 Out 2013 14:17

Ola pessoal..
Sei que esse assunto não tem nada a ver com Xharbour, mas sei que tem vários colegas aqui que usam TEF dedicado ( Sitef da softwareexpress) e quero ver se alguém está passando por esse problema tb..
Pela Clisitef.dll , ocorre o seguinte:
O pin pad funciona até o momento de pedir para passar/Inserir o cartão, ficando a msg na visor, porém qdo o cartão é passado/inserido, continua pedindo para passar o cartão e depois de um certo tempo da erro 31-Erro PinPad. Já entrei em contato com a Gertec e eles me passaram um aplicativo de testes e nesse aplicativo funciona perfeitamente.. Entrei em contato com a Softwareexpress, estão vendo o problema já tem 30 dias e nada de solução. Dizem que la funciona e tem vários outros clientes que funciona. Simplesmente não sei mais o que fazer..
Alguém está passando por isso ou já passou ?

Pin pad Gertec PPC 910

25 Out 2013 19:07

Ola!
Cadê o código?

É xHarbour ou Harbour ? já tentou usando o Harbour 3.2 ?

Saudações,
Itamar M. Lins Jr.

Pin pad Gertec PPC 910

26 Out 2013 17:41

Acredito que seja uma configuração no software que gerencia o TEF, deve ter um Timeout ou algo do tipo.

[]´s

Pin pad Gertec PPC 910

21 Fev 2014 09:12

é possivel você me enviar como você fez para utilizar esta dll ( Clisitef) fazendo um favor, tenho que fazer uma rotina para pegar uma trilha de um cartão e solicitar para digitar o número do CFP para nota fiscal paulista.

Desde já agradeço.

Frazato

Pin pad Gertec PPC 910

17 Mai 2017 09:11

:-O
Estou tentando acessar a dll da sitef para implementar TEF em meu sistema algum dos Srs. poderiam ceder algum material a respeito, Dica, PRG etc...
Harbour 3.2 + Minigui Extend + Bcc55
:(
HASA

Pin pad Gertec PPC 910

17 Mai 2017 09:59

Já tentou o acbr?

Pin pad Gertec PPC 910

17 Mai 2017 10:53

:(
Fladimir, interessante vou dar uma pesquisada, SAT + TEF, obrigado.
:xau
HASA

Pin pad Gertec PPC 910

17 Mai 2017 11:00

:(
Srs. acredito que não soube procurar mas... na ajuda do acbr tem apenas 2 tópicos, para mim bem vagos:

1 - ECF.PreparaTEF

2 - ECF.EfetuaPagamento( cCodFormaPagto, nValor [, cObservacao, bImprimeVinculado ] )

Apesar das explicações contidas lá me parece ser apenas para ECF, e eu queria vincular ao SAT.

:(Neg
HASA

Pin pad Gertec PPC 910

17 Mai 2017 12:32

Mas quem chama o Pin Pad não é o gerenciador Padrão?

Pin pad Gertec PPC 910

19 Mai 2017 15:46

Também estou vendo isso, mas exemplo não tem.

As funções são essas da DLL
#include "DLLxHb.ch"
#define DC_CALL_STD 0x0020

STATIC hTefDll

Function Sitef()
Local hDll := LoadLibrary("CliSiTef32I.dll")
SETHandle( hDll ) //hRmcDll)

Return nil

FUNCTION SETHandle( hDll )
hTefDll := hDll
RETURN nil

DLLxHb FUNCTION ConfiguraIntSiTefInterativoEx ( ;
pEnderecoIP, ; //: PAnsiChar; variavel
pCodigoLoja, ; //: PAnsiChar; fixo C 8
pNumeroTerminal, ; //: PAnsiChar; fixo C 8
ConfiguraResultado,; //: smallint fixo 6 000000
ParAdicional; // char variavel
) LIB hTefDll

DLLxHb FUNCTION IniciaFuncaoSiTefInterativo ( ;
Modalidade ,; //: integer; fixo 6
pValor ,; //: PansiChar; varivel com , e duas decimais
pNumeroCuponFiscal ,; //: PansiChar; maximo 20
pDataFiscal,; //: PansiChar; Fixo 8 Data Fiscal no formato AAAAMMDD
pHorario ,; //: PansiChar; Fixo 6 no formato HHMMSS
pOperador ,; //: PansiChar; MAX 20
pRestricoes ; //: PansiChar
) LIB hTefDll

DLLxHb FUNCTION ContinuaFuncaoSiTefInterativo ( ;
@ProximoComando ,; //: Integer;
@TipoCampo ,; // : Integer;
@TamanhoMinimo ,; // : smallint;
@TamanhoMaximo ,; // : smallint;
pBuffer ,; //: PansiChar;
TamMaxBuffer ,; //: Integer;
ContinuaNavegacao ; //: Integer
) LIB hTefDll

DLLxHb FUNCTION FinalizaTransacaoSiTefInterativo ( ;
smallint ,; // : Word; fixo 1 car -1 confirmada 0-estornada
pNumeroCuponFiscal ,; //: PansiChar; max 20
pDataFiscal ,; //: PansiChar;
pHorario ; //: PansiChar
) LIB hTefDll

*- PINPAD
DLLxHb FUNCTION KeepAlivePinPad( ) LIB hTefDll
DLLxHb FUNCTION EscreveMensagemPermanentePinPad (Mensagem) LIB hTefDll // 32 caracteres
// incluir o caractere ‘|’ (Barra em pé) para indicar uma mudança de linha.
DLLxHb FUNCTION LeTrilha3 (Mensagem ) //Esta função permite que o aplicativo capture uma trilha 3 magnética genérica.
*- CARTOA
DLLxHb FUNCTION LeCartaoSeguro (Mensagem) // Mensagem a ser apresentada no visor do PinPad default “PASSE O CARTAO”.
DLLxHb FUNCTION LeSenhaDireto (ChaveSeguranca, SenhaCliente) LIB hTefDll
DLLxHb FUNCTION LeSimNaoPinPad (Mensagem) LIB hTefDll

Agora falta montar o roteiro.

Pin pad Gertec PPC 910

19 Mai 2017 16:17

:-O
É exatamente isso o roteiro, como ? e em que momento? acionar o que ?, estou re-lendo o manual Especificação Técnica – Interface com os meios de pagamento do SiTef - Bibliotecas CliSiTefI e CliSiTef - Versão 189, para começar a rascunhar um PRG, valeu assim mesmo.
:)Pos
HASA

Pin pad Gertec PPC 910

19 Mai 2017 16:45

INSTALA O SIMULADOR,
exemplo que fiz

#DEFINE CRLF CHR(13)+CHR(10)
Function VendaSitefDemo( )

Sts := 0
ProximoComando := 0
TipoCampo := 0
TamanhoMinimo := 0
TamanhoMaximo := 0
Buffer := SPACE(20000)
Msg := SPACE(22000)
Aux := ""

/* função
0 Pergunta
1 Cheque
2 Cartão de Débito
3 Cartão de Crédito
*/
Sts := IniciaFuncaoSiTefInterativo ( 0, '1,00', '12345', '20101116', '091800','Operador', Nil)
if Sts <> 10000 // 10000 é porque tem mais processamento
return sts
endif

ProximoComando:= 0
TipoCampo:= 0
TamanhoMinimo:= 0
TamanhoMaximo:= 0
Resultado:= 0
DO WHILE sts = 10000 //repeat
Sts := ContinuaFuncaoSiTefInterativo ( @ProximoComando, @TipoCampo, @TamanhoMinimo,;
@TamanhoMaximo, Buffer, Len(Buffer), Resultado )
Aux := CRLF + ' ProximoComando = ' + Ltrim(str(ProximoComando)) +;
' Tipo = ' + Ltrim(str(TipoCampo))
Auxa += Aux + CRLF + Buffer
if Sts = 10000
DO CASE
case ProximoComando = 0 // Está devolvendo um valor para, se desejado, ser armazenado pela automação
case ProximoComando = 1 // Mensagem para o visor do operador
case ProximoComando = 15 // Mostra mensagem em Buffer
msginfo( Buffer )
case ProximoComando = 21 // Deve apresentar um menu de opções e permitir que o usuário selecione uma delas.
ret := MsgGet ( buffer,,,,,)
Resultado := val(ret)
Buffer := ret // "-1" encerra e cancela
case ProximoComando = 22 // Mostra mensagem em Buffer
msginfo( Buffer )
OTHERWISE
Resultado := 0 // outros tipos de Próximo Comando
endCASE
endIF
ENDDO //until Sts <> 10000;

FinalizaTransacaoSiTefInterativo (1,'12345','20101116','091800');

RETURN sts

Estou sem PINPAD para testar leitura de cartão e senha

Pin pad Gertec PPC 910

19 Mai 2017 17:18

Primeiro comando para o teste

nres := ConfiguraIntSiTefInterativoEx( cip, codigoloja, numeroterminal, configura )

nres := ConfiguraIntSiTefInterativoEx( '127.0.0.1', '00000000', 'SE000001', 0 )

Pin pad Gertec PPC 910

23 Mai 2017 14:25

Eu preferi fazer pelo CLIENTE MODULAR (igual o acbr), e não pela dll.

Como tenho muita pratica em troca de arquivos, preferi assim.

Eles te passam um roteiro e vc segue o roteiro. Não eh dificil!

Janio

Pin pad Gertec PPC 910

23 Mai 2017 23:26

Cliente Modular?
mas qual seria o teu homologador?
SOFTWARE EXPRESS?
Não vi este tipo de opção, somente pela DLL
Postar uma resposta