Class TBaseProvider (unit BaseProv)

Inherits from

TCustomProvider

Constructors


constructor Create(AOwner: TComponent);

TBaseProvider


Functions

function ApplyUpdates(Delta: OleVariant; MaxErrors: Integer; out ErrorCount: Integer): OleVariant;


function GetRecords(Count: Integer; out RecsOut: Integer): OleVariant;


procedure Reset(MetaData: WordBool);


procedure SetParams(Values: OleVariant);


procedure AssignFieldData(Field: TField);


procedure DoUpdate(DeltaData: TPacketDataSet);


procedure EndTransaction(Commit: Boolean);


function GetConnected: Boolean;


function GetNextRecord: Boolean;


function GetParamCount: Integer;


function HandleUpdateError(DeltaData: TPacketDataSet; E: EDatabaseError; var MaxErrors, ErrorCount: Integer): Boolean;


procedure InitFieldDefs;


procedure InitializeConflictBuffer(DeltaData: TPacketDataSet);


procedure InitializeData;


procedure InternalAbortUpdate(DeltaData: TPacketDataSet; E: EDatabaseError; var MaxErrors, ErrorCount: Integer; Response: TResolverResponse);


procedure InternalAfterApplyUpdates(DeltaData, ResultData: TPacketDataSet; MaxErrors, ErrorCount: Integer);


procedure InternalAfterCreate;


procedure InternalConnect;

Data Retrieval

procedure InternalDoUpdate(DeltaData: TPacketDataSet; UpdateKind: TUpdateKind);


procedure InternalInitUpdate(DeltaData: TPacketDataSet; UpdateKind: TUpdateKind);

Updates

procedure InternalReset(MetaData: Boolean);


procedure LogUpdateError(DeltaData: TPacketDataSet; E: EDatabaseError; Response: TResolverResponse);

Update Error Handling

function PackageRecords(Count: Integer): Integer;


procedure SetConnected(Value: Boolean);


procedure SetParamByIndex(ParamIndex: Integer; Value: OleVariant);


procedure SetParamByName(ParamName: String; Value: OleVariant);


procedure StartTransaction;


Properties

property Provider :


property Connected : Boolean


property FetchFirst : Boolean


property PacketData : TPacketDataSet


property ParamCount : Integer


Events

event OnDataRequest :


event OnGetData : TProviderDataEvent


event OnUpdateData : TProviderDataEvent


event OnUpdateError : TResolverErrorEvent


event OnUpdateRecord : TUpdateRecordEvent


Variables

FDeltaData : TPacketDataSet;


FDoInitialize : Boolean;


FFetchFirst : Boolean;


FIncludeMetaData : Boolean;


FOnGetData : TProviderDataEvent;


FOnUpdateData : TProviderDataEvent;


FOnUpdateError : TResolverErrorEvent;


FOnUpdateRecord : TUpdateRecordEvent;


FPacketData : TPacketDataSet;


FPrevResponse : TResolverResponse;


FResultData : TPacketDataSet;



Constructors


constructor Create(AOwner: TComponent);

TBaseProvider


Functions


function ApplyUpdates(Delta: OleVariant; MaxErrors: Integer; out ErrorCount: Integer): OleVariant;


function GetRecords(Count: Integer; out RecsOut: Integer): OleVariant;


procedure Reset(MetaData: WordBool);


procedure SetParams(Values: OleVariant);


procedure AssignFieldData(Field: TField);


procedure DoUpdate(DeltaData: TPacketDataSet);


procedure EndTransaction(Commit: Boolean);


function GetConnected: Boolean;


function GetNextRecord: Boolean;


function GetParamCount: Integer;


function HandleUpdateError(DeltaData: TPacketDataSet; E: EDatabaseError; var MaxErrors, ErrorCount: Integer): Boolean;


procedure InitFieldDefs;


procedure InitializeConflictBuffer(DeltaData: TPacketDataSet);


procedure InitializeData;


procedure InternalAbortUpdate(DeltaData: TPacketDataSet; E: EDatabaseError; var MaxErrors, ErrorCount: Integer; Response: TResolverResponse);


procedure InternalAfterApplyUpdates(DeltaData, ResultData: TPacketDataSet; MaxErrors, ErrorCount: Integer);


procedure InternalAfterCreate;


procedure InternalConnect;

Data Retrieval


procedure InternalDoUpdate(DeltaData: TPacketDataSet; UpdateKind: TUpdateKind);


procedure InternalInitUpdate(DeltaData: TPacketDataSet; UpdateKind: TUpdateKind);

Updates


procedure InternalReset(MetaData: Boolean);


procedure LogUpdateError(DeltaData: TPacketDataSet; E: EDatabaseError; Response: TResolverResponse);

Update Error Handling


function PackageRecords(Count: Integer): Integer;


procedure SetConnected(Value: Boolean);


procedure SetParamByIndex(ParamIndex: Integer; Value: OleVariant);


procedure SetParamByName(ParamName: String; Value: OleVariant);


procedure StartTransaction;


Properties


property Provider :


property Connected : Boolean


property FetchFirst : Boolean


property PacketData : TPacketDataSet


property ParamCount : Integer


Events


event OnDataRequest :


event OnGetData : TProviderDataEvent


event OnUpdateData : TProviderDataEvent


event OnUpdateError : TResolverErrorEvent


event OnUpdateRecord : TUpdateRecordEvent


Variables


FDeltaData : TPacketDataSet;


FDoInitialize : Boolean;


FFetchFirst : Boolean;


FIncludeMetaData : Boolean;


FOnGetData : TProviderDataEvent;


FOnUpdateData : TProviderDataEvent;


FOnUpdateError : TResolverErrorEvent;


FOnUpdateRecord : TUpdateRecordEvent;


FPacketData : TPacketDataSet;


FPrevResponse : TResolverResponse;


FResultData : TPacketDataSet;