Classe TRESTDWDriverAD

Unit

uRestDWDriverAD

Declaração

type TRESTDWDriverAD = class(TRESTDWDriver)

Descrição

Hierarquia

• TObject
• TPersistent
• TComponent
• TRESTDWComponent
• TRESTDWDriver
• TRESTDWDriverAD

Visão Geral

Métodos

	procedure Notification(AComponent: TComponent; Operation: TOperation); override;
	Function ConnectionSet: Boolean; Override;
	Function GetGenID(Query : TComponent; GenName : String): Integer; Override;
	Function ApplyUpdatesTB(Massive : String; Params : TRESTDWParams; Var Error : Boolean; Var MessageError : String; Var RowsAffected : Integer) : TJSONValue; Override;
	Function ExecuteCommandTB(Tablename : String; Var Error : Boolean; Var MessageError : String; Var BinaryBlob : TMemoryStream; Var RowsAffected : Integer; BinaryEvent : Boolean = False; MetaData : Boolean = False; BinaryCompatibleMode : Boolean = False) : String; Overload; Override;
	Function ExecuteCommandTB(Tablename : String; Params : TRESTDWParams; Var Error : Boolean; Var MessageError : String; Var BinaryBlob : TMemoryStream; Var RowsAffected : Integer; BinaryEvent : Boolean = False; MetaData : Boolean = False; BinaryCompatibleMode : Boolean = False) : String; Overload; Override;
	Function ApplyUpdates(Massive, SQL : String; Params : TRESTDWParams; Var Error : Boolean; Var MessageError : String; Var RowsAffected : Integer) : TJSONValue; Override;
	Function ApplyUpdates_MassiveCache(MassiveCache : String; Var Error : Boolean; Var MessageError : String) : TJSONValue; Override;
	Function ProcessMassiveSQLCache(MassiveSQLCache : String; Var Error : Boolean; Var MessageError : String) : TJSONValue; Override;
	Function ExecuteCommand(SQL : String; Var Error : Boolean; Var MessageError : String; Var BinaryBlob : TMemoryStream; Var RowsAffected : Integer; Execute : Boolean = False; BinaryEvent : Boolean = False; MetaData : Boolean = False; BinaryCompatibleMode : Boolean = False) : String; Overload; Override;
	Function ExecuteCommand(SQL : String; Params : TRESTDWParams; Var Error : Boolean; Var MessageError : String; Var BinaryBlob : TMemoryStream; Var RowsAffected : Integer; Execute : Boolean = False; BinaryEvent : Boolean = False; MetaData : Boolean = False; BinaryCompatibleMode : Boolean = False) : String; Overload; Override;
	Function InsertMySQLReturnID(SQL : String; Var Error : Boolean; Var MessageError : String) : Integer; Overload; Override;
	Function InsertMySQLReturnID(SQL : String; Params : TRESTDWParams; Var Error : Boolean; Var MessageError : String) : Integer; Overload; Override;
	Procedure ExecuteProcedure(ProcName : String; Params : TRESTDWParams; Var Error : Boolean; Var MessageError : String); Override;
	Procedure ExecuteProcedurePure(ProcName : String; Var Error : Boolean; Var MessageError : String); Override;
	Function OpenDatasets(DatasetsLine : String; Var Error : Boolean; Var MessageError : String; Var BinaryBlob : TMemoryStream) : TJSONValue; Override;
	Procedure GetTableNames(Var TableNames : TStringList; Var Error : Boolean; Var MessageError : String); Override;
	Procedure GetFieldNames(TableName : String; Var FieldNames : TStringList; Var Error : Boolean; Var MessageError : String); Override;
	Procedure GetKeyFieldNames(TableName : String; Var FieldNames : TStringList; Var Error : Boolean; Var MessageError : String); Override;
	Procedure GetProcNames(Var ProcNames : TStringList; Var Error : Boolean; Var MessageError : String); Override;
	Procedure GetProcParams(ProcName : String; Var ParamNames : TStringList; Var Error : Boolean; Var MessageError : String); Override;
	Procedure Close; Override;
	Class Procedure CreateConnection(Const ConnectionDefs : TConnectionDefs; Var Connection : TObject); Override;
	Procedure PrepareConnection(Var ConnectionDefs : TConnectionDefs); Override;

