WDForge.org - Forums

Re: Procédure globale

Sujet: Re: Procédure globale
par Anonyme sur 18/2/2005 16:01:06

ficheCoutExterieur n'est pas ouverte au moment de l'appel de la procédure.

Voici le code du bug/erreur :

Erreur à la ligne 4 du traitement Procédure globale CalculCoutsExterieurs.
Le champ ficheCoutExterieur.tableauCoutExterieur est inconnu.

**********************************************

Informations techniques

Projet : Parc'Auto

Dump de l'erreur du module <9.01Be>.

- Appel WL :
Traitement de , ligne <4>, thread <0>

- Niveau : erreur fatale (EL_FATAL)

- Code erreur : 1017

- Code erreur WD55 : 0

- Pas de code d'erreur système

- Pas de message d'erreur système

- Que s'est-il passé ?
Le champ ficheCoutExterieur.tableauCoutExterieur est inconnu.

- Pas d'info de debug

- Infos attachées :
EIT_DATEHEURE : 18/02/2005 15:56:34
EIT_PILEWL :
Procédure globale CalculCoutsExterieurs (Procedures globales de Parc'Auto.CalculCoutsExterieurs), ligne 4
Sortie d'une ligne de tableauUtiliser (gestionVehicule.tableauUtiliser), ligne 5
Clic sur valider (rechercheVehiculePourGestion.valider), ligne 1
Clic sur gestionVehicules (gestionAdministrateur.gestionVehicules), ligne 1
Clic sur ok (identification.ok), ligne 10

- Identifiant dans le .err : 1017

***********************************************************
Pour ma part, j'appelle cette procédure à la sortie d'une ligne de la table tableauUtiliser (table d'une autre fenêtre appelée gestionVehicule).

Le code de la fonction CalculCoutsExterieurs est le suivant :

PROCEDURE CalculCoutsExterieurs()
montant est un monétaire
ce, i, j sont des entiers
ce = TableOccurrence(ficheCoutExterieur.tableauCoutExterieur)
j = gestionVehicule.NumLigneTableauTrié(0)
dateAvant est une Date = gestionVehicule.tabAMDate[j]

POUR i = 1 A ce
SI (ficheCoutExterieur.tableauCoutExterieur.tabDateFacture[i] < gestionVehicule.tableauUtiliser.tabAMDate) ET (ficheCoutExterieur.tableauCoutExterieur.tabDateFacture[i] >= dateAvant ) ALORS
montant = montant + ficheCoutExterieur.tableauCoutExterieur.tabMontant[i]
FIN
FIN

RENVOYER montant