Propriété wheremode pour TZquery

Version imprimable

10/04/2009, 09h17
Gandahar

Propriété wheremode pour TZquery

Bonjour à tous,

je suis nouveau sur Lazarus / ZeosLib mais j'ai pratiqué Delphi/BDE pendant 7 ans.
J'ai une appli qui se connecte à Oracle 10.2.0. Le problème que je rencontre est que systématiquement, la requête de mise à jour générée par le composant TZquery contient tous les champs dans la clause Where.
Le changement de la propriété wheremode n'y change rien.

est ce que quelqu'un a déjà eu ce genre de pb ?

Je suis sur Lazarus 0.9.26 / Zeoslib6.6.4.

Merci de votre aide.

Re,

j'ai trouvé la solution. cela vient d'un bug dans le fichier ZdbcOracleMetadata dans la function UncachedGetPrimaryKeys

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
    SQL := 'SELECT NULL AS TABLE_CAT, A.OWNER AS TABLE_SCHEM, A.TABLE_NAME,'
      + ' B.COLUMN_NAME, B.COLUMN_POSITION AS KEY_SEQ, A.INDEX_NAME AS PK_NAME'
      + ' FROM ALL_INDEXES A, ALL_IND_COLUMNS B'
      + ' WHERE A.OWNER=B.INDEX_OWNER AND A.INDEX_NAME=B.INDEX_NAME'
      + ' AND A.TABLE_OWNER=B.TABLE_OWNER AND A.TABLE_NAME=B.TABLE_NAME'
      + ' AND A.UNIQUENESS=''UNIQUE''';
//      + ' AND A.GENERATED=''Y'''
//      + ' AND A.INDEX_NAME LIKE ''SYS_%''';
    if Schema <> '' then
      SQL := SQL + ' AND A.OWNER=''' + Schema + '''';
    if Table <> '' then
//       SQL := SQL + ' AND A.TABLE_OWNER=''' + Table + '''';
        SQL := SQL + ' AND A.TABLE_NAME=''' + Table + '''';
    SQL := SQL + ' ORDER BY A.INDEX_NAME, B.COLUMN_POSITION';

12/04/2009, 08h45
SergioMaster

Bonjour

il serait peut être bon de leur ( a l'équipe des ZEOSxxxx) en faire la remarque , si ce n'est déjà fait ;)