Propriedades

property Connection : TADConnection Read GetConnection Write SetConnection;

Descrição

Métodos

	procedure Notification(AComponent: TComponent; Operation: TOperation); override;

	Function ConnectionSet: Boolean; Override;

	Function GetGenID(Query : TComponent; GenName : String): Integer; Override;

	Function ApplyUpdatesTB(Massive : String; Params : TRESTDWParams; Var Error : Boolean; Var MessageError : String; Var RowsAffected : Integer) : TJSONValue; Override;

	Function ExecuteCommandTB(Tablename : String; Var Error : Boolean; Var MessageError : String; Var BinaryBlob : TMemoryStream; Var RowsAffected : Integer; BinaryEvent : Boolean = False; MetaData : Boolean = False; BinaryCompatibleMode : Boolean = False) : String; Overload; Override;
Function ApplyUpdates_MassiveCacheTB(MassiveCache : String; Var Error : Boolean; Var MessageError : String) : TJSONValue;Override;

	Function ExecuteCommandTB(Tablename : String; Params : TRESTDWParams; Var Error : Boolean; Var MessageError : String; Var BinaryBlob : TMemoryStream; Var RowsAffected : Integer; BinaryEvent : Boolean = False; MetaData : Boolean = False; BinaryCompatibleMode : Boolean = False) : String; Overload; Override;

	Function ApplyUpdates(Massive, SQL : String; Params : TRESTDWParams; Var Error : Boolean; Var MessageError : String; Var RowsAffected : Integer) : TJSONValue; Override;

	Function ApplyUpdates_MassiveCache(MassiveCache : String; Var Error : Boolean; Var MessageError : String) : TJSONValue; Override;

	Function ProcessMassiveSQLCache(MassiveSQLCache : String; Var Error : Boolean; Var MessageError : String) : TJSONValue; Override;

	Function ExecuteCommand(SQL : String; Var Error : Boolean; Var MessageError : String; Var BinaryBlob : TMemoryStream; Var RowsAffected : Integer; Execute : Boolean = False; BinaryEvent : Boolean = False; MetaData : Boolean = False; BinaryCompatibleMode : Boolean = False) : String; Overload; Override;

	Function ExecuteCommand(SQL : String; Params : TRESTDWParams; Var Error : Boolean; Var MessageError : String; Var BinaryBlob : TMemoryStream; Var RowsAffected : Integer; Execute : Boolean = False; BinaryEvent : Boolean = False; MetaData : Boolean = False; BinaryCompatibleMode : Boolean = False) : String; Overload; Override;

	Function InsertMySQLReturnID(SQL : String; Var Error : Boolean; Var MessageError : String) : Integer; Overload; Override;

	Function InsertMySQLReturnID(SQL : String; Params : TRESTDWParams; Var Error : Boolean; Var MessageError : String) : Integer; Overload; Override;

	Procedure ExecuteProcedure(ProcName : String; Params : TRESTDWParams; Var Error : Boolean; Var MessageError : String); Override;

	Procedure ExecuteProcedurePure(ProcName : String; Var Error : Boolean; Var MessageError : String); Override;

	Function OpenDatasets(DatasetsLine : String; Var Error : Boolean; Var MessageError : String; Var BinaryBlob : TMemoryStream) : TJSONValue; Override;

	Procedure GetTableNames(Var TableNames : TStringList; Var Error : Boolean; Var MessageError : String); Override;

	Procedure GetFieldNames(TableName : String; Var FieldNames : TStringList; Var Error : Boolean; Var MessageError : String); Override;

	Procedure GetKeyFieldNames(TableName : String; Var FieldNames : TStringList; Var Error : Boolean; Var MessageError : String); Override;

	Procedure GetProcNames(Var ProcNames : TStringList; Var Error : Boolean; Var MessageError : String); Override;

	Procedure GetProcParams(ProcName : String; Var ParamNames : TStringList; Var Error : Boolean; Var MessageError : String); Override;

	Procedure Close; Override;

	Class Procedure CreateConnection(Const ConnectionDefs : TConnectionDefs; Var Connection : TObject); Override;

	Procedure PrepareConnection(Var ConnectionDefs : TConnectionDefs); Override;

Propriedades

	property Connection : TADConnection Read GetConnection Write SetConnection;