Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Problems in using the function EVALUATE()
Message
De
14/09/2017 16:29:40
Reza Meamar
Homa Programming Group
Shiraz, Iran
 
 
À
14/09/2017 16:22:31
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Versions des environnements
Visual FoxPro:
VFP 7 SP1
OS:
Windows XP SP3
Database:
Visual FoxPro
Application:
Desktop
Divers
Thread ID:
01654324
Message ID:
01654333
Vues:
70
>>>>Dear All,
>>>>I have below codes
>>>>
>>>>m.KHour = 300
>>>>
>>>>HMF01 = "m.KHour * 1100000 / 110 "
>>>>HMF02 = "110000"
>>>>HMF03 = ""
>>>>
>>>>FOR ncounter = 1 TO 3
>>>>STORE EVALUATE("m.HMF" + PADL(ALLTRIM(STR(nCounter)),2,"0")) TO nValue
>>>>
>>>>? nValue
>>>>ENDFOR
>>>>How should I use the EVALUATE() function to put a numeric value in the nValue variable?
>>>>
>>>>3000000 for HMF01
>>>>1100000 for HMF02
>>>>0 for HMF03
>>>>
>>>>Thank you for guiding
>>>
>>>
m.KHour = 300
>>>
>>>HMF01 = str(m.KHour)+ "* 1100000 / 110 " && Note the change here!
>>>HMF02 = "110000"
>>>HMF03 = ""
>>>
>>>FOR ncounter = 1 TO 3
>>>STORE val(EVal("m.HMF" + PADL(ALLTRIM(STR(nCounter)),2,"0"))) TO nValue && Note the change
>>>
>>>? nValue
>>>ENDFOR
>>
>>Dear Tore,
>>this is an example. the content of HMF01 is stored in a field.
>>I used VAL(EVAL()) , but when field content is empty, i get error.
>
>Please create a sample with a cursor, then it's more realistic.


CREATE CURSOR MyCursor (HMF01 C(25), HMF02 C(25), HMF03 C(25))
INSERT INTO MyCursor (HMF01, HMF02, HMF03) VALUES ("m.KHour * 1100000 / 110", "1100000", "")

m.KHour = 300

FOR ncounter = 1 TO 3
STORE EVAL(EVALUATE("HMF" + PADL(ALLTRIM(STR(nCounter)),2,"0"))) TO nValue

? nValue
ENDFOR

USE IN MyCursor
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform