DB2 通用数据库™ z/OS 版版本 8
DB2 Web Services Consumer UDF 包和 DB2 XML Extender 是随 DB2 通用数据库 z/OS 版版本 8 一起提供的。请遵循随这些包一起提供的指示信息来将它们安装在系统上。
IBM XML Toolkit for z/OS 库
C++ Edition 1.6 和 1.8
要启用 DB2 Web Services Consumer UDF 和 DB2 XML Extender:
//V81AWLM1 PROC DB2SSN=V81A,NUMTCB=1,APPLENV=WLMENV1 //TCBNUM1 EXEC PGM=DSNX9WLM,TIME=1440, // PARM='&DB2SSN,&NUMTCB,&APPLENV', // REGION=0M //STEPLIB DD DSN=USER.RUNLIB.LOAD,DISP=SHR // DD DSN=CEE.SCEERUN,DISP=SHR // DD DSN=USER.TESTLIB,DISP=SHR // DD DSN=DB2A.UTLIB,DISP=SHR // DD DSN=DB2A.TESTLIB,DISP=SHR //*** XML EXTENDER LOAD LIB // DD DSN=DSN810.DB2COMP.SDXXLOAD,DISP=SHR //*** XML TOOLKIT 1.6 FOR XML EXTENDER // DD DSN=DB2XML.XMLTK.V1R6.SIXMLOD1,DISP=SHR // DD DSN=DB2A.SDSNLOAD,DISP=SHR // DD DSN=CEEA.SCEERUN,DISP=SHR //**SYSEXEC DD DSN=USER.PRIVATE.PROCLIB,DISP=SHR //CEEDUMP DD SYSOUT=A
//V81AWLM1 PROC DB2SSN=V81A,NUMTCB=1,APPLENV=WLMENV1 //TCBNUM1 EXEC PGM=DSNX9WLM,TIME=1440, // PARM='&DB2SSN,&NUMTCB,&APPLENV', // REGION=0M //STEPLIB DD DSN=USER.RUNLIB.LOAD,DISP=SHR // DD DSN=CEE.SCEERUN,DISP=SHR // DD DSN=USER.TESTLIB,DISP=SHR // DD DSN=DB2A.UTLIB,DISP=SHR // DD DSN=DB2A.TESTLIB,DISP=SHR //*** XML EXTENDER LOAD LIB // DD DSN=DSN810.DB2COMP.SDXXLOAD,DISP=SHR //*** XML TOOLKIT 1.6 FOR XML EXTENDER // DD DSN=DB2XML.XMLTK.V1R6.SIXMLOD1,DISP=SHR // DD DSN=DB2A.SDSNLOAD,DISP=SHR // DD DSN=CEEA.SCEERUN,DISP=SHR //**SYSEXEC DD DSN=USER.PRIVATE.PROCLIB,DISP=SHR //CEEDUMP DD SYSOUT=A
//* Add any other needed userids below //STEP2 EXEC PGM=IKJEFT01,DYNAMNBR=20 //SYSPRINT DD SYSOUT=A //SYSTSPRT DD SYSOUT=* //SYSTSIN DD * PERMIT V81A.WLMENV.WLMENV1 CLASS(DSNR) ID(OEUSR01) ACCESS(READ) PERMIT V81A.WLMENV.WLMENV1 CLASS(DSNR) ID(OEDFLTU) ACCESS(READ) PERMIT V81A.WLMENV.WLMENV1 CLASS(DSNR) ID(SYSADM) ACCESS(READ) PERMIT V81A.WLMENV.WLMENV1 CLASS(DSNR) ID(DB2XML) ACCESS(READ) SETROPTS RACLIST(DSNR) REFRESH PERMIT V81A.BATCH CLASS(DSNR) ID(OEUSR01) ACCESS(READ) PERMIT V81A.DIST CLASS(DSNR) ID(OEUSR01) ACCESS(READ) PERMIT V81A.BATCH CLASS(DSNR) ID(OEDFLTU) ACCESS(READ) PERMIT V81A.DIST CLASS(DSNR) ID(OEDFLTU) ACCESS(READ) //**
//GRANT JOB ('DWB'),MARICHU, // MSGCLASS=H, // MSGLEVEL=(1,1), // TIME=NOLIMIT, // CLASS=A, // REGION=0K, // USER=SYSADM,PASSWORD=N1CETEST //GRANPL EXEC TSOBATCH,DB2LEV=DB2A,COND=(8,LT),REGION=5M //SYSTSIN DD * DSN SYSTEM(V81A) RUN PROGRAM(DSNTEP2) PLAN(DSNTEP81) END //SYSIN DD * GRANT SYSADM TO OEUSR01; GRANT SYSADM TO OEDFLTU; GRANT SYSADM TO DB2XML; /*