La propriété 'Année' est interdite sur une variable de type 'chaîne ANSI'.

**azaouali** · 01/07/2020, 16h15

Bonjour,

Je ne comprends pas pourquoi mon code fonctionnait jusqu'à hier et hop voilà qu'il m'affiche l'erreur suivante aujourd'hui :La propriété 'Année' est interdite sur une variable de type 'chaîne ANSI'.

Code :

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

1
2
3
gdMoisPrec est une Date
gdMoisPrec=gdMoisCourant
gdMoisPrec..Année=(gdMoisCourant..Année)-1

PS: je récupère un code que je connais pas car ancien programmateur est partie donc je fait du reversing code sur ce projet.

**frenchsting** · 01/07/2020, 16h25

Bonjour,

tu ne dis pas que vaut gdMoisCourant (et si c'est bien une date)

**azaouali** · 01/07/2020, 16h33

Tout d’abord merci de réponse mais je n'ai jamais codé sur windev.

**Voroltinquo** · 01/07/2020, 18h17

Bonjour,
Pourrait-on avoir le prototype de la Fonction/Procédure qui utilise ce bout de code ?

**tatayo** · 02/07/2020, 06h34

Bonjour,
Windev gère le transtypage de façon automatique (enfin quand il peut).
Ici je pense que la variable gdMoisCourant n'est pas de type date, mais chaine.
Si le format de la chaine est bon, son affectation à une variable de type date ne pose pas de problème. Par contre il n'est pas possible d'utiliser les propriétés du type date (..année, ..mois ...).
Ici comme gdMoisPrec est de type date, tu peux récupérer/modifier l'année, le mois etc.. directement sur cette variable.

Tatayo.

**padbrain** · 02/07/2020, 09h15

Envoyé par azaouali

...

Code :

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

1
2
3
gdMoisPrec est une Date
gdMoisPrec=gdMoisCourant
gdMoisPrec..Année=(gdMoisCourant..Année)-1

.t.

Puisque gdMoisPrec est initialisé avec la valeur de gdMoisCourant, modifie ton code comme suit :

Code :

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

1
2
3
4
 
gdMoisPrec est une Date
gdMoisPrec = gdMoisCourant
gdMoisPrec..Année -= 1

**Voroltinquo** · 02/07/2020, 09h24

Je pense à un mauvais passage de paramètre du style :

Code :

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

1
2
 
Res=AppelFonctionDate(SAI_Date)

Avec :

Code :

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

1
2
3
 
Fonction AppelFonctionDate(gdMoisCourant est Date)
...

C'est un classique ...

**azaouali** · 02/07/2020, 10h51

Merci pour vos réponse,

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
PROCEDURE ETAT_STAT_FAC_2F4(gdMoisCourant)
 
 
//Variables globales Totaux fin de doc
gnQTE_ACourant_Total,gnQTE_MCourant_Total,gnQTE_APrec_Total,gnQTE_MPrec_Total sont des entiers
grCA_ACourant_Total,grCA_MCourant_Total,grCA_APrec_Total,grCA_MPrec_Total est un réel
 
//Variables globales Totaux Représentant
gnQTE_ACourant_REP,gnQTE_MCourant_REP,gnQTE_APrec_REP,gnQTE_MPrec_REP sont des entiers
grCA_ACourant_REP,grCA_MCourant_REP,grCA_APrec_REP,grCA_MPrec_REP est un réel
 
//Variables globales Totaux Nature de commande
gnQTE_ACourant_NAT,gnQTE_MCourant_NAT,gnQTE_APrec_NAT,gnQTE_MPrec_NAT sont des entiers
grCA_ACourant_NAT,grCA_MCourant_NAT,grCA_APrec_NAT,grCA_MPrec_NAT est un réel
 
gdMoisPrec est une Date
gdMoisPrec=gdMoisCourant
gdMoisPrec..Année=(gdMoisCourant..Année)-1
 
gdMoisCourant_Debut, gdMoisCourant_Fin, gdAnneeCourant_Debut, gdAnneeCourant_Fin sont des Dates
gdMoisPrec_Debut, gdMoisPrec_Fin, gdAnneePrec_Debut, gdAnneePrec_Fin sont des Dates
 
 
gdMoisCourant_Debut=PremierJourDuMois(gdMoisCourant)
gdMoisCourant_Fin=DernierJourDuMois(gdMoisCourant)
gdAnneeCourant_Debut=PremierJourDeLAnnée(gdMoisCourant)
gdAnneeCourant_Fin..Jour=31
gdAnneeCourant_Fin..Mois=12
gdAnneeCourant_Fin..Année=gdMoisCourant..Année
 
gdMoisPrec_Debut=PremierJourDuMois(gdMoisPrec)
gdMoisPrec_Fin=DernierJourDuMois(gdMoisPrec)
gdMoisPrec_Fin..Année=gdMoisPrec..Année
gdAnneePrec_Debut=PremierJourDeLAnnée(gdMoisPrec)
gdAnneePrec_Fin..Jour=31
gdAnneePrec_Fin..Mois=12
gdAnneePrec_Fin..Année=gdMoisPrec..Année
 
iInitRequêteEtat(ETAT_STAT_FAC_2F4,gdAnneePrec_Debut,gdMoisPrec_Fin,gdAnneeCourant_Debut,gdMoisCourant_Fin)

Voila pour le code mais comment on fait pour print le résultat de annéecourante sur windev.

Merci encore pour votre aide.

**tbc92** · 02/07/2020, 11h06

Print n'existe pas , mais tu peux utiliser Trace()

Ca va ouvrir une espèce de fenetre en mode console, où le programme va afficher tous les résultats de Trace()

Code :

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

1
2
3
4
 
Pour i= 1 a 100
  trace(i)
fin

Tu peux vérifier des choses avec la fonction TypeVar()
Dans ta procédure, avant la ligne qui plante, tu mets

Code :

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

trace( " la variable est de type " + TypeVar(gMoisCourant) )

Ca te dira si gMoisCourant est de type chaine ou entier ou ...
Regarde l'aide de la fonctio TypeVar() ici

**Voroltinquo** · 02/07/2020, 11h19

Comme je l'écrivais plus haut, je suppose que la procédure est appelée en passant un champ en paramètre (e.g. SAI_Date.)

Cela provient du fait que les paramètres sont passé par référence et non par valeur. C'est à dire que Windev considère que gdMoisCourant vaut "SAI_Date". Le problème ne vient pas de la procédure mais de son appel.
Cela peut se corriger de plusieurs manières :
1- Modification du prototype

Code :

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

1
2
 
ROCEDURE ETAT_STAT_FAC_2F4(LOCAL gdMoisCourant est date)

2- Appel avec "double parenthésage"

Code :

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

1
2
 
iImprimeEtat((SAI_Date))

3- Affectation de la valeur du champ avant l'appel

Code :

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

1
2
3
 
dParamDate=SAI_Date
iImprimleEtat(dParamDate)

**azaouali** · 02/07/2020, 11h56

Ok, je vais essayer toutes vos propositions encore merci !

je voulais vous demander quel est le langage de programmation utilisé par Windev ?

@tcb92

Le trace me renvoie la variable est de type 19

**Voroltinquo** · 02/07/2020, 13h24

Windev utilise le WLangage
Type 19 : c'est une chaîne ANSI. Le gestionnaire d'erreurs reste cohérent

**azaouali** · 02/07/2020, 14h25

Envoyé par Voroltinquo

Windev utilise le WLangage
Type 19 : c'est une chaîne ANSI. Le gestionnaire d'erreurs reste cohérent

Merci pour ta réponse et donc tu pense alors quel est le problème.

**frenchsting** · 02/07/2020, 14h26

Bonjour,

Envoyé par azaouali

je voulais vous demander quel est le langage de programmation utilise Windev

Le langage utilisé est le W-Langage : langage spécifique à PCSOFT (utilisé également pour WebDev et windev Mobile).

**azaouali** · 02/07/2020, 14h27

Envoyé par frenchsting

Bonjour,

Le langage utilisé est le W-Langage : langage spécifique à PCSOFT (utilisé également pour WebDev et windev Mobile).

Merci aussi pour ta réponse.

**padbrain** · 02/07/2020, 14h51

Remplace cette ligne :

Envoyé par azaouali

...

Code :

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

1
2
3
4
PROCEDURE ETAT_STAT_FAC_2F4(gdMoisCourant)
//...
gdMoisPrec..Année=(gdMoisCourant..Année)-1
//...

...

par ceci :

Code :

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

1
2
 
gdMoisPrec..Année -= 1

et ensuite, si tu dois intervenir encore sur ce programme, je te conseille de suivre l'autoformation : https://doc.pcsoft.fr/?1410087388

**azaouali** · 02/07/2020, 15h42

Avec ce que tu m'as donné ça mis une erreur alors que les dates que j'ai tapé sont bonnes:

Error at line 19 of Opening ETAT_STAT_FAC_2F4 process.
Bad date.

WL call:
Process of 'Opening ETAT_STAT_FAC_2F4' (ETAT_STAT_FAC_2F4), line 19, thread 0

What happened?
Bad date.

Error code: 1104
Level: fatal error

Dump of the error of 'wd230vm.dll' module (23.0.370.1).
Identifier of detailed information (.err): 1104
Additional Information:
EIT_PILEWL :
Opening ETAT_STAT_FAC_2F4 (ETAT_STAT_FAC_2F4), line 19
EIT_DATEHEURE : 02/07/2020 15:41:09
EIT_TYPE_WDFILE : <3>
EIT_IDCODE : <327680>
EIT_CORRIGE_ETAT : ETAT_STAT_FAC_2F4

Help

**Voroltinquo** · 02/07/2020, 15h47

Envoyé par azaouali

Avec ce que tu ma donné ça mis un erreur alors que les date que j'ai tapé sont bonne:

C'est logique, gdMoisCourant est considéré comme chaîne, lors de son affectation à gbMoisPrec devient alors une chaîne (tu peux le vérifier via typeVar cf supra.) On ne fait que décaler le problème.

Quelle est la valeur de gdMoisCourant lors du début du code ? Pas la valeur que tu saisis, mais la valeur que reçoit l'état. Celle qui est affectée à gdMoisPrec.

**philouZ** · 02/07/2020, 16h14

C'est logique, gdMoisCourant est considéré comme chaîne, lors de son affectation à gbMoisPrec devient alors une chaîne (tu peux le vérifier via typeVar cf supra.)

gdMoisPrec étant déclaré comme Date, l'affectation ne transforme pas son type. Un cast automatique est réalisé par Windev. D'ailleurs quand tu affectes une valeur à un champ date, tu le fais en saisissant une chaine.

Par contre si la date est vide, c'est sur qu'on ne pourra pas retirer une année. Il faut donc tester si la date est valide avant de retirer l'année et afficher le cas échéant une erreur.

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
test("20200101")
test("")
 
	PROCÉDURE INTERNE test(_date)
	dMaDate est une Date 
	Trace("Madate est de type : " + TypeVar(dMaDate))
 
	dMaDate = _date
	Trace("Madate après affectation est de type : " + TypeVar(dMaDate))
 
	SI DateValide(dMaDate) ALORS
		dMaDate..Année -= 1
		Trace(dMaDate)
	SINON
		Trace("la date '" + _date + "'" + " est invalide")
	FIN
 
	FIN

Code :

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

1
2
3
4
5
6
7
résultat
Madate est de type : 24
Madate après affectation est de type : 24
20190101
Madate est de type : 24
Madate après affectation est de type : 24
la date '' est invalide

**padbrain** · 02/07/2020, 16h15

Le code suivant fonctionne très bien chez moi :

Code :

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

1
2
3
4
5
6
 
        gdMoisCourant est chaîne ANSI = "20200702"
	gdMoisPrec est une Date
	gdMoisPrec = gdMoisCourant
	gdMoisPrec..Année -= 1
	Trace(gdMoisPrec)     //    la trace vaut 20190702

La propriété 'Année' est interdite sur une variable de type 'chaîne ANSI'. [WD23]

WinDev

Discussions similaires

Partager

Partager