Classe TRESTDWPoolerMethodClient

Unit

uRESTDWPoolermethod

Declaração

type TRESTDWPoolerMethodClient = class(TComponent)

Descrição

Hierarquia

• TObject
• TPersistent
• TComponent
• TRESTDWPoolerMethodClient

Visão Geral

Métodos

	Constructor Create(AOwner: TComponent); Override;
	Destructor Destroy; Override;
	Procedure Abort;
	Function GetPoolerList(Method_Prefix : String; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; RESTClientPooler : TRESTClientPoolerBase = Nil) : TStringList; Overload;
	Function GetServerEvents(Method_Prefix : String; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; RESTClientPooler : TRESTClientPoolerBase = Nil) : TStringList; Overload;
	Function EchoPooler(Method_Prefix, Pooler : String; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; RESTClientPooler : TRESTClientPoolerBase = Nil) : String;
	Function GetToken(Pooler : String; Params : TRESTDWParams; Var Error : Boolean; Var MessageError : String; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : String;
	Function InsertValue(Pooler, Method_Prefix, SQL : String; Params : TRESTDWParams; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : Integer;
	Function ExecuteCommand(Pooler, Method_Prefix, SQL : String; Params : TRESTDWParams; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; Var RowsAffected : Integer; Execute : Boolean; BinaryRequest : Boolean; BinaryCompatibleMode : Boolean; Metadata : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : TJSONValue;
	Function OpenDatasets(LinesDataset, Pooler, Method_Prefix : String; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : String; Overload;
	Function OpenDatasets(DatasetStream : TStream; Pooler, Method_Prefix : String; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; BinaryRequest : Boolean; BinaryCompatibleMode : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : TStream; Overload;
	Function ApplyUpdates(Massive : TMassiveDatasetBuffer; Pooler, Method_Prefix, SQL : String; Params : TRESTDWParams; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; Var RowsAffected : Integer; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; MassiveBuffer : String = ''; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : TJSONValue; Overload;
	Function ApplyUpdatesTB(Massive : TMassiveDatasetBuffer; Pooler, Method_Prefix : String; Params : TRESTDWParams; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; Var RowsAffected : Integer; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; MassiveBuffer : String = ''; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : TJSONValue; Overload;
	Function ApplyUpdates(LinesDataset, Pooler, Method_Prefix : String; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : String; Overload;
	Function ApplyUpdates_MassiveCache(MassiveCache, Pooler, Method_Prefix : String; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; ReflectChanges : Boolean = False; RESTClientPooler : TRESTClientPoolerBase = Nil) : TJSONValue;
	Function ProcessMassiveSQLCache(MassiveSQLCache, Pooler, Method_Prefix : String; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : TJSONValue;
	Function ExecuteCommandJSON(Pooler, Method_Prefix, SQL : String; Params : TRESTDWParams; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; Var RowsAffected : Integer; Execute : Boolean; BinaryRequest : Boolean; BinaryCompatibleMode : Boolean; Metadata : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : TJSONValue;
	Function ExecuteCommandJSONTB(Pooler, Method_Prefix, Tablename : String; Params : TRESTDWParams; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; Var RowsAffected : Integer; BinaryRequest : Boolean; BinaryCompatibleMode : Boolean; Metadata : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : TJSONValue;
	Function InsertValuePure(Pooler, Method_Prefix, SQL : String; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : Integer;
	Function ExecuteCommandPureJSON(Pooler, Method_Prefix, SQL : String; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; Var RowsAffected : Integer; Execute : Boolean; BinaryRequest : Boolean; BinaryCompatibleMode : Boolean; Metadata : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : TJSONValue;
	Function ExecuteCommandPureJSONTB(Pooler, Method_Prefix, Tablename : String; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; Var RowsAffected : Integer; BinaryRequest : Boolean; BinaryCompatibleMode : Boolean; Metadata : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : TJSONValue;
	Procedure GetPoolerList(Method_Prefix : String; Var PoolerList : TStringList; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; RESTClientPooler : TRESTClientPoolerBase = Nil); Overload;
	Procedure ExecuteProcedure(Pooler, Method_Prefix, ProcName : String; Params : TRESTDWParams; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil);
	Procedure ExecuteProcedurePure(Pooler, Method_Prefix, ProcName : String; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil);
	Function GetTableNames(Pooler, Method_Prefix : String; Var TableNames : TStringList; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : Boolean;
	Function GetFieldNames(Pooler, Method_Prefix, TableName : String; Var FieldNames : TStringList; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : Boolean;
	Function GetKeyFieldNames(Pooler, Method_Prefix, TableName : String; Var FieldNames : TStringList; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : Boolean;

Propriedades

	property Accept : String Read vAccept Write vAccept;
	property AcceptEncoding : String Read vAcceptEncoding Write vAcceptEncoding;
	property ContentType : String Read vContentType Write vContentType;
	property Charset : String Read vCharset Write vCharset;
	property ContentEncoding : String Read vContentEncoding Write vContentEncoding;
	property Compression : Boolean Read vCompression Write vCompression;
	property BinaryRequest : Boolean Read vBinaryRequest Write vBinaryRequest;
	property HandleRedirects : Boolean Read vHandleRedirects Write vHandleRedirects;
	property RedirectMaximum : Integer Read vRedirectMaximum Write vRedirectMaximum;
	property Encoding : TEncodeSelect Read vEncoding Write vEncoding;
	property EncodeStrings : Boolean Read vEncodeStrings Write vEncodeStrings;
	property PoolerURL : String Read vPoolerURL Write vPoolerURL;
	property Host : String Read vHost Write vHost;
	property Port : Integer Read vPort Write vPort;
	property RequestTimeOut : Integer Read vTimeOut Write vTimeOut;
	property ConnectTimeOut : Integer Read vConnectTimeOut Write vConnectTimeOut;
	property WelcomeMessage : String Read vWelcomeMessage Write vWelcomeMessage;
	property OnWork : TOnWork Read vOnWork Write SetOnWork;
	property OnWorkBegin : TOnWork Read vOnWorkBegin Write SetOnWorkBegin;
	property OnWorkEnd : TOnWorkEnd Read vOnWorkEnd Write SetOnWorkEnd;
	property OnStatus : TOnStatus Read vOnStatus Write SetOnStatus;
	property DatabaseCharSet : TDatabaseCharSet Read vDatabaseCharSet Write vDatabaseCharSet;
	property TypeRequest : TTypeRequest Read vTypeRequest Write vTypeRequest Default trHttp;
	property AccessTag : String Read vAccessTag Write vAccessTag;
	property CriptOptions : TCripto Read vCripto Write vCripto;
	property UserAgent : String Read vUserAgent Write vUserAgent;
	property DataRoute : String Read vDataRoute Write vDataRoute;
	property AuthenticationOptions : TRESTDWClientAuthOptionParams Read vAuthOptionParams Write SetAuthOptionParams;
	property OnBeforeGetToken : TOnBeforeGetToken Read vOnBeforeGetToken Write vOnBeforeGetToken;
	property PoolerNotFoundMessage : String Read vPoolerNotFoundMessage Write vPoolerNotFoundMessage;
	property SSLVersions : TRESTDWSSLVersions Read vSSLVersions Write vSSLVersions;

Descrição

Métodos

	Constructor Create(AOwner: TComponent); Override;

	Destructor Destroy; Override;

	Procedure Abort;

	Function GetPoolerList(Method_Prefix : String; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; RESTClientPooler : TRESTClientPoolerBase = Nil) : TStringList; Overload;

	Function GetServerEvents(Method_Prefix : String; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; RESTClientPooler : TRESTClientPoolerBase = Nil) : TStringList; Overload;

	Function EchoPooler(Method_Prefix, Pooler : String; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; RESTClientPooler : TRESTClientPoolerBase = Nil) : String;

	Function GetToken(Pooler : String; Params : TRESTDWParams; Var Error : Boolean; Var MessageError : String; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : String;
GetToken Function

	Function InsertValue(Pooler, Method_Prefix, SQL : String; Params : TRESTDWParams; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : Integer;
Roda Comando SQL

Function ExecuteCommand(Pooler, Method_Prefix, SQL : String; Params : TRESTDWParams; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; Var RowsAffected : Integer; Execute : Boolean; BinaryRequest : Boolean; BinaryCompatibleMode : Boolean; Metadata : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : TJSONValue;

	Function OpenDatasets(LinesDataset, Pooler, Method_Prefix : String; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : String; Overload;

	Function OpenDatasets(DatasetStream : TStream; Pooler, Method_Prefix : String; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; BinaryRequest : Boolean; BinaryCompatibleMode : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : TStream; Overload;

Function ApplyUpdates(Massive : TMassiveDatasetBuffer; Pooler, Method_Prefix, SQL : String; Params : TRESTDWParams; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; Var RowsAffected : Integer; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; MassiveBuffer : String = ''; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : TJSONValue; Overload;

Function ApplyUpdatesTB(Massive : TMassiveDatasetBuffer; Pooler, Method_Prefix : String; Params : TRESTDWParams; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; Var RowsAffected : Integer; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; MassiveBuffer : String = ''; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : TJSONValue; Overload;

	Function ApplyUpdates(LinesDataset, Pooler, Method_Prefix : String; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : String; Overload;

	Function ApplyUpdates_MassiveCache(MassiveCache, Pooler, Method_Prefix : String; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; ReflectChanges : Boolean = False; RESTClientPooler : TRESTClientPoolerBase = Nil) : TJSONValue;

	Function ProcessMassiveSQLCache(MassiveSQLCache, Pooler, Method_Prefix : String; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : TJSONValue;

Function ExecuteCommandJSON(Pooler, Method_Prefix, SQL : String; Params : TRESTDWParams; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; Var RowsAffected : Integer; Execute : Boolean; BinaryRequest : Boolean; BinaryCompatibleMode : Boolean; Metadata : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : TJSONValue;

Function ExecuteCommandJSONTB(Pooler, Method_Prefix, Tablename : String; Params : TRESTDWParams; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; Var RowsAffected : Integer; BinaryRequest : Boolean; BinaryCompatibleMode : Boolean; Metadata : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : TJSONValue;

	Function InsertValuePure(Pooler, Method_Prefix, SQL : String; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : Integer;

Function ExecuteCommandPureJSON(Pooler, Method_Prefix, SQL : String; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; Var RowsAffected : Integer; Execute : Boolean; BinaryRequest : Boolean; BinaryCompatibleMode : Boolean; Metadata : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : TJSONValue;

Function ExecuteCommandPureJSONTB(Pooler, Method_Prefix, Tablename : String; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; Var RowsAffected : Integer; BinaryRequest : Boolean; BinaryCompatibleMode : Boolean; Metadata : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : TJSONValue;

	Procedure GetPoolerList(Method_Prefix : String; Var PoolerList : TStringList; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; RESTClientPooler : TRESTClientPoolerBase = Nil); Overload;
Lista todos os Pooler's do Servidor

	Procedure ExecuteProcedure(Pooler, Method_Prefix, ProcName : String; Params : TRESTDWParams; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil);
StoredProc

	Procedure ExecuteProcedurePure(Pooler, Method_Prefix, ProcName : String; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil);

	Function GetTableNames(Pooler, Method_Prefix : String; Var TableNames : TStringList; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : Boolean;

	Function GetFieldNames(Pooler, Method_Prefix, TableName : String; Var FieldNames : TStringList; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : Boolean;

	Function GetKeyFieldNames(Pooler, Method_Prefix, TableName : String; Var FieldNames : TStringList; Var Error : Boolean; Var MessageError : String; Var SocketError : Boolean; TimeOut : Integer = 3000; ConnectTimeOut : Integer = 3000; ConnectionDefs : TObject = Nil; RESTClientPooler : TRESTClientPoolerBase = Nil) : Boolean;

Propriedades

	property Accept : String Read vAccept Write vAccept;

	property AcceptEncoding : String Read vAcceptEncoding Write vAcceptEncoding;

	property ContentType : String Read vContentType Write vContentType;

	property Charset : String Read vCharset Write vCharset;

	property ContentEncoding : String Read vContentEncoding Write vContentEncoding;

	property Compression : Boolean Read vCompression Write vCompression;

	property BinaryRequest : Boolean Read vBinaryRequest Write vBinaryRequest;

	property HandleRedirects : Boolean Read vHandleRedirects Write vHandleRedirects;

	property RedirectMaximum : Integer Read vRedirectMaximum Write vRedirectMaximum;

	property Encoding : TEncodeSelect Read vEncoding Write vEncoding;

	property EncodeStrings : Boolean Read vEncodeStrings Write vEncodeStrings;

	property PoolerURL : String Read vPoolerURL Write vPoolerURL;

	property Host : String Read vHost Write vHost;

	property Port : Integer Read vPort Write vPort;

	property RequestTimeOut : Integer Read vTimeOut Write vTimeOut;

	property ConnectTimeOut : Integer Read vConnectTimeOut Write vConnectTimeOut;
Timeout da Requisição

	property WelcomeMessage : String Read vWelcomeMessage Write vWelcomeMessage;

	property OnWork : TOnWork Read vOnWork Write SetOnWork;

	property OnWorkBegin : TOnWork Read vOnWorkBegin Write SetOnWorkBegin;

	property OnWorkEnd : TOnWorkEnd Read vOnWorkEnd Write SetOnWorkEnd;

	property OnStatus : TOnStatus Read vOnStatus Write SetOnStatus;

	property DatabaseCharSet : TDatabaseCharSet Read vDatabaseCharSet Write vDatabaseCharSet;

	property TypeRequest : TTypeRequest Read vTypeRequest Write vTypeRequest Default trHttp;

	property AccessTag : String Read vAccessTag Write vAccessTag;

	property CriptOptions : TCripto Read vCripto Write vCripto;

	property UserAgent : String Read vUserAgent Write vUserAgent;

	property DataRoute : String Read vDataRoute Write vDataRoute;

	property AuthenticationOptions : TRESTDWClientAuthOptionParams Read vAuthOptionParams Write SetAuthOptionParams;

	property OnBeforeGetToken : TOnBeforeGetToken Read vOnBeforeGetToken Write vOnBeforeGetToken;

	property PoolerNotFoundMessage : String Read vPoolerNotFoundMessage Write vPoolerNotFoundMessage;

	property SSLVersions : TRESTDWSSLVersions Read vSSLVersions Write vSSLVersions;

---

Gerado por PasDoc 0.16.0.