see "How to solve it" by G. Polya, ISBN 069111966X .

In VFP we can use the #if ...#endif directive and the assert command to our advantage.

Put in a very simplistic way, we can exemplify this technique with the following code:

set asserts on ln_DataOne=5 ln_DataTwo=10 ln_ResultFirst=ln_DataOne*ln_DataTwo #if file("develop.doc") ln_Sum=0 for i=1 to ln_DataOne ln_Sum=ln_Sum+ln_DataTwo next Assert ln_ResultFirst=ln_Sum Message "The algorithms have different results" #endif

The use of file("Develop.doc") is to simulate a global variable and when develop.doc is

removed from the current directory the second algorithm is not executed.

Contributors Eduardo Díaz Guerrero

Category Code Samples

( Topic last updated: 2004.05.17 04:52:40 PM )