*----------------------------------------------------------------*
*                          ISAMDemoNativeRM 
*
* This example program demonstrates how to setup indexed file
* handling in a native Visual COBOL handling so that the RM/ACU
* file handlers will be accessed instead of the default Visual
* COBOL file handler.
*
* The following new IDXFORMAT filetypes have been introduced
* in Visual COBOL 2.1:
* IDXFORMAT"17": ACU Vision file handler
* IDXFORMAT"21": RM file handler
*
* In addition a new file handler configuration option INTEROP has
* been added allowing you to specify the options ACU or RM to in-
* dicate which file handler should be used for all files.
* Example:
* [XFH-DEFAULT]
* [FOLDER:C:\\files\\acufiles]
* INTEROP=ACU
* [FOLDER:C:\\files\\rmfiles]
* INTEROP=RM
*
* The IDXFORMAT can be set either in the file handler configura-
* tion file or as a compiler directive either set directly in
* the source code above the file to which it applies or at the
* top of the source where it applies to all indexed files.
*
* This demo project sets IDXFORMAT"21" using a extfh.cfg file.
* Note that the file assign points to a full path in the DATA
* subdirectory of the project folder.
* In the program you will see a comment where you could also set
* IDXFORMAT"21" as a compiler directive instead of using an
* EXTFH.CFG file.
*
* The current EXTFH.CFG file looks like:
* [XFH-DEFAULT]
* BASENAME=ON
* [testfile.dat]
* IDXFORMAT=21
*
* The BASENAME=ON option is necessary so that we can specify the
* file tag without using a full path to the filename.
* We could have also set this to the folder name so that all
* files in that folder would be IDXFORMAT"21" by using the
* following:
* [FOLDER:C:\\ISAMDemoNativeRM\\ISAMDemoNativeRM\\DATA]
* IDXFORMAT=21
*
* The EXTFH environment variable is set to point to the extfh.cfg
* file in the Application.config file which is part of the pro-
* ject.
*----------------------------------------------------------------*