>>>>>>
>>>>>>FOR ix = 1 to Whatever
>>>>>> WITH EVALUATE('loObj'+TRANSFORM(m.ix))
>>>>>> REPLACE JMJ_IN.Diag1 WITH LEFT(ALLTRIM(UPPER(.Field019)),AT('^',.Field019)-1)
>>>>>> ENDWITH
>>>>>>ENDFOR
>>>>>>
>>>>
>>>>Personally, I'm scared to death of WITH...ENDWITH
>>>>
>>>>
http://fox.wikis.com/wc.dll?Wiki~WithLeaksLocals~VFP>>>
>>>Yep,
>>>When you use some functions or any other EXTERNAL to WITH...ENDWITH could be dangerous, but with simple REPLACE?
>>
>>Absolutely!
>>
>>WITH SOMETHING
>> REPLACE SOMEFIELD WITH MYUDF()
>>ENDWITH
>>
>>MYUDF.PRG
>>IF M.THIS OR .THAT
>>
>>".that" should have been "m.that", but oops. Try to debug this (or THAT) :)
>
>Hmm, I was talk about
simple REPLACE :-)
>
>WITH Something
> REPLACE SOMEFIELD WITH .SomeProperty
>ENDWITH
>
I'm an all or nothing kind of guy, I guess. If the technique does not make things safer, I'm reluctant to use it. .SomeProperty could have an access or assign leaving things open to mistakes. :)
I've had no driving need to use WITH...ENDWITH and feel pretty comfortable with continuing to avoid it. :)