Example 11 — Using a DDLIN data set


This example uses the OBID option and the INFILE option with a file that contains DDL.

The SYSPRINT shows that UNLOAD PLUS generates Db2 LOAD control cards by default (because the job does not include a CNTLCARDS option, but the JCL includes an SYSCNTL DD statement).

Message 50041I indicates the status of zIIP processing. For this example, the ZIIP installation option is ENABLED, but an SUF ( also known as XBM ) subsystem was not specified. UNLOAD PLUS automatically located an available SUF ( also known as XBM ) subsystem to provide zIIP processing.

The following table describes the key command options for this job:

Command options used in JCL

Description

INFILE BMCCPY

Unloads data from a sequential data set rather than a Db2 table space data set

UNLOADDN SYSREC ACTIVE NO

Disables dynamic allocation for the primary unload data set, overriding the default in the installation options module

OBID

Specifies the OBID that will be associated with the selected table

This option is valid only when using the INFILE ddname option. Additionally, you must use this option when the following conditions exist:

  • You specify INFILE ddname with DDL (using a DDLIN data set).
  • You are either specifying multiple SELECT statements or unloading a table space which currently is or previously was a multi-table table space.

In this example, the OBID for table ADU.ADU11TB1 is specified in the UNLOAD command and the OBID for table ADU.ADU11TB2 is specified in the DDLIN file.

SELECT

Specifies the column to unload

FROM

Names the table to unload

The following figure shows the JCL for example 11:

//    JOBCARD
//**********************ADUEX11B ***********************************
//******************************************************************
//*********  Using a DDLIN data set         ************************
//*This example uses the OBID option and the INFILE option with a  *
//*file that contains DDL.                                         *
//******************************************************************
//*  Replace "DB2SYS" by your DB2 subsystem name.                  *
//*  Use your DB2 product install libraries for STEPLIBS ;         *
//*     PRODUCT.LIBRARIES                                          *
//*     DB2.DSNEXIT                                                *
//*     DB2.DSNLOAD                                                *
//*********************************************************************
//UNLOAD11 EXEC PGM=ADUUMAIN,REGION=0M,
//         PARM=(DB2SYS,'ADUEX11','NEW ',,'MSGLEVEL(1)')
//STEPLIB  DD DISP=SHR,DSN=PRODUCT.LIBRARIES
//         DD DSN=DB2.DSNEXIT,DISP=SHR
//         DD DSN=DB2.DSNLOAD,DISP=SHR
//SYSIN    DD *
  UNLOAD  INFILE BMCCPY
    UNLOADDN SYSREC ACTIVE NO
          SELECT 'ADU11TB1', * FROM ADU.ADU11TB1 {OBID 3}
          SELECT 'ADU11TB2', * FROM ADU.ADU11TB2
