Subject | Re: [IBO] TIBOTable and TIBOQuery problem |
---|---|
Author | Hans |
Post date | 2005-01-30T05:54:54Z |
The ad says TIBOTable 100% compatible, thus it is not .. lol
----- Original Message -----
From: "Helen Borrie" <helebor@...>
To: <IBObjects@yahoogroups.com>
Sent: Saturday, January 29, 2005 10:26 PM
Subject: Re: [IBO] TIBOTable and TIBOQuery problem
>
> Hello Hans,
>
> At 06:14 PM 29/01/2005 -0700, you wrote:
>
>>Hello Jason,
>>
>>TIBOTable and TIBOQuery problem.
>>
>> AppendRecord doesn't honor or insert according to specified
>> GeneratorLinks
>>
>> Table 'IHist' has only one primary key
>>
>>with frmCompanyDatabase.IHist do
>> begin
>> SessionName := 'mySession';
>> DatabaseName := 'myDatabase';
>> TableName := 'IHist';
>> GeneratorLinks.Clear;
>> GeneratorLinks.Add('IHistID=IHist_IHistID');
>>
>> open;
>> append;
>> post;
>> append;
>> post;
>> append;
>> post;
>>
>>/* Three records get appended correctly with auto generator link values
>>for field 'IHistID' */
>>
>> AppendRecord([nil, 1, 1, LastMonthYear, LastMonth, 1,
>> EncodeDate(LastMonthYear, LastMonth, 1), 500, Null, 'Physical Count',
>> Null, 1, Null]);
>>
>>/* However the AppendRecord raises exception
>>
>> violation of PRIMARY or UNIQUE KEY constraint "INTEG_88" on table
>> "IHIST" */
>>
>> end;
>
> GeneratorLinks get triggered by a call to Insert(). IBO translates a call
> to Append() into Insert().
>
> AppendRecord is a TDataset method that is appropriate to databases that
> insert records by physically appending them to a file (like Paradox,
> Access, MySQL, dBase, etc.). Firebird and InterBase never append records,
> since they have no implicit physical order in storage.
>
> You can call AppendRecord() but, f you must, then pass the actual value
> for
> the generated key, not "nil". That is, use the GEN_ID() function of the
> TIB_Connection, via the dataset's IB_Connection property, as follows:
>
> AppendRecord([IB_Connection.Gen_ID(IHist_IHistID,1), 1, 1, LastMonthYear,
> LastMonth, 1, EncodeDate(LastMonthYear, LastMonth, 1), 500, Null,
> 'Physical
> Count', Null, 1, Null]);
>
> Helen
>
>
>
>
>
> ___________________________________________________________________________
> IB Objects - direct, complete, custom connectivity to Firebird or
> InterBase
> without the need for BDE, ODBC or any other layer.
> ___________________________________________________________________________
> http://www.ibobjects.com - your IBO community resource for Tech Info
> papers,
> keyword-searchable FAQ, community code contributions and more !
> Yahoo! Groups Links
>
>
>
>
>
>
>