Previous Topic Next topic Print topic


Sample Files

These sample files are located by default in the %ProgramFiles(x86)%\Micro Focus\Studio Enterprise Edition x.x\Net Express IDE\MTO-IMS\IVP directory.

Sample File Filename Description
Mainframe IMS/ESA DB extract IMSDBUV.CBL Can be used on your mainframe to extract an IMS/ESA database into a variable length sequential file for downloading and subsequent loading by the IMSDBU utility. IMSDBUV creates a formatted file specifically for use by IMSDBU on the PC. It can optionally compress the segment data to reduce disk space and transfer time.
Mainframe IMS DB extract JCL IMSDBUV.JCL Sample JCL for use with the IMSDBUV.
Mainframe IMS DB extract compression IMSDBUC.CBL Compression program for IMSDBUV.
IMSDBU Load and Unload exits DBUPARMS.CPY IMSDBU provides two exits during Load, Add and Unload processing. One allows for selecting and changing segments. The other provides for compression/decompression of the input and output sequential files.
Dynamic DB attach interface
  • DDBA.CBL
  • DDBA.TXT
The Dynamic DB Attach interface is a flexible way to 'connect' to IMS Option for issuing database calls. DDBA.TXT describes the detailed specifications for this API. DDBA.CBL is a sample program to demonstrate its use. An MFIMSCOB.DLL is provided with the IMS Option installation to allow other language programs to call the dynamic attach interface. See the MFIMSCOB.TXT file for details.
Gen file access
  • IMS86GIO.TXT
  • CALLGIO.CBL
CALLGIO demonstrates using the IMS86GIO call interface to retrieve and update the Trancode, Printer, DBD, PSB and MFS Gen, DB Catalog and System Configuration. The IMS86GIO.TXT file provides a complete description of the parameters and use of these APIs.
User entry point management IMS86ENT.CBL Option initialization and termination and invocation of IMS applications.
Utility call interface
  • IMS86GIO.TXT
  • CALLUTIL.CBL
  • CALLGIO2.CBL
CALLUTIL demonstrates the use of the callable interface for the utilities. CALLGIO2 combines IMS86GIO with other features to reorganize the Gen files from a command line and other sample uses.
IMSDBU call interface DBUDEMO.CBL Demonstrates the use of the direct call interface to IMSDBU for advanced DB administration.
MFSGEN preprocessor exit MFSPREPR.CBL Allows programmed modification of MFS source input to the MFSGEN utility.
COBOL DB sparse routine SPARSRTN.CBL A COBOL example for implementing Database Secondary Index sparse routines in COBOL.
Field exit routine DFSME000.cbl A COBOL implementation of the DFSME000 Assembler MFS field edit exit routine provided with the IMS/ESA product.
Segment exit routine DFSME127.cbl A COBOL implementation of the DFSME127 Assembler MFS segment edit exit routine provided with the IMS/ESA product.
Previous Topic Next topic Print topic