MantisBT - Issues

0000256: If SVN 903 is the latest revision, the installation of the package blocks with FPC 2.6

Thu, 02 Feb 2012 09:52:17 +0100

Hello,

To install Zeos SVN 903 in lazarus (if that is the last SVN Revision*).

[list]in lazarus 0.9.31-34335-fpc-[b]2.5[/b].1-20111221.win32 : no problem[/list]
but
[list]in lazarus 0.9.31-35069-fpc-[b]2.6[/b].1-20120201.win32 : Enum TFieldType.ftInteger lazarus\fpc\2.6.1\source\packages\fcl-db\src\base\db.pas (110,50).

While waiting for the patch, I can fix like this:

\src\component\ZAbstractRODataset.pas [Lines 3480 and following]:
[code]
{$IFDEF FPC}
const
BaseFieldTypes: array[TFieldType] of TFieldType = (
ftUnknown, ftString, ftSmallint, ftInteger, ftWord,
ftBoolean, ftFloat, ftCurrency, ftBCD, ftDate, ftTime, ftDateTime,
ftBytes, ftVarBytes, ftAutoInc, ftBlob, ftMemo, ftGraphic, ftFmtMemo,
ftParadoxOle, ftDBaseOle, ftTypedBinary, ftCursor, ftFixedChar,
ftWideString, ftLargeint, ftADT, ftArray, ftReference,
ftDataSet, ftOraBlob, ftOraClob, ftVariant, ftInterface,
ftIDispatch, ftGuid, ftTimeStamp, ftFMTBcd, ftFixedWideChar, ftWideMemo);
{$ELSE}
{$IFDEF VER180}... [/code][/list]

* In http://zeos.firmos.at/portal.php, [^] I read Revision 966 or 968 ? Which directory of SVN ? I tried
svn://zeos.firmos.at/zeos/branches/testing [^] --> Revision 903
svn://zeos.firmos.at/zeos/trunk [^] --> Revision 903 ?
Regards.

0000255: Error: List index out of bounds when try select from table-value function

Wed, 01 Feb 2012 07:05:58 +0100

When try select query from table-value function, get error: List index out of bounds. Error occurs on MSSQL 2000, 2005, 2008 and 2008r2.
Problem is in file "ZDbcDbLibMsSqlMetadata.pas". Patch from attachment solves the problem.

Best regards

0000254: TZMySQLStatement.ExecuteQuery error

Tue, 24 Jan 2012 23:06:29 +0100

TZMySQLStatement.ExecuteQuery, using string as WideString, the parameter SQL: string, is incorrectly handled.

0000253: Error when ZTable.Exists

Tue, 24 Jan 2012 22:50:26 +0100

Using a MySQL database:
ZTable1: TZTable;
With ZTable1.Exists fails: The table name is interpreted as the name of the database.

0000214: Inserting Unicode strings into UTF-8 firebird database via prepared statements fails in two ways

Sat, 24 Dec 2011 14:35:59 +0100

Database: Firebird 2.1.3 (latest as of 2010-01-04)
ZEOSLib: 7.0.0 (latest from SVN trunk as of 2010-01-04)
System: Windows (english) mit CodeGear Delphi 2009

Situation:

I have a firebird-2.1 database with UTF-8 as default charset and a single table t with two columns i (integer) and s (string). I insert a row into the table via a prepared statement "insert into t(i,s) values (:i1,:s1)". Depending on the contents of the unicode string given as named parameter s1, I see the following behavior:

1. String contains german Umlauts: query fails with malformed string error
2. String contains ASCII chars and cyrillic letters: query succeeds but reading back the row via select gives the original string with the cyrillic letters replaced by question marks
3. String contains only ASCII chars: query succeeds but reading back the row via select gives the original string

I consider cases 1 and 2 as errors.

If no parameter is used for the insert query, i.e. using something like "insert into t(i,s) values (:i1,'+QuotedStr(s)+')'" all three cases are correct.

For sample code see Additional Information. Minimalistic program to reproduce the error promptly available on request.

Please let me know what I can do to track down the bug.

bn

0000251: Crash when calling .AsString on calculated fields in certain circumstances

Wed, 26 Oct 2011 21:23:23 +0200

In certain instances calling the .AsString method of a calculated field on a ZQuery object causes a crash.

Reported here
http://stackoverflow.com/questions/6723400/zeoslib-loop-over-calculated-fields/ [^]

