This example consists of four files; the source code for those file can be found in the appendix. The test also uses an additional copy book, mfunit.cpy, which should automatically be utilized if your environment is configured correctly.
The test case is run a number of times (once for each line in the data file), where it compares the initial and final statuses of a fictitious frequent flyers program.
Compile the two program to .so (see Compiling Tests), then run the resulting test suite (see Running Tests).
cob -zU -e "" MFUT_TESTFLYER.cbl GetFlyerLevel.cbl
cobmfurun[32|64] -verbose:true MFUT_TESTFLYER.so
The output should be similar to that shown below, indicating that the test passes after running 6 times (once for each row in the data source).