Autenticando o PDV com o TEF Cappta em Delphi

Para autenticar o PDV com o CapptaGpPlus é necessário passar três argumentos.

objetoCappta.AutenticarPdv(string CNPJ, int PDV, string ChaveAutenticação)

Estes podem vir de um Arquivo.ini, xml ou banco de dados.

Ficaria algo assim:


uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants,Cappta_Gp_Api_Com_TLB, System.Classes, Vcl.Graphics,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Vcl.ComCtrls,System.StrUtils,System.VarUtils, ActiveX, Vcl.ExtCtrls,
  Vcl.Mask;
type
TComponenteTef = class(TForm)
procedure AutenticarPdv(cliente: IClienteCappta);






Comentários