Jay Johengen Altamahaw-Ossipee, North Carolina, United States
To
All
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Simplify concantenated line of code
Environment versions
Visual FoxPro:
VFP 9 SP1
Miscellaneous
Thread ID:
01241143
Message ID:
01241143
Views:
61
How to simplify this to remove the EVALUATE() and make it more readable?
FOR ix = 1to Whatever
REPLACE JMJ_IN.Diag1 WITHLEFT(ALLTRIM(UPPER(EVALUATE('loObj'+LTRIM(STR(m.ix))+".Field019"))),AT('^',EVALUATE('loObj'+LTRIM(STR(m.ix))+".Field019"))-1)
ENDFOR