Lendo dados do Pin Pad
Bom dia a todos.
Aqui na minha cidade existe um Cartão local, onde todas as consultas ainda são feitas via telefone. Vendo a dificuldade de comunicação entre os estabelecimentos e os clientes, os responsáveis pelo Cartão local nos procuraram e pediram desenvolvermos um projeto parecido com o TEF.
Até o momento já consigo ler os dados oriundos do Pin Pad utilizando a dll Sitpin32 já descriptografada.
Dentro dela eu possuo as seguintes funções:
function SESolicitaSenhaDedicado (Trilha2Pin, MsgEnvPin, Work, Status : string) : integer;stdcall;external ´sitpin32.dll´;
function SEObtemSenha (SenhaPin, Status : string) : integer;stdcall;external ´sitpin32.dll´;
function SESolicitaConf (MsgPin, Status : string) : integer;stdcall;external ´sitpin32.dll´;
function SEObtemConf (Status : string) : integer;stdcall;external ´sitpin32.dll´;
function SEMsgPadrao (MsgEnv, Status : string) : integer;stdcall;external ´sitpin32.dll´;
function SEObtemTrilha1_2 (Trilha1, Trilha2, Status : string) : integer;stdcall;external ´sitpin32.dll´;
function SESolicitaTrilha1_2(Status : string) : integer;stdcall;external ´sitpin32.dll´;
function SESolicitaTrilhas(Modalid, Status : string) : integer;stdcall;external ´sitpin32.dll´;
function SEFinalizar() : integer;stdcall;external ´sitpin32.dll´;
Para ler os dados do Pin Pad eu utilizo a seguinte função:
var
VL_Track1, VL_Track2, stat : string;
stat := ´00´;
for i := 1 to 80 do
VL_Track1 := vl_track1 + ´ ´;
for i := 1 to 40 do
VL_Track2 := VL_Track2 + ´ ´;
SEObtemTrilha1_2(vl_track1, vl_track2, stat);
SEFinalizar(); // libera a porta de comunicação
Onde: vl_track1 é a primeira trilha do cartão, vl_track2 é a segunda trilha do cartão e stat é o status, que indica se houve leitura ou não.
Sem mais delongas, eis as minhas dúvidas:
1 - Como enviar e receber dados via web ? (pode ser um arquivo txt, semelhante ao TEF)
2 - Como obter a digitação da senha no pin pad?
Desde já agradeço a atenção.
Aqui na minha cidade existe um Cartão local, onde todas as consultas ainda são feitas via telefone. Vendo a dificuldade de comunicação entre os estabelecimentos e os clientes, os responsáveis pelo Cartão local nos procuraram e pediram desenvolvermos um projeto parecido com o TEF.
Até o momento já consigo ler os dados oriundos do Pin Pad utilizando a dll Sitpin32 já descriptografada.
Dentro dela eu possuo as seguintes funções:
function SESolicitaSenhaDedicado (Trilha2Pin, MsgEnvPin, Work, Status : string) : integer;stdcall;external ´sitpin32.dll´;
function SEObtemSenha (SenhaPin, Status : string) : integer;stdcall;external ´sitpin32.dll´;
function SESolicitaConf (MsgPin, Status : string) : integer;stdcall;external ´sitpin32.dll´;
function SEObtemConf (Status : string) : integer;stdcall;external ´sitpin32.dll´;
function SEMsgPadrao (MsgEnv, Status : string) : integer;stdcall;external ´sitpin32.dll´;
function SEObtemTrilha1_2 (Trilha1, Trilha2, Status : string) : integer;stdcall;external ´sitpin32.dll´;
function SESolicitaTrilha1_2(Status : string) : integer;stdcall;external ´sitpin32.dll´;
function SESolicitaTrilhas(Modalid, Status : string) : integer;stdcall;external ´sitpin32.dll´;
function SEFinalizar() : integer;stdcall;external ´sitpin32.dll´;
Para ler os dados do Pin Pad eu utilizo a seguinte função:
var
VL_Track1, VL_Track2, stat : string;
stat := ´00´;
for i := 1 to 80 do
VL_Track1 := vl_track1 + ´ ´;
for i := 1 to 40 do
VL_Track2 := VL_Track2 + ´ ´;
SEObtemTrilha1_2(vl_track1, vl_track2, stat);
SEFinalizar(); // libera a porta de comunicação
Onde: vl_track1 é a primeira trilha do cartão, vl_track2 é a segunda trilha do cartão e stat é o status, que indica se houve leitura ou não.
Sem mais delongas, eis as minhas dúvidas:
1 - Como enviar e receber dados via web ? (pode ser um arquivo txt, semelhante ao TEF)
2 - Como obter a digitação da senha no pin pad?
Desde já agradeço a atenção.
Turbo Drive
Curtidas 0