IMSDBU JCL インターフェイス

MFDBUJCL ユーティリティ プログラムを使用すると、JCL から次の IMSDBU 関数を実行できます。

• Load
• Unload
• Zeroload
• Add
• PtrUpdate

さらに、MFDBUJCL を使用してリビルド ユーティリティを実行することもできます。

構文

フォーマット 1

//step EXEC PGM=MFDBUJCL,PARM='{LOAD | UNLOAD | ADD},database,dataset'
//SYSOUT DD SYSOUT=*

フォーマット 2

//step EXEC PGM=MFDBUJCL,PARM='{LOAD | ADD},database'
//SYSOUT DD SYSOUT=*
//INPUT DD DSN={dataset | catalog},DISP=SHR

フォーマット 3

//step EXEC PGM=MFDBUJCL,PARM='UNLOAD,database'
//SYSOUT DD SYSOUT=*
//OUTPUT DD DSN={dataset | catalog},DISP=SHR

フォーマット 4

//step EXEC PGM=MFDBUJCL,PARM='{ZEROLOAD | PTRUPDATE},database'
//SYSOUT DD SYSOUT=*

フォーマット 5

//step EXEC PGM=MFDBUJCL,PARM='REBUILD'
//SYSOUT  DD SYSOUT=*
//SYSIN   DD *
[OUT-PATH=dbrebuildpath]
databasename1 
[databasenameN
...]
/*

パラメーター

step

ジョブ ステップ。

database

IMS データベースの名前。

dataset

データを含むデータセットの名前。

catalog

データセットを含む JCL カタログの名前。

OUT-PATH

リビルドされたデータベースを格納するディレクトリを指定します。これを指定しない場合、MFDBUJCL は現在のディレクトリ内のデータベースをリビルドします。このパラメーターはオプションです。

dbrebuildpath

リビルドされたデータベースを格納するディレクトリへのフル パス。

databasename1

リビルドするデータベースの名前。

databasenameN

リビルドする追加データベースの名前。追加のデータベース名は、各々の行で指定します。

コメント

データセットが JCL カタログに含まれていない場合は、LOAD、UNLOAD、および ADD 関数にフォーマット 1 を使用します。

データセットが JCL カタログに含まれている場合、オプションで LOAD 関数および ADD 関数にはフォーマット 2 を、UNLOAD 関数にはフォーマット 3 を使用できます。

例

フォーマット 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=*

フォーマット 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

フォーマット 3

//UNLOAD EXEC PGM=MFDBUJCL,PARM='UNLOAD,DEMO03DD'
//SYSOUT DD SYSOUT=* 
//OUTPUT DD DSN=HLQ.PRJ01.UNLOAD. DEMO03DD,DISP=SHR

フォーマット 4

//PTRUPDT EXEC PGM=MFDBUJCL,PARM='PTRUPDATE,DEMO03DD’
//SYSOUT DD SYSOUT=*

//PTRUPDT EXEC PGM=MFDBUJCL,PARM='PTRUPDATE,DEMO03DD’
//SYSOUT DD SYSOUT=*

フォーマット 5

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