PC SOFT

FORUMS PROFESSIONNELS
WINDEV, WEBDEV et WINDEV Mobile

Accueil  |  Messages récents  | Connexion  |   | Français  FR
Accueil → WINDEV (précédentes versions) → [WD20] Votre code a provoqué un dépassement de la pile d'exécution.
[WD20] Votre code a provoqué un dépassement de la pile d'exécution.
Débuté par BOUDOT Sebastien, 11 juil. 2017 12:16 - Aucune réponse
#1
Posté le 11 juillet 2017 - 12:16
Nous avons surchargé la procédure DateValide() pour la limiter à une date min et une datemax.

Procedure DateValide(LOCAL pdDateAControler est une Date)

SI PAS WL.DateValide(pdDateAControler) ALORS RENVOYER Faux
SI pdDateAControler > DATEMAXIMUM ALORS RENVOYER Faux
SI pdDateAControler < DATEMINIMUM ALORS RENVOYER Faux

RENVOYER Vrai


Et DateVersChaine()

Procedure DateVersChaîne(LOCAL vDate est un Variant, LOCAL sFormat est une chaîne="JJ/MM/AAAA")
/// Teste la validité de la date avant de faire le DateVersChaîne()
SI PAS DateValide(vDate) ALORS RENVOYER ""
RENVOYER WL.DateVersChaîne(vDate,sFormat)


Dans tous nos états, nous avons un champ en bas de page qui affiche date et heure de l'édition dans une champ Libellé.
LIB_BasGauche = DateVersChaine(DateDuJour()) +" à "+HeureVersChaîne(HeureSys(),"HH:MM")


Nous avons cette exception (de temps en temps) :

Appel WL :
Traitement de 'Procédure globale DateValide' (ProceduresPartagees.DateValide), thread 0

Que s'est-il passé ?
Votre code a provoqué un dépassement de la pile d'exécution.

Code erreur : 1058
Niveau : erreur fatale (EL_FATAL)

Dump de l'erreur du module 'wd200vm.dll' (20.0.504.0).
Identifiant des informations détaillées (.err) : 1058
Informations de débogage :
vm.cpp, 1174
Informations supplémentaires :
EIT_PILEWL :
Procédure globale DateValide (ProceduresPartagees.DateValide)
Procédure globale DateVersChaine (GestionBaseDonnees.DateVersChaine), ligne 17
Procédure globale EtatInfoBasGauche (ProcéduresCommunes.EtatInfoBasGauche), ligne 22
Avant impression de LIB_BasGauche (ETAT_MatCommandeTiers.BAS_DE_PAGE.LIB_BasGauche), ligne 1
EIT_DATEHEURE : 11/07/2017 11:11:52


Je ne vois pas comment c'est possible...
→ Revenir à WINDEV (précédentes versions)