Discussion :

[fkaus]

Salut,

J'ai chercher cette le réponse a ce problème partout sur le web et j'ai essayé toutes les solutions que je pourrais trouver. Mon problème avec ceci est tout à fait différent des autres. c-a-d, le scénario pour que je reçois cette erreur est différent.

Je vais vous expliquer ci-dessous:

J'ai un bouton sur une fenêtre, quand je clique dessus, un calendrier est ouvert. Sur ce calendrier, il y a une date de travail par défaut. Lorsque je valide cette date pour qu'il me la liste une liste des élément ce trouver dans l'archives pour ce date exacte, le programme plante et j'obtiens l'erreur wdtst.exe.

Mais, si je sélectionne une autre date sur le calendrier autre que la date de travail par défaut, la liste des archives sous les autres dates respective sont répertoriés correctement et il le programme ne plante pas.

J'ai essayé d'utiliser une base de données différente du même projet appartenant à un autre client et j'ai remarqué que je reçois pas cette erreur. J'ai cette erreur sur une base de données d'un autre client.

Je suis coincés et je ne sais pas quoi faire.

Veuillez m'aider ou m'orienter comment résoudre ce problème.

Merci.

[R&B]

Bonjour

1- Evaluez les retours de fonctions.
Vous testez votre projet (WDtst) et obtenez une erreur fatale (ou exception) qui rends impossible l'exécution du programme.
La gestion des exceptions ne doit pas se substituer aux tests de retour des fonctions que vous utilisez.

Ainsi par exemple si vous lisez un enregistrement d'un fichier HFSQL, HLit(Fichier), il faut évaluer que la lecture a bien eu lieu avant de poursuivre...

Code :

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

1
2
3
4
5
SI PAS HLit(Fichier) ALORS
   ... ce que l'on doit faire en cas d'échec de lecture, en l'occurrence de l'exemple ne pas continuer...
   RETOUR
FIN
... traitement si la lecture a eu lieu...

Ainsi le comportement de votre logiciel évitera un grand nombre d'erreur fatales.

2- Isolez
le mode test à un possibilité importante : le débuggueur. Utilisez le !
Placer des point d'arret sur le code qui vous même à l'erreur, et localisez l'erreur par dichotomie dans le déroulement de votre code.

3- Communiquez avec des éléments
Si, une fois le nez sur l'erreur (et en ayant analysé les contextes de variables, de fichier etc), vous ne trouvez pas la raison, communiquez votre erreur en donnant :
- la syntaxe en cause
- les valeur que vous aurez exclus des erreurs (via vos tests)
- le message d'erreur obtenu

J'espère alors que vous trouverez de l'aide parce que le lecture de votre message ne nous permet en rien de savoir de quoi vous parlez et donc de vous aider.

[fkaus]

Je pense que le problème se trouve au niveau du calendrier pour la date de travail du 08/04/14. Parce que pour les autre dates, j'ai aucun souci.

Voici le code ci-dessous:

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
FONCTION Calendrier(Lb_FermeApresSelection est un booléen = Vrai)
// pbFermeAprèsSélection=vrai : l'utilisateur souhaite fermer 
// directement la fenêtre après avoir choisi une date
 
LfsDate est une Date = gs_Date_En_Cours	// Date manipulée
 
 
 
 
// Initialisation des champs
Annee..Libellé = " "+LfsDate..Année+" "
Mois..Libellé  = " "+EntierVersMoisEnLettre(LfsDate)+" "
 
SI PAS Lb_FermeApresSelection ALORS
	// on affiche un bouton de validation
	BTN_VALIDER..Visible=Vrai
FIN
 
// expression littérale
NousSommes = " Date de travail : "+EntierVersJourEnLettre(LfsDate) + " " + LfsDate..Jour + " " +...
			EntierVersMoisEnLettre(LfsDate) + " " + LfsDate..Année+" "
 
Redimension_TPV()
 
// Afficher le calendrier
CreerCalendrier()