0000233: Compilation with FPC 2.4.2 or lower version is broken on OS other than Windows

Mon, 10 Oct 2011 13:35:32 +0200

The patch attached to bug report 231 (http://zeosbugs.firmos.at/view.php?id=231 [^]) resolves compilation with fpc 2.5.1. However it breaks compilation with stable fpc 2.4.2 or lower.

0000252: SQLite don't recognizes the datatype of a field with expressions.

Mon, 03 Oct 2011 13:49:14 +0200

Using Zeos with SQLite with queries that uses expressions, the result of expressions always are evaluated to String.

Using a TZQuery with the following query:

SELECT
tbl_batelada.*,
avg(ch1.Tensao) as TMCabeca,
round(avg(ch1.Corrente), 3) as CMCabeca,
round(((julianday(Max(ch1.dt_registro))-julianday(Min(ch1.dt_registro)))*86400),3) as DuracaoCabeca,
(SELECT round(avg(Tensao),3) FROM tbl_itensbatelada WHERE cd_batelada=tbl_batelada.id_batelada and cd_canal=2) as TMPeito,
(SELECT round(avg(corrente),3) FROM tbl_itensbatelada WHERE cd_batelada=tbl_batelada.id_batelada and cd_canal=2) as CMPeito,
(SELECT round((julianday(max(dt_registro))-julianday(min(dt_registro)))*86400, 3) FROM tbl_itensbatelada WHERE cd_batelada=tbl_batelada.id_batelada and cd_canal=2) as DuracaoPeito
FROM
tbl_batelada
LEFT JOIN tbl_itensbatelada ch1 ON ch1.cd_batelada=tbl_batelada.id_batelada AND ch1.cd_canal=1
GROUP By tbl_batelada.id_batelada

If you double-click on TZQuery and add these fields into the project:

TMCabeca, CMCabeca, DuracaoCabeca, TMPeito, CMPeito, DuracaoPeito

It will be added as TStringField.

Attached is a patch that solves this.

0000248: D2010 and Sqlite3 TZQuery there is a problem with character coding.

Mon, 03 Oct 2011 03:13:05 +0200

SPECIAL_CHARACTER is corrupted when i use TZQuery .
Like: ÆØÅ). the special chars is correctly stored in the Sqlite3

Best regards Ole

0000185: cacheupdate fails in master/detail

Mon, 12 Sep 2011 20:02:53 +0200

I'm using 2 ZQuery componants.

Master Query (ZQuery):

Name := ZQM
CachedUpdates := True;
SQL := 'SELECT * FROM MASTER'

DataSource1.DataSet := ZQM
MDbGrid.DataSource := DataSource1

Detail Query (ZQuery):

Name := ZQD
CachedUpdates := True
SQL := 'SELECT * FROM MASTER WHERE TNO = :TNO'
ZQD.DataSource := DataSource1
DataSource2.DataSet := ZQD
DDbGrid.DataSource := DataSource2

event ->
ZQD.OnNewRecord(....)
begin
ZQD.FieldByName('TNO').asInteger := ZQM.FieldByName('TNO').asInteger;
end

Save Button (TButton):

SaveButton.onclick(....)
begin
ZQM.ApplyUpdates;
ZQD.ApplyUpdates;
ZQM.CommitUpdates;
ZQD.CommitUpdates;
end;

-----------------------------------------------
When press save button after feeding one record in master table
and some records in detail table only master records saved.
all records in detail table are lost.

===============================================
Reason & Solution:

Here is the bug in code:

procedure TZAbstractDataset.ApplyUpdates;
begin
if not Active then Exit;

Connection.ShowSQLHourGlass;
try
if State in [dsEdit, dsInsert] then Post;

DoBeforeApplyUpdates; {bangfauzan addition}

if CachedResultSet <> nil then
CachedResultSet.PostUpdates;
======================================>> this statement causes to lost in
if not (State in [dsInactive]) then >> detail table even i set
Resync([]); >> doAlwaysDetailReSync to false
======================================>>
DOAfterApplyUpdates; {bangfauzan addition}

finally
Connection.HideSqlHourGlass;
end;
end;

0000249: Problem with blank lines

Sat, 28 May 2011 20:48:13 +0200

Everything below was done on the basis of code from HEAD Zeoslib 888 svn://zeos.firmos.at/zeos/branches/testing [^]
Let's create a test database to firebird table test:
[code]
set sql dialect 3;
set names utf8;
create database '\ FlyChange \ Test.fdb'
user 'sysdba' password 'masterkey'
page_size 16384
default character set utf8;

