Daniel Simoes

@EliasCesar, favor verificar... essas modificações parecem ser importantes... 53c53 < cAilosURLSandbox = 'https://pixcobranca-h.ailos.coop.br/qa/ailos/pix-cobranca/api/v1'; --- > cAilosURLSandbox = 'https://apiendpointhml.ailos.coop.br/qa/ailos/pix-cobranca/api/v1'; 109,110d108 < qp.Values['key'] := ArquivoChavePrivada; < qp.Values['cert'] := ArquivoCertificado;

@EliasCesar, vários usuários estão reportando que Ailos modificou algumas coisas, na API deles... Esse tópico é sobre esse assunto ?

Enviei ao SVN, modificações para acabar com os Exceptions silenciosos.. Commit [r39439]

Pode mover o tópico para nossa área aberta, de Base de Conhecimentos

@willian_delan, Muito obrigado... Enviei ajustes ao SVN, baseado em suas sugestões.... Commit [r39395]

Você pode usar certificados do Windows, através da propriedade NumSerie https://acbr.sourceforge.io/ACBrLib/DFe.html

Use o ACBrTEFAPI, ele é bem mais atualizado, e não tem vínculo com ECF

Você pode achar as DLLs da LibXML2, no SVN do ACBr... https://svn.code.sf.net/p/acbr/code/trunk2/DLLs/LibXml2/ Lembrando... use a versão x86, se você compila seu .EXE em 32 bits... (independente do Windows ser 64 bits) Copie todas as DLLs do link acima, na mesma pasta do seu .EXE O quanto a implementação usando a LibXML2 é mais rápida que as antigas Units do PCN ? Confira nesse vídeo:

apenas marque na IDE, para ignorar

O código já é tratado por Try/Except try Result := EncodeDate( StrToInt(copy(DataStr,5,4)), // EXCEÇÃO AQUI !!! StrToInt(copy(DataStr,3,2)), StrToInt(copy(DataStr,1,2)) ) ; except Result := 0 ; // <------ AQUI -------- end;

Oi @Renan S.. ainda não consegui analisar.. estou terminando uma integração de TEF (PayKit)

Não são comuns, operações de Cancelamento, diretamente no Caixa... Até porque isso pode ter o risco de fraude, do Operador... Mas é uma operação possível, se o Cliente estiver disponível, para passar o cartão e confirmar o Cancelamento... Geralmente operações de Cancelamento, são tratadas no BackOffice, diretamente com a Adquirente...

Olá bom dia... Por favor anexe as Units modificadas, para analise...

Talvez esse modelo, não suporte os comandos de Resposta, de leitura de Status, que a Epson usa Você pode ver na aba "Log" quais foram os comandos enviados, e questionar o fabricante

É a DLL do SiTEF, que envia a imagem do QRCode ao PinPad, isso é feito no fluxo do TEF, e sem intervenção do ACBr Melhor contactar o suporte deles, para verificar situações como: - Esse PinPad permite a exibição de imagens na biblioteca deles ? - A configuração do SiTef está correta ?

Ainda não temos um vídeo... Você pode falar com o pessoal da GetCard... informando que é parceiro do ACBr https://getcard.com.br/

Já está funcional a um bom tempo, no ACBrTEFAPI

Sem problemas.. acontece de duplicar... o anterior já foi bloqueado e redirecionado para esse... Você rodaria a ACBrLib, carregando dentro do seu .EXE, correto? Nesse cenário, cada ACBrLib, será carregada dentro da instância do .EXE que está rodando... Ou seja, ela já está isolada por .EXE carregado e não precisaria ser Multi Thread A versão Multi Thread, geralmente é usado em APIs

Você precisa carregar as DLLs da variável de ambiente (pastas seguras) Veja esse tópico

sim.. você tem os fontes.. qualquer restrição (se existissem), poderiam ser suprimidas dos fontes...

@marcopoloviana, que derrubou o discord.... 540 pessoas no Papo Pro ACBr...

Boa.. já no SVN... https://sourceforge.net/p/acbr/code/38509/

@Felipe Sachetti, veja o que acha dessa sugestão de correção function TACBrTEFAPIClassCliSiTef.ObterDadoPinPad( TipoDado: TACBrTEFAPIDadoPinPad; TimeOut: integer; MinLen: SmallInt; MaxLen: SmallInt): String; Var DadoPortador: String; Ok: Boolean; begin DadoPortador := DadoPinPadToOperacao(TipoDado); if (DadoPortador = '') then begin fpACBrTEFAPI.DoException(Format(ACBrStr(sACBrTEFAPICapturaNaoSuportada), [GetEnumName(TypeInfo(TACBrTEFAPIDadoPinPad), integer(TipoDado) ), ClassName] )); end; if (MinLen = 0) and (MaxLen = 0) then CalcularTamanhosCampoDadoPinPad(TipoDado, MinLen, MaxLen); if (TimeOut > 1000) then TimeOut := trunc(TimeOut/1000); // SiTef espera o tempo em Segundos.. convertendo de milisegundos fRespostasPorTipo.ValueInfo[2967] := DadoPortador; fRespostasPorTipo.ValueInfo[2968] := IntToStr(MinLen); fRespostasPorTipo.ValueInfo[2969] := IntToStr(MaxLen); fRespostasPorTipo.ValueInfo[2970] := IntToStr(TimeOut); Ok := ExecutarTransacaoSiTef(CSITEF_OP_DadosPinPadAberto, 0); if Ok then Result := fpACBrTEFAPI.UltimaRespostaTEF.LeInformacao(2971,0).AsString; end; o valor Default, é utilizado em todas as demais classes de TEF, então não podemos mudar ele...

Olá. Não temos um componente com essas características