Discussion :

[windsor]

Bonjour,

j'ai fait une connexion sql avec mon AS400 afin de pouvoir lire des tables et pouvoir faire un certain nombre de requête.

Mon problème principal aujourd'hui, c'est une table de l'AS400 comportant 700 000 enregistrements, il me faut environ 4 minutes pour l'afficher dans une table de WINDEV.

Code :

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

1
2
3
4
5
6
7
8
9
10
 
ResSQL est un booléen
	ResSQL = SQLExec("SELECT * FROM TOTO.TOTO1", "REQ1")
	SI ResSQL ALORS
		SQLTable("REQ1","TABLE_TOTO1")
		nNbenr est un entier = TableOccurrence(TABLE_TOTO1)
	SINON
		// Erreur SQL
	FIN
	SQLFerme("REQ1")

Existe-t-il un moyen de le fair eplus rapidement.

A SAVOIR :
J'avais pensé à importer qu'une partie de la table mais je suis bien obligé de la lire pour y mettre des conditions, du coup, c'est pa splus rapide.

Si quelqu'un a une idée révolutionnaire, je suis preneur.

[Raptor92]

Bonjour,

L'idée n'est absolument pas révolutionnaire, mais vous devriez bannir les * de vos requêtes et mettre les champs.
Il se trouve que cela est une des raisons de lenteur.

Mais je vous l'accorde, cela ne va pas diviser le temps par 2.

Question: avez vous beaucoup de champs, et si oui, avez vous besoin de tous ?

Personnellement, à 350 milles enregistrement, je mets environ de 60 à 80 secondes.

Si j'ai une autre idée.................

Bonne après midi

[windsor]

Bonjour Raptor92,

Il y a environ 70 champs et j'ai pas bien le choix, je suis obligé de tous les récupérer.

En fait, il y a un champs date (environ 5 ans d'historique), j'ai besoin de récupérer au mieux les 2 dernières, j'ai pensé parcourir la table en commençant par la fin et remonter et lui dire de s'arrêter de lire quand la date est supérieure à 2 ans.

[Raptor92]

Bonsoir,

Si je comprends bien, une des conditions possible est de limiter la recherche à deux années de données.

Si c'est cela, pourquoi ne pas intégrer cette condition dans votre requête:

Code :

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

WHERE DATE <='20080724'

Cela augmenterais la vitesse de recherche.
Enfin, c'est juste une piste

Bonne soirée

[vmolines]

Bonsoir,

Votre syntaxe de SQLTable n'utilise pas le fetch partiel donc toutes les données doivent être transférées avant d'avoir la main. Préférez donc le fetch partiel.

[windsor]

Tout d'abord, un merci à Raptor92.

C'est tout simple et je n'y est même pas pensé, en utilisant cette méthode, je suis au alentour de 1 minute 30 d'attente, c'est déjà mieux.

(Vemolines) La syntaxe fetch partiel, je ne la connais pas bien, je suppose que c'est avec SqlAvance, si vous avez un petit exemple à me donner, je ferais volontier l'essai pour comparer et voir si je peux encore réduire le temps d'attente qui est très mal perçu par l'utilisateur.

En tout cas merci por votre aide qui est très précieuse.

[Raptor92]

Bonjour,

Vu que vous êtes nouveau sur le forum, nous n'allons pas faire preuve agressivité (humour!!!) à votre égard.

Pour autant, il est de règle que nous fassions preuve de recherche et de tentatives avant de faire appel à une aide de l'un des membres.

Vmolines (que je salue) vous a donné une piste complémentaire de la mienne, je pense que vous auriez rechercher sur l'aide Windev avant de répondre.
De plus, en nous communiquant le code que vous avez trouver, nous aurions pût mieux vous épauller.

En attendant, voici un exemple de code fonctionnel utilisant "sqlFetch":

Code :

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

1
2
3
4
5
6
7
Requete="SELECT..............................WHERE................................................."
SI SQLExec(Requete,ReqName) ALORS
	SI SQLFetch(ReqName)=0 ALORS
		imprimante=SQLLitCol(ReqName,1)
	FIN
FIN
SQLFerme(ReqName)

Pour conclure, ne prenez pas mal les remarques, elles n'ont rien de désobligeantes, nous sommes tous passés par ce stade, et force de constater que ce sont ces remarques qui m'ont aider à comprendre.

Bon courage

[Bowen]

Moi je dirais de faire un multitâche(-1) dans une boucle de lecture, ça rendrait la main à l'utilisateur pendant le remplissage. Par contre, ça ne réduit pas le temps de remplissage. La seule façon (avec Windev) d'aller plus vite, c'est de réduire le nombre de lignes à afficher.