DSNUTILB - СИСТЕМА DB2 НЕ СУЩЕСТВУЕТ

Привет, я хотел бы спросить, что не так с моим кодом JCL. Я работаю над этим уже довольно давно. Когда я отправляю это, я получаю RC 08, и он говорит, что СИСТЕМА DSNUTILB - DB2 НЕ СУЩЕСТВУЕТ на SYSPRINT. Может ли кто-нибудь помочь мне в этом? Спасибо. :)

Вот мой код JCL:

//X544582L JOB (T,92958888P), 
// 'N=TSO.X544582', 
// CLASS=S, 
// MSGCLASS=H, 
// MSGLEVEL=(1,1), 
// REGION=32M, 
// NOTIFY=&SYSUID 
//* TYPRUN=SCAN 
//* 
//JOBLIB DD DSN=X544582.LOADLIB1,DISP=SHR 
//* 
//STEP001 EXEC PGM=DSNUTILB 
//STEPLIB DD DSN=DSN910.SDSNLOAD,DISP=SHR 
//SYSUT1 DD DSN=&&SYSUT1, 
// DISP=(MOD,DELETE,DELETE), 
// SPACE=(CYL,(10,10)) 
//SYSMAP DD DSN=&&SYSMAP, 
// DISP=(MOD,DELETE,DELETE), 
// SPACE=(CYL,(10,10)) 
//SORTOUT DD DSN=&&SORTOUT, 
// DISP=(MOD,DELETE,DELETE), 
// SPACE=(CYL,(10,10)) 
//LOADIN DD DSN=X544582.SIPROOT.PBB01,DISP=SHR 
//SYSIN DD * 
  LOAD DATA INDDN LOADIN 
  RESUME 
  INTO TABLE IMS2DB2.SIPROOT_PBB01_T 
  ( 
   STATION_NO INTEGER, 
   AIRLINE_CODE CHAR(2), 
   SIPROOT_DATA_01 CHAR(4) 
  ) 
/*                                               
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSERR DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//                   

person n10dezEJ    schedule 14.05.2014    source источник


Ответы (1)


DSNUTILB должен иметь PARM, включающий подсистему DB2, к которой вы пытаетесь получить доступ. См. эту страницу в Информационном центре.

В принципе, я думаю, вам нужно добавить строку, подобную этой:

//         PARM='sub,id,',

Где sub — идентификатор подсистемы, а id — уникальный идентификатор запуска утилиты (в моем магазине мы обычно используем что-то вроде имени JCL и того, что делает шаг, поэтому, возможно, вы могли бы сделать что-то вроде X544582L.LOAD. Вы можете проверить чтобы узнать, есть ли в вашем магазине стандарт для этого.

person bhamby    schedule 14.05.2014