74 |
|
function StartTransaction(TPB: array of byte; DefaultCompletion: TTransactionCompletion): ITransaction; override; |
75 |
|
function StartTransaction(TPB: ITPB; DefaultCompletion: TTransactionCompletion): ITransaction; override; |
76 |
|
procedure ExecImmediate(transaction: ITransaction; sql: AnsiString; aSQLDialect: integer); override; |
77 |
< |
function Prepare(transaction: ITransaction; sql: AnsiString; aSQLDialect: integer): IStatement; override; |
77 |
> |
function Prepare(transaction: ITransaction; sql: AnsiString; aSQLDialect: integer; CursorName: AnsiString=''): IStatement; override; |
78 |
|
function PrepareWithNamedParameters(transaction: ITransaction; sql: AnsiString; |
79 |
|
aSQLDialect: integer; GenerateParamNames: boolean=false; |
80 |
< |
CaseSensitiveParams: boolean=false): IStatement; override; |
80 |
> |
CaseSensitiveParams: boolean=false; CursorName: AnsiString=''): IStatement; override; |
81 |
|
|
82 |
|
{Events} |
83 |
|
function GetEventHandler(Events: TStrings): IEvents; override; |
335 |
|
end; |
336 |
|
|
337 |
|
function TFB30Attachment.Prepare(transaction: ITransaction; sql: AnsiString; |
338 |
< |
aSQLDialect: integer): IStatement; |
338 |
> |
aSQLDialect: integer; CursorName: AnsiString): IStatement; |
339 |
|
begin |
340 |
|
CheckHandle; |
341 |
< |
Result := TFB30Statement.Create(self,transaction,sql,aSQLDialect); |
341 |
> |
Result := TFB30Statement.Create(self,transaction,sql,aSQLDialect,CursorName); |
342 |
|
end; |
343 |
|
|
344 |
|
function TFB30Attachment.PrepareWithNamedParameters(transaction: ITransaction; |
345 |
|
sql: AnsiString; aSQLDialect: integer; GenerateParamNames: boolean; |
346 |
< |
CaseSensitiveParams: boolean): IStatement; |
346 |
> |
CaseSensitiveParams: boolean; CursorName: AnsiString): IStatement; |
347 |
|
begin |
348 |
|
CheckHandle; |
349 |
|
Result := TFB30Statement.CreateWithParameterNames(self,transaction,sql,aSQLDialect, |
350 |
< |
GenerateParamNames,CaseSensitiveParams); |
350 |
> |
GenerateParamNames,CaseSensitiveParams,CursorName); |
351 |
|
end; |
352 |
|
|
353 |
|
function TFB30Attachment.GetEventHandler(Events: TStrings): IEvents; |