Discussion :

[omen123]

Bonjour les amis ,

j'ai un petit souci avec une requête. enfaite j'ai une table nommé BTA elle contient 400.000 lignes , sur cette table il y a une requête nommée RQ_MAJ_REF_AUTO_GLOBAL . j'ai crée un module qui ce base sur cette requête afin de me generer un resultat .

le problème c'est que ce module s 'exécute sur 4 heures ou plus . cette requête m'a été créeé par un membre du grouppe il y a 4 ans de cela et ca marchait parfaitement - durée d exaction est de 10 min . mais j 'ai oublié comme il a fait pour optimiser la durée de plus j'ai fais des modif je crois que j'ai tt bousiller klk pourrais m aider plz.

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
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
Function fNumeroterSerie()
Dim odb As DAO.Database
Dim oRst As DAO.Recordset
Dim stRupture As String, stRuptClient As String
Dim lgCompteur As Long
 
Set odb = CurrentDb
Set oRst = odb.OpenRecordset("RQ_MAJ_REF_AUTO_GLOBAL", dbOpenDynaset)
stRuptClient = ""
lgCompteur = 0
Do Until oRst.EOF
    If Nz(oRst!CFR, "") <> stRuptClient Then
            ' rupture sur le client
            lgCompteur = 0
            stRuptClient = Nz(oRst!CFR, "")
            stRupture = ""
    End If
            ' Rupture sur le code si nul ou même série
    If Nz(oRst.Fields("CUMMULABLE_OLD"), "") <> stRupture Then
        stRupture = Nz(oRst.Fields("CUMMULABLE_OLD"), "")
        If oRst.Fields("NbOccur") > 1 Then lgCompteur = lgCompteur + 1
    End If
    oRst.Edit
    ' si le nombre d'occurences est égal à 1 on vide le champ sinon on met la valeur du compteur du groupe
    If oRst.Fields("NbOccur") = 1 Then oRst.Fields("CUMMULABLE") = Null _
        Else: oRst.Fields("CUMMULABLE") = lgCompteur
    oRst.Update
    oRst.MoveNext
Loop
oRst.Close
Set odb = Nothing
 
End Function

[tee_grandbois]

bonjour,
c'est moi qui t'ai donné le code ...
quelques précisions:
- quand tu ouvres la requête en mode "Affichage" et que tu veux aller au dernier enregistrement, combien de temps cela prend ?
- les champs CFR et CUMMULABLE_OLD sont ils indexés (il y a 4 ans, c'étaient les champs REF_TIERS et REF_AUTO_GLOBAL_OLD qui l'étaient) ?

[omen123]

bonjour TEE ,

c est exact c était ton code , j'ai fais la requête alors juste pour :

- l affichage --> plus de 11 min
- pour atteindre le dernier enregistrement --> 2 min et toute l application bloque !

les champs CFR et CUMMULABLE_OLD sont ils indexés : oui

(il y a 4 ans, c'étaient les champs REF_TIERS et REF_AUTO_GLOBAL_OLD qui l'étaient) --> il s agit d une autre requête , j'ai fais klk changement je crois que c est ca qui tous fais bousiller

quand je fais le test sur 100 ligne ca marche tres bien . reste a verifier apres le resultat.

ps : j ai mis la base en piece jointe

[tee_grandbois]

NUM_TIERS est-il aussi indexé ?
et quand tu enlèves le champ calculé NbOccur, combien de temps pour afficher le dernier ?

[tee_grandbois]

bonjour TEE ,

c est exact c était ton code , j'ai fais la requête alors juste pour :

- l affichage --> plus de 11 min
- pour atteindre le dernier enregistrement --> 2 min et toute l application bloque !

les champs CFR et CUMMULABLE_OLD sont ils indexés : oui

(il y a 4 ans, c'étaient les champs REF_TIERS et REF_AUTO_GLOBAL_OLD qui l'étaient) --> il s agit d une autre requête , j'ai fais klk changement je crois que c est ca qui tous fais bousiller

quand je fais le test sur 100 ligne ca marche tres bien . reste a verifier apres le resultat.

ps : j ai mis la base en piece jointe

en .zip les bases s'il te plait ...

[omen123]

ca prend une seconde

[omen123]

il y a un probleme sur le site aujourd hui , il n accepte pas le format zip c pour ca je l ai fait fomat Z z

[tee_grandbois]

il y a un probleme sur le site aujourd hui , il n accepte pas le format zip c pour ca je l ai fait fomat Z z

c'est pourtant natif dans Windows !

[omen123]

la base fait 50 mega , je crois que le site n accepte pas une tel capacité . pour le zipper je l ai deja fait

[omen123]

Apparement le fichier zip ne doit pas dépasse les 2mega je crois.

[tee_grandbois]

il faut que tu me donnes une base allégée (avec un millier d'enregistrements maxi)

[omen123]

re bonjour TEE ,

voila la base , juste pour INFO , sur un nombre de 10 000 enregistrement la requete marche bien et fais en envirion de 5 min .

merci

[tee_grandbois]

en ZIP, merci

[omen123]

Rebonjour Tee , desolé j'ai pas vu la forme voila l'app en piece jointe

[tee_grandbois]

merci.
Dans la foulée, peux-tu m'envoyer plus d'enregistrements de 01 BTA ?
Regarde combien cela fait 10 000 enregistrements zippés. si c'est plus de 2 Mo, envoie la table en découpant en plusieurs bases et en envoyant plusieurs messages

[tee_grandbois]

les champs CFR et CUMMULABLE_OLD sont ils indexés : oui

déjà, je constate que non pour CUMMULABLE_OLD:



de plus, il serait bien d'indexer également NUM_TIERS puisqu'il sert dans le comptage du champ calculé NbOccur dans la requête RQ_MAJ_REF_AUTO_GLOBAL

Essaie déjà avec ces modifications et si ce n'est pas plus rapide, il faudrait envisager d'ajouter un numéro auto pour avoir une clé primaire unique cela peut peut-être accélérer le traitement.

[omen123]

voila j'ai esseye de decouper, si t as besoin d'autres enregistrement fais moi signe

[tee_grandbois]

temps de traitement des 14317 enregistrements avec index sur CFR seulement: 3mn 40s

temps de traitement des 14317 enregistrements avec index sur CFR, CUMMULABLE_OLD et NUM_TIERS : 10s

il n'y a pas photo !

tu sais maintenant ce qu'il faut faire quand un traitement est trop long: les créations d'index, c'est primordial sur les champs utilisés pour des sélections ou des tris quand on traite des centaines de milliers d'enregistrements

[omen123]

re bonjour TEE ,

vraiment je sais pas ce qui s est passé !! je suis sur que j'ai fait l index sur les deux champs . j'ai regeneré les 400 000 enregistrements durée --> 14 min .je suis tres satisfait .

j'ai fait une verification aleatoire j'ai remarqué que j'ai le chiffre : 0 au niveau du champs cummulable normalement soit c est vide ou bien 1 ,2;3;4 ....

[tee_grandbois]

rappelle-moi la règle de mise à jour du champ ...