Ça peut aussi être cette fonction pour la lecture de la date de travail

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
34
35
36
37
38
39
40
41
42
43
FONCTION Lecture_Date_de_Travail(Ls_Numero_Site = gs_cle_osit, Lb_Ouverture_Initialisation = Faux)
// Passage en paramètre du numéro de site sur lequel on souhaite obtenir la date de travail.
// Le deuxième paramètre indique si en cas d'erreur de lecture de cette date on ouvre une fenêtre d'initialisation
// permettant une saisie de cette date.
Ls_Resultat est une chaîne
TxtReq est une chaîne
Lb_ResulReq est un booléen				// Résultat de la requête
 
TxtReq = "SELECT Zdiv_data1 FROM ZDIV001 WHERE Zdiv_cle_para = 'DATTRAVAIL' AND Zdiv_cle_osit = '" + Ls_Numero_Site + "'"
Lb_ResulReq = SQLExec(TxtReq, "req_ZDIV")
SI Lb_Ouverture_Initialisation = Vrai ET Lb_ResulReq = Faux ALORS
	SQLFerme("req_ZDIV")
	Erreur("Problème dans l'initialisation de la date de travail sur le site numéro " + Ls_Numero_Site + ".")
	Ferme()
FIN
SQLPremier("req_ZDIV")
SI SQL.NbLig > 0 ALORS
	Ls_Resultat = SansEspace(Gauche(SQLCol("req_ZDIV", 1), 8))
SINON
	SI Lb_Ouverture_Initialisation = Vrai ALORS
		SQLFerme("req_ZDIV")
		Ls_Resultat = Ouvre(initialisation, gs_Date_En_Cours)
	SINON
		Lb_ResulReq = Faux
	FIN
FIN
SI Taille(Ls_Resultat) <> 8 ALORS 
	SI Lb_Ouverture_Initialisation = Vrai ALORS
		Ls_Resultat = Ouvre(initialisation, gs_Date_En_Cours)
		Ferme()
	SINON
		Lb_ResulReq = Faux
	FIN
FIN
SQLFerme("req_ZDIV")
SI Lb_ResulReq = Faux ALORS
	Erreur("Problème dans l'initialisation de la date de travail sur le site numéro " + Ls_Numero_Site + ".")
	Ferme()
SINON
	// Transformation de la date de travail récupérée au format JJMMAAAA vers le format AAAAMMJJ
	Ls_Resultat = DateVersChaîne(ChaîneVersDate(Ls_Resultat, "JJMMAAAA"), "AAAAMMJJ")
	RENVOYER Ls_Resultat
FIN

[wd_newbie]

Bonjour,

je n'ai pas vu ton numéro de version WD dans ton message.

De mon côté j'avais eu un truc bizarre lors du passage de la la version 18 ==> 19 , une de mes requête plantait absolument tous mes GO avec l’environnement de développement.

J'ai modifié la requête est tout est OK. C'est un truc que ne posait pas de soucis depuis la version 10 sous laquelle l'appli avait été commencée.

Olivier

[fkaus]

Bonjour wd_newbie,

Je me sers de Windev 17.

Peut tu me dire comment t'a fait pour identifier cette requête. J'essaie sans cesse de trouver le problème mais en vain. J'ai essayer le pas à pas, sans succès.

De l'aide s'il vous plait.

Merci.

[fkaus]

Le problème persiste quand je créer un exécutable, pas seulement avec l’environnement de développement.

Et comme j'ai dis, en se servant d'un autre base de donnée d'un autre client, je reçois pas cette erreur, mais quand je sers d'une base de donnée spécifique j'ai ce problème.

L'application plante quand je consulte les archives et je veux voir les item sous un date specifique, qui est la 'date de travail'. Mais quand je veux voir les item sous une autre date, j'ai pas ce souci.

[R&B]

OK.
Vous avez isolé une partie du problème :
l'erreur se produit dans une base et pas d'autres, qui plus est sur un fichier particulier ("archive") et en plus pour une date donnée....

Le problème ne semble dont pas dans le programme (encore que cela reste à voir) mais dans les données.
récupérez votre fichier et ouvrez le avec WDMap pour vérifier que les données pour la date sont conforme à ce que votre programme attend, ou que l'enregistrement n'est pas corrompu... auquel cas une optimisation (réorganisation en mode poussé) sera utile.