Discussion :

[PapouDomi]

Bonjour a tous.
Ma requête ajout, basée sur deux tables comportant une relation incluant tous les enregistrement de la table de gauche et seulement ceux de la table de droite pour lesquels les champs joints sont égaux ajoute des enregistrement comportant une valeur nulle dans ma table destination à chaque enregistrement absent de la table de droite.
J'ai besoin, pour des commodités de traitement obtenir la valeur 0 au lieu de "NULL".
Pour cela j'ai écrit la fonction de conversion suivante:

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
Public Function ConvQte(ByVal Qte As Variant) As Variant
'Cette fonction convertit les quantités nulles en 0
 
  On Error GoTo TrtErr
 
  If Not IsNull(Qte) Then
    ConvQte = Qte
  Else
    ConvQte = 0
  End If
 
  Exit Function
TrtErr:
  Error Err 'Retour à la gestion  d'erreur de la procédure appelante
End Function

Malheurement, traitant plusieurs dizaines de milliers d'enregistrements et la fonction étant appelée à chaque enregistrement, le temps de traitement devient vite excessif.
Avez vous une solution pour contourner ce problème?
Merci, cordialement.

[philben]

bonjour,

avez-vous essayé directement dans votre requete sql la fonction NZ() ?
Dans le QBE (avec le point-virgule) et en SQL mettre une <,> :

Code :

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

NZ([MonChamp];0)

Voir aide d'access pour plus de détails

Philippe

[LE VIEUX]

bonsoir,
pourquoi ne pas mettre la valeur par défaut du champ dans la table à 0 pour les nouveaux enregistrements et s'il faut rattraper ceux déjà saisis une requête ou un recordset qui met la valeur par défaut à 0 pour ceux existants.

[PapouDomi]

Bonjour
LE VIEUX a dit: pourquoi ne pas mettre la valeur par défaut du champ dans la table à 0 pour les nouveaux enregistrements.
Cela est déjà fait, "NULL" n'est pas un résultat par défaut car la requête Ajout inscrit réellement "NULL".

Par contre la fonction NZ fonctionne et donne des résultats encourageants en terme de vitesse, mais il faudra que j'en vérifie la rapidité de fonctionnement lorsque la base de données arrivera à son taux de remplissage courant.
Merci à tous, mais je suis toujours preneur d'autres solutions.

[Tofalu]

Bonjour

Et ceci :

Code :

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

1
2
3
4
5
6
Public Function ConvQte(ByRef Qte As Variant) As Integer
'Cette fonction convertit les quantités nulles en 0
On Error GoTo TrtErr
ConvQte = Qte
TrtErr:
End Function

Pas dit que ce soit plus rapide que Nz

[PapouDomi]

Bonjour.
J'ai essayé la fonction NZ qui est beaucoup plus rapide que celle que j'avais écrite et j'ai ainsi gagné un temps non négligeable.
Mon appli réelle comportant beaucoup plus de liaisons comme celle décrite, j'ai finalement opté pour effectuer un récapitulatif de tous les calculs dans une seul table que je met à jour à chaque ajout ou modification, ainsi la fonction NZ est utilisée uniquement lors de ces mises à jour et non plus dans plusieurs dizaines de requêtes.
Merci à tous. Cordialement.

[chamma9]

svp expliquer moi

Bonjour a tous.
Ma requête ajout, basée sur deux tables comportant une relation incluant tous les enregistrement de la table de gauche et seulement ceux de la table de droite pour lesquels les champs joints sont égaux ajoute des enregistrement comportant une valeur nulle dans ma table destination à chaque enregistrement absent de la table de droite.
J'ai besoin, pour des commodités de traitement obtenir la valeur 0 au lieu de "NULL".
Pour cela j'ai écrit la fonction de conversion suivante:

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
Public Function ConvQte(ByVal Qte As Variant) As Variant
'Cette fonction convertit les quantités nulles en 0
 
  On Error GoTo TrtErr
 
  If Not IsNull(Qte) Then
    ConvQte = Qte
  Else
    ConvQte = 0
  End If
 
  Exit Function
TrtErr:
  Error Err 'Retour à la gestion  d'erreur de la procédure appelante
End Function

Malheurement, traitant plusieurs dizaines de milliers d'enregistrements et la fonction étant appelée à chaque enregistrement, le temps de traitement devient vite excessif.
Avez vous une solution pour contourner ce problème?
Merci, cordialement.