CREATE TABLE TEST (
ID Integer,
NAME CHAR (7)
Constraint PK_TEST Primary Key (ID)
);
[/code]
Let's write a simple project with the code on the button:
[Code]
procedure TForm1.Button1Click (Sender: TObject);
const
SQLq = 'update or insert into test (id, name) values ??(:id,:name)';
begin
Query.SQL.Text: = SQLq;
Query.Params[0].AsInteger := 1;
Query.Params[1].AsString := '';
Query.ExecSQL;
Query.Params[0].AsInteger := 2;
Query.Params[1].AsString := '';
Query.ExecSQL;
end;
[/code]
If you try to run the code as shown above, then the error occurs:
[code]
SQL Error: Dynamic SQL Error SQL error code = -804 Incorrect values within SQLDA structure. Error Code: -804. An error was found in the application program input parameters for the SQL statement. The SQL: update or insert into test (id,name) values (?,?);
[/code]
Error does not occur in the following cases:
1) If you specify a non-empty 1-th parameter, that is, 'asdf', 'qwer', etc.
2) If you call once ExecSQL.
3) If after the first ExecSQL add a line Query.SQL.Text: = SQLq;
4) If in the database instead of CHAR to VARCHAR.
That is, this bug for some reason there is only one case.

0000240: The string field is not set to correct size...

Sat, 28 May 2011 20:26:00 +0200

Hi!

I tried to run a ZQuery to get the table

"ntax_bejovo_konyvelesi_tipusok"

primary keys.

select r.relname as "Table", c.conname,
contype as "Constraint Type"
from pg_class r, pg_constraint c
where r.oid = c.conrelid;

In PGADMIN and EMS PG Manager I got good result, the:

"ntax_bejovo_konyvelesi_tipusok_pkey"

But Zeos Query is set the Field Size to 32, and I don't found the needed columns of the primary key in the next Query...

When I cast the field:

cast(c.conname as varchar(100)),

the field size is correctly 100.

