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
/*     
//