Discussion :

[goethe]

C++ builder 6.0, Dbase, Windows XP.
(J'utilise C++ builder, mais ma question concerne le composant delphi TQuery et l'accès au base de données.)

Bonjour,

J'ai un "problème" en voulant mettre a jour un résultat d'un TQuery (nbre enregistrement a mettre a jour > 5000).

Ma requête est dans le composant TQuery, une requete simple du type :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
SELECT *
FROM Matable
WHERE MaDate < :UneDate
AND MaDate < :UneAutreDate

Je mets a jour le résultat de cette TQuery avec une fonction du type :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
// Vous adapterez Pour delphi, mais ça change pas grand chose !
    TDataSet* pDS;
            pDS = MonQuery;
            while(!pDS->Eof)
            {
                        [...]
                        pDS->Fields->FieldByName("MonChamps")->Value = MaValeur;
                pDS->Next();
            }

Cette mise a jour va vite sur les premiers enregistrements, mais plus on avance dans la boucle plus le temps de mise a jour augmente, pour être multiplié par 20, sur les derniers enregistrement.

Je me retrouve donc a devoir faire cette mise a jour sur des ensembles plus petits (en jouant sur les dates) pour augmenter la rapidité de la mise a jour... Ce qui ne semble pas très logique.

Est-ce que quelqu'un aurait déjo rencontré ce problème, et encore mieux trouver une solution ?

D'avance :

[rbag]

Pour moi la solution serait de faire une requête d'update... J'ai expérimenté les mêmes problèmes sur des programmes qui faisaient des mises à jour comme cela. Avec un update, tu ne perds pas de temps au fur et à mesure des enregistrements:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
  Q := TQuery.Create(nil);
  try
    Q.DatabaseName := MonQuery.DatabaseName;
    Q.SQL.Text := 'update MaTable set MonChamps = :valeur  where MonAutreChamp = :valeur2 ';
 
    while not  MonQuery.Eof do 
    begin
      Q.ParamByName('Valeur').AsString := MaValeur;
      Q.ParamByName('Valeur').AsString := MaValeur2;
      Q.ExecSql;
      MonQuery.Next;
    end;
  finally
    Q.Free; 
  end;

[goethe]

En fait le problème c'est que la valeur que je rajoute est une clef primaire, qui n'existait pas jusque là !

Et la table ayant une 100 aine de champs avec des doublons potentiel, je ne peux donc pas identifier de manière unique mon enregistrement en cours. (et en plus mettre sans valeur dans mon "WHERE" n'est pas conseillé)

Celà dit, si je rajoute cette clef primaire, c'est justement pour pouvoir après, utiliser ta méthode !

[rbag]

Ca se complique ...

Ya pas en DBase l'équivalent du ROWID en Oracle ? Ca permettrait d'identifier les lignes de manière unique...

[Edit] Je crois que j'ai trouvé !!!

Rowid Pseudo-Column

Each dBASE record contains a special column named Rowid. This field contains a unique number that indicates the record's sequence in the database. For example, a table that contains 50 records has Rowid values from 1 to 50 (if no records are marked deleted). You can use Rowid in Where and Select clauses.

Rowid is particularly useful when you are updating records. You can retrieve the Rowid of the records in the database along with the other field values. For example:

SELECT last_name, first_name, salary, rowid FROM emp

Then, you can use the Rowid of the record that you want to update to ensure that you are updating the correct record and no other. For example:

UPDATE emp set salary = 40000 FROM emp WHERE rowid=21.

The fastest way of updating a single row is to use a Where clause with the Rowid. You cannot update the Rowid column.

Select statements that use the Rowid pseudo-column in the Where clause achieve maximum performance only for exact equality matches. If you use range scans instead of exact equality matches, a full table scan is performed. For example:

SELECT * FROM emp WHERE rowid=21 //fast search
SELECT * FROM emp WHERE rowid <=25 //full table scan

--> http://media.datadirect.com/download/docs/odbc/odbcref/dbase.html

[goethe]

Merci por le lien, très intéressant.

Hélas, je ne peux pas accéder a ce champs rowid, ni sous builder, ni dans une requête simple....