ACUCOBOL-GT supports HP e3000 COBOL intrinsic functions defined in the file "hpcobol.h". Most notably, this includes support for the TurboIMAGE/XL database and VPLUS interface.
ACUCOBOL-GT's support of HP e3000 COBOL intrinsic functions is transparent to HP e3000 platform users. The ACUCOBOL-GT runtime for HP MPE/iX includes a file called "hpcobol.h" in the "lib" directory. This file defines all of the parameters needed by the C functions to access HP system intrinsics. The file "direct.c" contains built-in instructions to include the file "hpcobol.h" at runtime.
On platforms other than HP e3000 that support TurboIMAGE/XL and VPLUS, or other intrinsics, you can access the intrinsics from ACUCOBOL-GT using the direct method of interfacing to C subroutines (see Appendix C, "Interfacing to C Subroutines", section C.2). All you need to do is edit the "LIBDIRECT" structure in the file "direct.c" to include the file "hpcobol.h". Specifically, replace the following string at the bottom of the "direct.c" file:
struct DIRECTTABLE LIBDIRECT[] = { { NULL, NULL, 0 } };
with the following:
#if 1
#include "hpcobol.h"
#else
struct DIRECTTABLE LIBDIRECT[] = { { NULL, NULL, 0 } };
#endif
After editing the "direct.c" file per above, you must relink the runtime. Create a new runtime using the method described in Appendix C, "Interfacing to C Subroutines," section C.5.