Ir para conteúdo
  • Cadastre-se

dev botao

  • Este tópico foi criado há 1960 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Moderadores
Postado

Boa tarde,

 

- da NTK sim, tem como. Vide manual de integração deles.

- do SiTef me disseram que não. Tudo é feito pela tela de opções.

- da Cappta não sei lhe informar. Mas como usa o GP, creio que seja possível.

 

Att.

Cleber C. Ferreira
Analista de Sistemas e Consultor
Email e
Skype: [email protected]
Formiga-MG

  • Moderadores
Postado

Evento AntesFinalizarRequisicao do componente ACBrTEFD. Esse é para Pay&Go (NTK)

procedure TDMACBr.TEFAntesFinalizarRequisicao(Req: TACBrTEFDReq);
begin
  if (Req.Header = 'CRT') and (TransTEF[tef_nTransacao].tpTransacao <> '') and
     (Sistema.TEF_TEFDial) then
    begin
      Req.GravaInformacao(011,000, TransTEF[tef_nTransacao].tpTransacao);  { TIPO DE TRANSACAO       NTK:  10: Cartão de crédito  à vista
                                                                                  11: Cartão de crédito  parcelado pelo Estabelecimento
                                                                                  12: Cartão de crédito  parcelado pelo Emissor
                                                                                  20: Cartão de débito  à vista
                                                                                  22: Cartão de débito  parcelado pelo Estabelecimento
                                                                                  21: Cartão de débito  pré-datado
                                                                                  24: Cartão de débito  pré-datado forçada
                                                                                  40: CDC / débito parcelado pelo Emissor
                                                                                  60: Voucher / PAT
                                                                                  30: Outro tipo de cartão
                                                                                  99: Não definido (a operação não foi concluída)
                                                    }
      Req.GravaInformacao(010,000, TransTEF[tef_nTransacao].rede);     { REDE ADQUIRENTE         NTK:  000 VISANET Cielo
                                                                                  001 REDECARD Rede
                                                                                  004 BANRISUL Banrisul / Vero
                                                                                  006 CSHOP Credi-shop
                                                                                  008 TRIBANCO Tricard
                                                                                  009 POLICARD Policard
                                                                                  011 FANCARD Fancard
                                                                                  012 BANCRED Bancredcard
                                                                                  013 BCARD Banesecard
                                                                                  014 ACCORD Accord
                                                                                  015 COOPERCR Coopercred
                                                                                  016 ORGCARD Orgcard
                                                                                  017 GETNET Getnet / Santander
                                                                                  018 REPOM Rede Estrada
                                                                                  019 VLCARD Valecard
                                                                                  020 MUXX Pay&Go Net
                                                                                  021 TKTCAR Ticket
                                                                                  022 PREMMIA FTC
                                                                                  023 NEUS Neus
                                                                                  025 ALGORIX Algorix
                                                                                  026 SENFF Senff
                                                                                  027 VERYCARD Verycard
                                                                                  043 FILLIP Fillip
                                                                                  044 VISANET Cielo - Pay&Go Web
                                                                                  045 ELAVON Elavon
                                                                                  046 LIBCARD Libercard
                                                                                  047 RV RV
                                                                                  048 FSTDATA FirstaData / Bin
                                                                                  049 FDCORBAN Correspondente bancário FirstData
                                                                                  050 CONDUCT Conductor
                                                                                  052 REDECARD Rede  Pay&Go Web
                                                                                  053 CREDSYST CredSystem
                                                                                  054 ICARDS Infocards
                                                                                  056 NDDCARGO NDDCargo
                                                                                  057 BANRISUL Banrisul  Pay&Go Web
                                                                                  058 GLOBAL Global Payments
                                                                                  059 GAX Gax/3ia
                                                                                  060 STONE Stone
                                                                                  061 DMCARD DM Card
                                                                                  062 CTF CTF }
      Req.GravaInformacao(018,000,IntToStr(TransTEF[tef_nTransacao].parcelas));           { QUANTIDADE DE PARCELAS }
      Req.GravaInformacao(731,000,TransTEF[tef_nTransacao].tpCartao);           { TIPO DE CARTÃO          NTK:  0: qualquer / não definido (padrão)
                                                                                  1: crédito
                                                                                  2: débito
                                                                                  3: voucher }
      Req.GravaInformacao(732,000,TransTEF[tef_nTransacao].tpParcelamento);           { TIPO DE FINANCIAMENTO   NTK:  0: qualquer / não definido (padrão);
                                                                                  1: à vista;
                                                                                  2: parcelado pelo Emissor;
                                                                                  3: parcelado pelo Estabelecimento;
                                                                                  4: pré-datado
                                                                                  5: pré-datado forçado }
    end;