Is this bug, or this based on "unknown field type" of PG that automatically set to 32... :-(

Thanks:
dd

0000250: raise SQL error when left joining sub-queries

Wed, 25 May 2011 14:37:44 +0200

i got an error when left joining sub-queries on mysql 5 using delphi 7 and zeosdbo 6.6.6
but when i use the query in phpmyadmin, it successfully executed

also when i change the left join to inner join, the query executed successfully

0000241: Update ZPropertyEditor to be used by others projects.

Wed, 27 Apr 2011 22:42:09 +0200

Attached is a patch to make ZPropertyEditor.pas usable by other projects. With this patch, I can use some property editors of the ZeosLib with some components that uses Zeos.

With this patch, my new property editor (based on some property editors of the Zeos) only return the ZConnection that is hide/stored on my component. If in the future, some property editor of the Zeos changes, I'll have no impact.

0000244: TZOracleDatabaseMetadata.UncachedGetPrimaryKeys doesn't result PK if it's named

Wed, 20 Apr 2011 09:36:14 +0200

TZOracleDatabaseMetadata.UncachedGetPrimaryKeys always search for PK auto named by Oracle ('SYS_%').
It doesn't retry PK's named by user.

See ZDbcOracleMetadata.pas comment at line 1506.

0000247: Blob handling problem with Delphi6 / PG9.0

Wed, 13 Apr 2011 12:34:53 +0200

Hi!

The problem is that I got wrong result in BlobField.LoadFromStream.
The loaded stream not what I posted before... :-(

In the PG list I got answer that something changed in PG9.0.

You can read about here:
http://archives.postgresql.org/pgsql-general/2011-04/msg00424.php [^]

Thanks:
dd

0000246: The prepared insert many times slower than formatted SQL insert

Wed, 13 Apr 2011 12:05:40 +0200

Hi!

I have a migrator program that needs to copy a 1,5 GB database from a DB to PGSQL.
The table copier section used first Table, later parameterized insert Query.

In other adapters/dbs if I prepare a Query, the it will be faster, because I needs to change the parameters only. So I choose this way first.

But the speed was 1:30-1:50 hours, nevertheless I create multiprocess uploaded with "HIGH" process speed.

Today I tried to forget the parameters: I render the Queries (insert SQL-s) with my code, and run them.

And I very wondered:
A table with 500.000 records with parameterized Query running 45-55 minutes, with rendered insertions running 18 minutes only!
Same table, same context, etc... :-(

So something is seems to be wrong with this mode, if I can be faster than parameterized queries!

The total time of the DB copy is decreased to 44 minutes (from 1:50)!
So something is seems to be wrong with parameterized mode.

Thanks:
dd

0000245: Failed to recover metadata info when user has SELECT ANY TABLE privilege

Mon, 11 Apr 2011 19:56:42 +0200

When a user has SELECT ANY TABLE privilege and there are another user that own's a table with same name that first on, TZOracleDatabaseMetadata.UncachedGetTables / UncachedGetColumns return wrong values if there is no schema present at a query.

See comments identified by Laercio on ZDbcOracleMetadata.pas.

0000243: Numeric overflow with a column like NUMBER(15,0)

Mon, 11 Apr 2011 17:10:03 +0200

I was getting numeric overflow when having Oracle column with NUMBER(15,0).

I did some changes on source code to solve the problem and put it into attachment.
The changes are made in ZDbcOracleResultSet.pas and ZDbcOracleUtils.pas and commented with 'Laercio'.

0000242: Encoding/handling of NULL blobs are not working good

Mon, 11 Apr 2011 13:55:11 +0200

I tried to copy datas from a dataset to an sql query.

ftBlob:
begin
stm := TMemoryStream.Create;
try
TBlobField(sf).SaveToStream(stm);
stm.Position := 0;
par.LoadFromStream(stm, ftBlob);
finally
stm.Free;
end;
end;

When the source field (sf) was IsNull, the savetostream save none of bytes.
When I tried to load, it was working, but on Exec of the query I got access violation on this line:

result:= FPlainDriver.EncodeBYTEA(TempBlob.GetString,FHandle); // FirmOS

ZDbcPostgreSqlStatement: 393.

0000239: Zeos 7: The use of parameters (ParamByName) does not work in SQL Server.

Wed, 23 Mar 2011 14:03:53 +0100

Using Delphi XE: I discovered it needs the kind of field (TZSQLType) "stUnicodeString"

in function:
"function PrepareSQLParameter (Value: TZVariant; paramTypes: TZSQLType): string;"

Inside the file "ZDbcDbLibUtils.pas.

==> In line 273

0000238: Oracle connection fails when set with property connected in IDE (Ora-error-12154)

Thu, 10 Mar 2011 14:32:24 +0100

Using a tzconnection component to connect with a Oracle server fails when setting the property connected=true in design mode. Trying to do so a oracle error-12154 will be triggered. The same configuration works fine when setting the property with a procedure call:

for example
...
procedure TForm1.Button1Click(Sender: TObject);
begin
ZConnection1.Connected:=true;
if ZConnection1.Connected then begin
ShowMessage('bingo');
ZQuery1.Open;
if ZQuery1.Active then begin
ShowMessage('noch mal bingo');
end;
end;
end;
...

0000237: ftBlob Statementparameter do not work in queries

Mon, 28 Feb 2011 18:22:24 +0100

We are using the Oracle raw(16) datatype to emulate guid fields. Raw(16) can be
indexed and queried in Oracle with a Hexstring of the binary content.

in zeos raw(16) columns can be queried as

select * from pberichte where idbericht="0123456789ABCDEF"

or

...
pberichte.close;
pberichte.parambyname('idbericht').value="0123456789ABCDEF";
pberichte.open;
...

using raw(16) fields in Master/Detail Relations do not work

select * from pberichte where idbericht=:id

breaks with a Oracle error message.

Mapping a ftblob parameter to string and replacing the field value with its
hex representation works fine.

0000236: Morfik bug with zeos-package-fx3.0-v1.1

Sun, 27 Feb 2011 23:48:13 +0100

When trying to use the Zeos Package in conjunction with the Morfik when deleting a registry error occurs and the record will not actually deleted from the table.

0000235: Commands out of sync error causes mysql to stay stuck after illegal TQuery.ExecSQL

Mon, 10 Jan 2011 16:45:07 +0100

I've patched TZMySQLResultSet.Close as suggested in issue 000220.
(Thanks Shkil}
When I do that using TQuery.Open with a stored procedure works great the first time and all subsequent times.

HOWEVER: If I run TZQuery.ExecSQL (not valid for a stored proc with resultset, I know) I get "Commands out of sync..." error and MySQL/Zeos will not let me out of that one.

I don't mind getting an error, but I don't want to have to disconnect and reconnect to the database just to fix being stuck.