/*
//DDLIN    DD DSN=ADU.INPUT.EXAMPLES.SYSREC(ADUXDDL1),DISP=SHR
//         DD DSN=ADU.INPUT.EXAMPLES.SYSREC(ADUXDDL2),DISP=SHR
//BMCCPY01 DD DSN=ADU.EXAMPL11.DSN1COPY.ADU11TSA,DISP=SHR
//BMCCPY02 DD DSN=ADU.EXAMPL11.DSN1COPY.ADU11TSB,DISP=SHR
//SYSCNTL  DD DSN=ADU.EXAMPL11.SYSCNTL,DISP=(NEW,CATLG),
//            UNIT=SYSDA,SPACE=(CYL,(3,1),RLSE)
//SYSREC01 DD DSN=ADU.EXAMPL11.SYSREC01,DISP=(NEW,CATLG),
//            UNIT=SYSDA,SPACE=(CYL,(3,1),RLSE)
//SYSREC02 DD DSN=ADU.EXAMPL11.SYSREC02,DISP=(NEW,CATLG),
//            UNIT=SYSDA,SPACE=(CYL,(3,1),RLSE)
//SYSPRINT DD DSN=ADU.EXAMPL11.SYSPRINT,DISP=(NEW,CATLG),
//            UNIT=SYSDA,SPACE=(CYL,(3,1),RLSE)

The following figure shows the DDLIN data set that example 11 uses:

//    JOBCARD
//**********************ADUEX11A ***********************************
//******************************************************************
//*********  Using a DDLIN data set         ************************
//*This example uses the OBID option and the INFILE option with a  *
//*file that contains DDL.                                         *
//******************************************************************
//*  Replace "DB2SYS" by your DB2 subsystem name.                  *
//*  Use your DB2 product install libraries for STEPLIBS :         *
//*     PRODUCT.LIBRARIES                                          *
//*     DB2.DSNEXIT                                                *
//*     DB2.DSNLOAD                                                *
//******************************************************************
//CREATEDB  EXEC PGM=IKJEFT01,DYNAMNBR=20
//STEPLIB   DD DISP=SHR,DSN=DB2.DSNEXIT
//          DD DISP=SHR,DSN=DB2.DSNLOAD
//SYSTSPRT  DD SYSOUT=*
//SYSPRINT  DD SYSOUT=*
//SYSPUNCH  DD SYSOUT=*
//SYSTSIN   DD *
  DSN SYSTEM(DB2SYS)
  RUN PROGRAM (DSNTEP2)
//SYSIN     DD *
 DROP   DATABASE ADU11DB;
 COMMIT
  ;
 CREATE DATABASE ADU11DB
        STOGROUP SYSDEFLT;
 COMMIT
  ;
 CREATE TABLESPACE ADU11TSA  IN ADU11DB
        USING      STOGROUP SYSDEFLT
        FREEPAGE   10
        PCTFREE    10
        BUFFERPOOL BP32K
        LOCKSIZE   PAGE
        CLOSE      YES
        SEGSIZE    4 ;
 COMMIT
  ;
 CREATE TABLE ADU.ADU11TB1
       (COL1_INTEGER       INTEGER               NOT NULL WITH DEFAULT
       ,COL2_CHAR_20       CHARACTER(20)         NOT NULL WITH DEFAULT
       ,COL3_CHAR_20       CHARACTER(20)         NOT NULL WITH DEFAULT
       ,COL4_CHAR_100      CHARACTER(100)        NOT NULL WITH DEFAULT
       ,COL5_CHAR_100      CHARACTER(100)        NOT NULL WITH DEFAULT
       ,COL6_INTEGER       INTEGER               NOT NULL WITH DEFAULT
       ,COL7_INTEGER       INTEGER               NOT NULL WITH DEFAULT
       )
        IN ADU11DB.ADU11TSA
        AUDIT NONE ;
 COMMIT
  ;
 CREATE TABLESPACE ADU11TSB  IN ADU11DB
        USING      STOGROUP SYSDEFLT
        FREEPAGE   10
        PCTFREE    10
        LOCKSIZE   PAGE
        CLOSE      YES
        SEGSIZE    4 ;
 COMMIT
  ;
 CREATE TABLE ADU.ADU11TB2
       (COL1_INTEGER       INTEGER               NOT NULL WITH DEFAULT
       ,COL2_CHAR_100      CHARACTER(100)        NOT NULL WITH DEFAULT
       ,COL3_CHAR_100      CHARACTER(100)        NOT NULL WITH DEFAULT
       ,COL4_VCHAR_250     VARCHAR(250)          NOT NULL WITH DEFAULT
       ,COL5_VCHAR_250     VARCHAR(250)          NOT NULL WITH DEFAULT
       ,COL6_TIMESTAMP     TIMESTAMP             NOT NULL WITH DEFAULT
       )
        OBID 1202
        IN ADU11DB.ADU11TSB
        AUDIT NONE ;
 COMMIT
  ;
//*

SYSPRINT for example 11

The following figure shows the SYSPRINT for example 11:

1                               *****  B M C   U N L O A D   P L U S   F O R   D B 2    V13R1.00 *****
                                             (C) COPYRIGHT 1991 - 2022 BMC SOFTWARE, INC.
-BMC50001I UTILITY EXECUTION STARTING    1/25/2022    8:34:30 ...
 BMC50002I UTILITY ID = 'ADUXM11'.  DB2 SUBSYSTEM ID = 'DEMO'.  OPTION MODULE = 'ADU$OPTS'.
 BMC50471I z/OS 2.4.0,PID=HBB77C0,DFSMS FOR Z/OS=2.4.0,DB2=13.1.501
 BMC50471I REGION=0M,BELOW 16M=8.6M,ABOVE 16M=1,005.6M,IEFUSI=NO,CPUs=7,GPs=5,zIIPs=2
 BMC50471I MEMLIMIT=15.9E,AVAILABLE=15.9E,MEMLIMIT SET BY:REGION=0
 BMC50471I SMFID=DB2B,JOBID=J0940530,JOB=ADUEX11,STEP=UNLOAD11,CPU=8561-615 (z15)/1.71,72.0G
0
 BMC50471I UNLOAD PLUS FOR DB2--V13.01.00 BASE
 BMC50471I   NO MAINTENANCE TO REPORT
 BMC50471I DB2 UTILITIES COMMON CODE--V13.01.00 BASE
 BMC50471I   NO MAINTENANCE TO REPORT
 BMC50471I SOLUTION COMMON CODE--V13.01.00 BASE
 BMC50471I   MAINT: BPJ1541  BPJ1713  BPJ2211
 BMC50471I BMCSORT ENGINE--V02.04.01
 BMC50471I   MAINT: BPJ0691  BPJ0718  BPJ0881  BPJ0922  BPJ0996  BPJ1164  BPJ1309  BPJ1386  BPJ1497  BPJ1594  BPJ1724  BPJ1809
 BMC50471I          BPJ1833  BPJ1891  BPJ1905  BPJ2109  BPJ2232  BPJ2297
 BMC50471I BMC STATS API--V13.01.00 BASE
 BMC50471I   NO MAINTENANCE TO REPORT
 BMC50471I EXTENDED BUFFER MANAGER--V06.02.01
 BMC50471I   MAINT: BPE0443  BPE0445  BPE0447  BPE0449  BPE0450  BPE0451  BPE0452  BPE0455  BPE0456  BPE0457  BPE0460  BPE0463
 BMC50471I          BPE0467  BPE0468  BPE0469  BPE0473  BPE0474  BPE0475  BPE0479  BPE0480  BPE0482  BPE0487  BPE0488  BPE0489
 BMC50471I          BPE0493  BPE0497  BPE0498  BPE0501  BPE0503  BPE0507  BPE0512  BPE0513  BPE0517  BPE0518  BPE0519  BPE0523
 BMC50471I          BPE0524  BPE0527  BPE0528  BPE0530  BPE0531  BPE0534  BPE0535  BPE0540  BPE0541  BPE0542  BPE0545  BPE0549
 BMC50471I          BPE0551  BPE0552  BPE0555  BPE0557  BPE0560
0
 BMC50471I ANALYZE=(DB2STATS,NOLIMIT)              FORCE=NONE                              SORTNUM=32
 BMC50471I CENTURY=(1950,2049)                     HISTORY=YES                             SQLDELAY=3
 BMC50471I CHANGE_CONSISTENT=NO                    IBUFFS=25                               SQLRETRY=100
 BMC50471I CHANGE_QUIESCE=NO                       INLINE=NO                               SSREPORT=REPORT_SWITCH
 BMC50471I CMAX=16                                 LOADDECP=NO                             TAPEDISP=DELETE
 BMC50471I CMRATIO=50                              LOCKROW=YES                             TASKMAX=200%
 BMC50471I CONSTRULES=BMC                          MAXP=5                                  UBUFFS=25
 BMC50471I CURRENTDEGREE=NONE                      MSGLEVEL=1                              UNLDMAX=200%
 BMC50471I DELFILES=NO                             NULLCHAR=X'6F'                          UNLOADDN_ACTIVE=(NO,NO)
 BMC50471I DRNDELAY=3                              NULLTYPE=T1                             UNLOADDN=(SYSREC,SYSRED)
 BMC50471I DRNRETRY=10                             OPNDB2ID=YES                            USELRECL=NO
 BMC50471I DRNWAIT=UTIL                            PLAN=ADU1310T                           UXSTATE=SUP
 BMC50471I DSPLOCKS=NONE                           RECFM=AUTO                              WORKUNIT=SYSALLDA
 BMC50471I EXCLDUMP=(X37,X22,X06)                  ROWSETSZ=100                            XBMID=XBMDB2V
 BMC50471I FILEREFDN=SYSREF                        SDUMP=YES                               ZIIP=ENABLED
 BMC50471I FILL=NO                                 SHRLEVEL=REFERENCE                      ZONEDDECOVP=(C,D)
 BMC50471I FORCE_AT=(START,3)                      SMAX=16
 BMC50471I FORCE_RPT=NO                            SMCORE=(0K,0K)
0
0
 BMC50471I TAPES=NONE
0
 BMC50470I OUTPUT   = SYSREC                             SYSRED                               SYSREF
 BMC50470I UNIT     = SYSALLDA                           SYSALLDA                             SYSALLDA
 BMC50470I VOLCNT   = 25                                 25                                   25
 BMC50470I GDGLIMIT = 5                                  5                                    5
 BMC50470I GDGEMPTY = NO                                 NO                                   NO
 BMC50470I GDGSCRAT = NO                                 NO                                   NO
 BMC50470I STORCLAS = NONE                               NONE                                 NONE
 BMC50470I DATACLAS = NONE                               NONE                                 NONE
 BMC50470I MGMTCLAS = NONE                               NONE                                 NONE
 BMC50470I UNITCNT  = 0                                  0                                    0
 BMC50470I SPACE    = CYL                                CYL                                  CYL
 BMC50470I PCTPRIM  = AUTO                               AUTO                                 AUTO
 BMC50470I MAXPRIM  = 0                                  0                                    0
 BMC50470I MAXSECD  = 0                                  0                                    0
 BMC50470I FILESZPCT  100                                100                                  100
 BMC50470I NBRSECD  = AUTO                               AUTO                                 AUTO
 BMC50470I DISKRETN = NONE                               NONE                                 NONE
 BMC50470I DISKEXPD = NONE                               NONE                                 NONE
 BMC50470I RETPD    = NONE                               NONE                                 NONE
 BMC50470I EXPDT    = 99000                              99000                                99000
 BMC50470I TRTCH    = NONE                               NONE                                 NONE
 BMC50470I DSNTYPE  = NONE                               NONE                                 PDS
 BMC50483I SYSREC     VOLUMES=NONE
 BMC50483I SYSRED     VOLUMES=NONE
 BMC50483I SYSREF     VOLUMES=NONE
0
 BMC50483I SYSREC     DSNAME=&USERID.&TYPE.S&SELNUM
 BMC50483I SYSRED     DSNAME=&USERID.&TYPE.S&SELNUM
 BMC50483I SYSREF     DSNAME=&USERID.&TYPE.S&SELNUM.P&POSNUM
0

 BMC50471I DB2 DSNHDECP MODULE SETTINGS:
 BMC50471I VERSION                 = 1310
 BMC50471I SUBSYSTEM DEFAULT       = DEMO
 BMC50471I CHARACTER SET           = ALPHANUM
 BMC50471I DATE FORMAT             = USA
 BMC50471I TIME FORMAT             = USA
 BMC50471I LOCAL DATE LENGTH       = 0
 BMC50471I LOCAL TIME LENGTH       = 0
 BMC50471I DECIMAL POINT           = PERIOD
 BMC50471I DECIMAL ARITHMETIC      = 15
 BMC50471I DELIMITER               = DEFAULT
 BMC50471I SQL DELIMITER           = DEFAULT
 BMC50471I ENCODING SCHEME         = EBCDIC
 BMC50471I APPL. ENCODING SCHEME   = EBCDIC
 BMC50471I MIXED                   = NO
 BMC50471I EBCDIC CCSID            = (37,65534,65534)
 BMC50471I ASCII CCSID             = (819,65534,65534)
 BMC50471I UNICODE CCSID           = (367,1208,1200)
 BMC50471I IMPLICIT TIME ZONE      = CURRENT (-06:00)


 BMC50658I DB2 CURRENT FUNCTION LEVEL IS V13R1M501
 BMC50659I DB2 CATALOG LEVEL IS V13R1M501
 BMC50660I DB2 HIGHEST ACTIVATED FUNCTION LEVEL IS V13R1M501
 BMC50661I DB2 CODE LEVEL IS V13R1M501

 BMC50471I BMC_BMCUTIL       ='BMCUTIL.CMN_BMCUTIL'
 BMC50471I BMC_BMCSYNC       ='BMCUTIL.CMN_BMCSYNC'
 BMC50471I BMC_BMCHIST       ='BMCUTIL.CMN_BMCHIST'
 BMC50471I BMC_BMCXCOPY      ='BMCUTIL.CMN_BMCXCOPY'
 BMC50471I BMC_BMCSMARTSWITCH='BMCUTIL.CMN_BMCSWITCH'
 BMC50471I BMC_BMCSSTRACKING ='BMCUTIL.CMN_BMCSSTRACK'
0
0
 BMC50102I   UNLOAD  INFILE BMCCPY
 BMC50102I     UNLOADDN SYSREC ACTIVE NO
 BMC50102I           SELECT 'ADU11TB1', * FROM ADU.ADU11TB1 {OBID 3}
 BMC50102I           SELECT 'ADU11TB2', * FROM ADU.ADU11TB2
 BMC51654I DIRECT YES IN EFFECT

0
 BMC50004I UTILINIT PHASE COMPLETE.  ELAPSED TIME = 00:00:00


 BMC54000I SMARTSWITCH NOT SUPPORTED - NO BMC AMI UTILITIES VERSION FOUND
 BMC54003I SMARTSWITCH RULE: FORCE_NO_SWITCH  COMMENT: SMARTSWITCH NOT ACTIVATED, TABLE/ALIAS DOES NOT EXIST

 BMC50199I UNLOAD PLUS PROCESSING CONTINUES

 BMC51689I ESTIMATED ROWS FOR SELECT 1 IS 0
 BMC51689I ESTIMATED ROWS FOR SELECT 2 IS 0

 BMC51639I FOR DDNAME 'SYSREC01' DSN=ADU.EXAMPL11.SYSREC01,DCB=(RECFM=FB,BLKSIZE=27820,LRECL=260)
 BMC51639I FOR DDNAME 'SYSREC02' DSN=ADU.EXAMPL11.SYSREC02,DCB=(RECFM=VB,BLKSIZE=27998,LRECL=746)
 BMC50041I 0: ZIIP  ENABLED (0) USING XBM SUBSYSTEM XV2B
 BMC50474I BELOW 16M = 8440K, ABOVE 16M = 1022788K, CPUS = 5
 BMC51701I MAX TASKS = 2, MAX PARTITIONS PER TASK = 1, SORTWKS PER TASK = 0, MAX OPEN PARTITIONS PER TASK = 1
 BMC50476I DDNAME = BMCCPY02, I/OS = 3, I/O WAITS = 1, RDB LOCK WAITS = 0
 BMC50477I 2: PARTITION =    1, ROWS/KEYS = 2375, I/O WAITS = 0 ,DDNAME = BMCCPY02
 BMC50478I 2: RDB LOCK WAITS = 0
 BMC50476I DDNAME = BMCCPY01, I/OS = 6, I/O WAITS = 5, RDB LOCK WAITS = 0
 BMC50477I 1: PARTITION =    1, ROWS/KEYS = 5000, I/O WAITS = 0 ,DDNAME = BMCCPY01
 BMC50478I 1: RDB LOCK WAITS = 0
 BMC50476I DDNAME = SYSREC01, I/OS = 4, I/O WAITS = 1, RDB LOCK WAITS = 0
 BMC50476I DDNAME = SYSREC02, I/OS = 2, I/O WAITS = 1, RDB LOCK WAITS = 0
 BMC51671I UNLOAD STATISTICS:  5000 ROWS PROCESSED FROM PARTITION 1
 BMC51686I UNLOADING OF DATASET 'ADU.EXAMPL11.DSN1COPY.ADU11TSA' READ 65 PAGES
 BMC51672I UNLOAD STATISTICS:  5000 ROWS PROCESSED FROM SPACE 'ADU11DB.ADU11TSA', 0 NOT SELECTED, 0 DISCARDED
 BMC51671I UNLOAD STATISTICS:  2375 ROWS PROCESSED FROM PARTITION 1
 BMC51686I UNLOADING OF DATASET 'ADU.EXAMPL11.DSN1COPY.ADU11TSB' READ 232 PAGES
 BMC51672I UNLOAD STATISTICS:  2375 ROWS PROCESSED FROM SPACE 'ADU11DB.ADU11TSB', 0 NOT SELECTED, 0 DISCARDED
 BMC51674I UNLOAD STATISTICS:  5000 RECORDS WRITTEN TO DDNAME 'SYSREC01'
 BMC51674I UNLOAD STATISTICS:  2375 RECORDS WRITTEN TO DDNAME 'SYSREC02'
 BMC51675I UNLOAD STATISTICS:  0 RECORDS DISCARDED DUE TO ERRORS
 BMC50041I 0: ZIIP NOT ENABLED (0) USING XBM SUBSYSTEM XV2B
 BMC50004I UNLOAD PHASE COMPLETE.  ELAPSED TIME = 00:00:00


 BMC51639I FOR DDNAME 'SYSCNTL' DSN=ADU.EXAMPL11.SYSCNTL,DCB=(RECFM=FB,BLKSIZE=3120,LRECL=80)
 BMC51801I LOAD TABLE STATEMENTS WRITTEN TO DDNAME 'SYSCNTL'
0
 BMC51810I LOAD DATA INDDN SYSREC01
 BMC51940I      EBCDIC CCSID(37,65534,65534)
 BMC51811I   INTO TABLE
 BMC51809I ADU.ADU11TB1
 BMC51815I ($CONST01 POSITION(1:8) CHAR  (8)
 BMC51813I ,COL1_INTEGER POSITION(9:12) INTEGER
 BMC51815I ,COL2_CHAR_20 POSITION(13:32) CHAR  (20)
 BMC51815I ,COL3_CHAR_20 POSITION(33:52) CHAR  (20)
 BMC51815I ,COL4_CHAR_100 POSITION(53:152) CHAR  (100)
 BMC51815I ,COL5_CHAR_100 POSITION(153:252) CHAR  (100)
 BMC51813I ,COL6_INTEGER POSITION(253:256) INTEGER
 BMC51813I ,COL7_INTEGER POSITION(257:260) INTEGER
 BMC51809I )
 BMC51810I LOAD DATA INDDN SYSREC02
 BMC51940I      EBCDIC CCSID(37,65534,65534)
 BMC51811I   INTO TABLE
 BMC51809I ADU.ADU11TB2
 BMC51815I ($CONST01 POSITION(1:8) CHAR  (8)
 BMC51813I ,COL1_INTEGER POSITION(9:12) INTEGER
 BMC51815I ,COL2_CHAR_100 POSITION(13:112) CHAR  (100)
 BMC51815I ,COL3_CHAR_100 POSITION(113:212) CHAR  (100)
 BMC51813I ,COL4_VCHAR_250 POSITION(213:*) VARCHAR
 BMC51813I ,COL5_VCHAR_250 POSITION(*:*) VARCHAR
 BMC51815I ,COL6_TIMESTAMP POSITION(*:*+25) TIMESTAMP  EXTERNAL(26)
 BMC51809I )
0
 BMC50476I DDNAME = SYSCNTL, I/OS = 1, I/O WAITS = 1, RDB LOCK WAITS = 0
0BMC50006I UTILITY EXECUTION COMPLETE, RETURN CODE = 0


 

Tip: For faster searching, add an asterisk to the end of your partial query. Example: cert*