Database Analyzer (IMS Tools)Mainframe Configuration Manager for IMS for z/OSIMS TOOLS - MISCCompress Data Compression (IMS Tools)Database Analyzer for IMS for z/OSDatabase Copier for IMS for z/OSDatabase Organizer for IMS for z/OSMainframe Extended Terminal Manager (IMS Tools)High Performance Recovery for IMS for z/OSDatabase Organizer (IMS Tools)Mainframe Program Restart Manager for IMS for z/OSSecondary Index Builder for IMS for z/OSSecondary Index for IMS for z/OS
Issue/Introduction
When using CA Control Block Validation Manager (CBVM) for IMS for decode a DBD of a HALDB in BAtch and Online perform well. How to include CBVM DECODE DBD(HALDB) into a REXX procedure for not running a batch job?
Environment
Release: Component: DBA
Resolution
In REXX simply allocate the necessary DD statements ICBCTRL, SRCLIB, DBDLIB and make your REXX write the control statement "DECODE DBD(HALDB)" in ICBCTRL DD, then just ADDRESS TSO "CALL 'imstoolsHLQ.CIMTLOAD(ITKICB)'" and it will throw the source code into SRCLIB DD.
Note: make sure the SRCLIB is a sequential dataset and not PDS.