ＩＭＳＤＢ再編成
･ｱﾝﾛｰﾄﾞ T090030
  ｱﾝﾛｰﾄﾞﾌｧｲﾙのLRECLｻｲｽﾞ=DBのｾｸﾞﾒﾝﾄで一番大きいもの+10
･ﾃﾞﾌｧｲﾝ IDCAMS
  ND.TT.PARM(UDBxxDEF)の変更
  CYLINDERの大きさを変更してSAVE
･ﾛｰﾄﾞ   T090010
  ｱﾝﾛｰﾄﾞﾌｧｲﾙはﾛｰﾄﾞ確認するまでDELしない
  DISP=OLDにしておく
<参考JCL>
    ND.UU.CAPSJCL(UDB4RUL)
    ND.UU.CAPSJCL(UDB4RUD)
    U312
処理手順
(1)ｱﾝﾛｰﾄﾞJCL,ﾃﾞﾌｧｲﾝ+ﾛｰﾄﾞのJCLをそれぞれつくる
(2)DEFﾊﾟﾗﾒｰﾀを変更する。
(3)DBRをかける
   /DBR DB UDBxx NOFEOV
(4)ｱﾝﾛｰﾄﾞJCLをｻﾌﾞﾐｯﾄ(一号機)
(5)COND CODE 確認,ｱﾝﾛｰﾄﾞ件数確認
(6)ｱﾝﾛﾄﾞﾌｧｲﾙの中身確認(入っていればOK)
(7)ﾛｰﾄﾞJCLをｻﾌﾞﾐｯﾄ(一号機)
(8)COND CODE 確認,ﾛｰﾄﾞ件数=ｱﾝﾛｰﾄﾞ件数確認
(9)DBをｽﾀｰﾄする。
   /STA DB UDBxx
(10)DBをﾒﾝﾃでGNしてみる(使えればOK)
(11)=3.4にて/Tを確認
   DSNAME ==> IMSVS.UDBxx