end;

 

  • Curtir 1

Cleber C. Ferreira
Analista de Sistemas e Consultor
Email e
Skype: [email protected]
Formiga-MG

Postado

É possível sim escolher direto o tipo de cartão no SiTEF. Eu fiz da maneira abaixo e homologuei sem problemas:

 if tipo_cartaoTEF='C' then ACBrTEFD1.TEFCliSiTef.OperacaoCRT := 3 // iniciar operação TEF direto no crédito
  else if tipo_cartaoTEF='D' then ACBrTEFD1.TEFCliSiTef.OperacaoCRT := 2 // iniciar operação TEF direto no débito
  else ACBrTEFD1.TEFCliSiTef.OperacaoCRT := 0; // deixa o operador escolher o tipo de cartão via tela do próprio gerenciador TEF

  • Curtir 2
  • Consultores
Postado
1 hora atrás, Cristiano Caritá disse:

É possível sim escolher direto o tipo de cartão no SiTEF

Verdade. O manual da CliSitef tem vários códigos de operação que se pode usar dependendo apenas dos módulos serem instalados. Por exemplo recebimento de boletos e crédito de celulares.

  • Curtir 1

[]'s

Consultor SAC ACBr

Elton
Profissionalize o ACBr na sua empresa, conheça o ACBr Pro.

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.
  • Moderadores
Postado
4 horas atrás, Cristiano Caritá disse:

É possível sim escolher direto o tipo de cartão no SiTEF. Eu fiz da maneira abaixo e homologuei sem problemas:

 if tipo_cartaoTEF='C' then ACBrTEFD1.TEFCliSiTef.OperacaoCRT := 3 // iniciar operação TEF direto no crédito
  else if tipo_cartaoTEF='D' then ACBrTEFD1.TEFCliSiTef.OperacaoCRT := 2 // iniciar operação TEF direto no débito
  else ACBrTEFD1.TEFCliSiTef.OperacaoCRT := 0; // deixa o operador escolher o tipo de cartão via tela do próprio gerenciador TEF

Bacana! eu estava querendo uma solução assim. Mas o suporte deles que me falou que não havia como. Você tem a tabela de todos os códigos possíveis de serem utilizados? Digo, além de informar apenas crédito e débito, você sabe os códigos para informar bandeira, tipo de parcelamento, quantidade de parcelas, etc?

2 horas atrás, EMBarbosa disse:

Verdade. O manual da CliSitef tem vários códigos de operação que se pode usar dependendo apenas dos módulos serem instalados. Por exemplo recebimento de boletos e crédito de celulares.

Nos manuais que tenho não consegui localizar essas combinações. Você poderia disponibilizar aqui no fórum?

Cleber C. Ferreira
Analista de Sistemas e Consultor
Email e
Skype: [email protected]
Formiga-MG

Postado

Consegui fazer com ajudo do suporte da Captta, ficou assim.

procedure TDM.ACBrTEFD_NFCeAntesFinalizarRequisicao(Req: TACBrTEFDReq);
begin
  if Req.Header = 'CRT' then
  begin
    if (ACBrTEFD_NFCe.GPAtual in [gpTefDial]) and (varIntegracaoDireta = 'S') then
      Req.GravaInformacao(800, 001, IntToStr(varTipoCartao));

 

Onde varTipoCartao = 0 Credito e = 1 Debito.

  • Curtir 3
  • Consultores
Postado
1 hora atrás, Cleber disse:

Nos manuais que tenho não consegui localizar essas combinações. Você poderia disponibilizar aqui no fórum? 

Não posso anexar o manual porque eles só liberam o manual com aquele compromisso de confidencialidade.

Mas se você tiver o arquivo "SiTef - Interface Simplificada com a aplicação" procure por "Tabela de códigos de funções".

Na versão que tenho aqui está na página 20, "5.2.2 Tabela de códigos de funções".

  • Curtir 1

[]'s

Consultor SAC ACBr

Elton
Profissionalize o ACBr na sua empresa, conheça o ACBr Pro.

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.
  • Este tópico foi criado há 1960 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

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