Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Wired Error with Class
Message
De
11/04/2001 09:22:10
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Classes - VCX
Divers
Thread ID:
00494205
Message ID:
00494392
Vues:
20
Hi Jim,

The code in the PRG is that,
*loVariable = loReport.CreateVariable()
*loVariable.cName         = 'lnCount'
*loVariable.cValue        = 1
*loVariable.cInitialValue = 0
*loVariable.cTotalType    = 'Sum'
The var that goes to the class is 'cTotalType'

and the code in the class that validate this is,
lparameter tcValue
if vartype(tcValue) <> 'C'
	error cnERR_PROPERTY_TYPE_INVALID
else
	lcType = upper(left(tcValue, 1))
	if inlist(tcValue, ccTOTAL_NONE, ccTOTAL_COUNT, ccTOTAL_SUM, ;
		ccTOTAL_AVERAGE, ccTOTAL_LOWEST, ccTOTAL_HIGHEST, ccTOTAL_STDDEV, ;
		ccTOTAL_VARIANCE)
		This.cTotalType = tcValue   
	else
		error cnERR_PROPERTY_INVALID ---> The Error in Here
	endif inlist(tcValue, ...
endif vartype(tcValue) <> 'C'
The INLIST values are 'NCSALHDV'

And the Error is 1560-Property Value is invalid,

Thank's for your time,

João Batista
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform