MFDBUJCL Utility

The MFDBUJCL utility program enables you to execute the following IMSDBU functions from JCL:
  • Load
  • Unload
  • Zeroload
  • Add
  • PtrUpdate

In addition, you can use MFDBUJCL to execute the Rebuild utility.

Syntax

Format 1
//step EXEC PGM=MFDBUJCL,PARM='{LOAD | UNLOAD | ADD},database,dataset'
//SYSOUT DD SYSOUT=*
Format 2
//step EXEC PGM=MFDBUJCL,PARM='{LOAD | ADD},database'
//SYSOUT DD SYSOUT=*
//INPUT DD DSN={dataset | catalog},DISP=SHR
Format 3
//step EXEC PGM=MFDBUJCL,PARM='UNLOAD,database'
//SYSOUT DD SYSOUT=*
//OUTPUT DD DSN={dataset | catalog},DISP=SHR
Format 4
//step EXEC PGM=MFDBUJCL,PARM='{ZEROLOAD | PTRUPDATE},database'
//SYSOUT DD SYSOUT=*
Format 5
//step EXEC PGM=MFDBUJCL,PARM='REBUILD'
//SYSOUT  DD SYSOUT=*
//SYSIN   DD *
[OUT-PATH=dbrebuildpath]
databasename1 
[databasenameN
...]
/*

Parameters

step
Job step.
database
The name of your IMS database.
dataset
The name of the dataset that contains the data.
catalog
The name of the JCL catalog that contains the dataset.
OUT-PATH
Specifies a directory to contain rebuilt databases. If not specified, MFDBUJCL rebuilds databases in the current directory. Optional.
dbrebuildpath
The full path to a directory to contain rebuilt databases.
databasename1
The name of a database to rebuild.
databasenameN
The name of an additional database to rebuild. Specify each additional database name on its own line.

Comments

If your dataset is not contained in a JCL catalog, use Format 1 for LOAD, UNLOAD, and ADD functions.

If your dataset is contained in a JCL catalog, you can optionally use Format 2 for LOAD and ADD functions, and Format 3 for the UNLOAD function.

Examples

Format 1
//LOAD EXEC PGM=MFDBUJCL,PARM='LOAD,DEMO03DD,LOAD.DBU'
//SYSOUT DD  SYSOUT=*

//UNLOAD EXEC PGM=MFDBUJCL,PARM='UNLOAD,DEMO03DD,LOAD.DBU'
//SYSOUT DD SYSOUT=* 

//ADD EXEC PGM=MFDBUJCL,PARM='ADD,DEMO03DD,LOAD.DAT'
//SYSOUT DD SYSOUT=*
Format 2
//LOAD EXEC PGM=MFDBUJCL,PARM='LOAD,DEMO03DD'
//SYSOUT DD  SYSOUT=*
//INPUT DD  DSN=HLQ.PRJ01.LOAD. DEMO03DD,DISP=SHR

//ADD EXEC PGM=MFDBUJCL,PARM='ADD,DEMO03DD’
//SYSOUT DD SYSOUT=*
//INPUT DD  DSN=HLQ.PRJ01.ADD. DEMO03DD,DISP=SHR
Format 3
//UNLOAD EXEC PGM=MFDBUJCL,PARM='UNLOAD,DEMO03DD'
//SYSOUT DD SYSOUT=* 
//OUTPUT DD DSN=HLQ.PRJ01.UNLOAD. DEMO03DD,DISP=SHR
Format 4
//PTRUPDT EXEC PGM=MFDBUJCL,PARM='PTRUPDATE,DEMO03DD’
//SYSOUT DD SYSOUT=*

//PTRUPDT EXEC PGM=MFDBUJCL,PARM='PTRUPDATE,DEMO03DD’
//SYSOUT DD SYSOUT=*
Format 5
//STEP01  EXEC PGM=MFDBUJCL,PARM='REBUILD'
//SYSOUT  DD SYSOUT=*
//SYSIN   DD *
OUT-PATH=C:\IMS\REBUILT\DATABASES
BNKCUST 
BNKACC
BNKATYPE
/*     
//