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 a SYSCNTL DD statement).
Message 50041I indicates the status of zIIP processing. For this example, the ZIIP installation option is ENABLED, but an XBM subsystem was not specified. UNLOAD PLUS automatically located an available 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:
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:
//UNLOAD11 EXEC PGM=ADUUMAIN,REGION=0M,
// PARM=(DEHJ,'ADUXM11','NEW ',,'MSGLEVEL(1)')
//*********************************************************************
//STEPLIB DD DISP=SHR,DSN=<product.libraries>
// DD DISP=SHR,DSN=DB2.DSNEXIT
// DD DISP=SHR,DSN=DB2.DSNLOAD
//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.VQA.EXAMPLES(ADUXDDL1),DISP=SHR
// DD DSN=ADU.VQA.EXAMPLES(ADUXDDL2),DISP=SHR
//BMCCPY01 DD DSN=ADU.QA.DSN1COPY.ADU11TSA,DISP=SHR
//BMCCPY02 DD DSN=ADU.QA.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 SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
The following figure shows the first DDLIN data set that example 11 uses:
COMMIT
;
DROP STOGROUP ADUSTG1;
COMMIT
;
CREATE STOGROUP ADUSTG1
VOLUMES(DEV185,PJF001)
VCAT DEHJCAT;
COMMIT
;
CREATE DATABASE ADU11DB
CCSID EBCDIC
STOGROUP ADUSTG1;
COMMIT
;
CREATE TABLESPACE ADU11TSA IN ADU11DB
USING STOGROUP ADUSTG1
FREEPAGE 10
PCTFREE 10
BUFFERPOOL BP32K
CCSID EBCDIC
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
;
The following figure shows the second DDLIN data set that example 11 uses:
USING STOGROUP ADUSTG1
CCSID EBCDIC
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:
(C) COPYRIGHT 1991 - 2013 BMC SOFTWARE, INC.
BMC50001I UTILITY EXECUTION STARTING 10/29/2013 8:53:11 ...
BMC50002I UTILITY ID = 'ADUXM11'. DB2 SUBSYSTEM ID = 'DEHJ'. OPTION MODULE = 'ADU$OPTS'.
BMC50471I z/OS 2.1.0,PID=HBB7790,DFSMS FOR Z/OS=2.1.0,DB2=11.1.0
BMC50471I REGION=0M,BELOW 16M=8824K,ABOVE 16M=1407704K,IEFUSI=NO,CPUS=3
BMC50471I MEMLIMIT=17592186040320M,AVAILABLE=17592186040304M,MEMLIMIT SET BY:REGION=0
BMC50471I UNLOAD PLUS FOR DB2--V11.01.00
BMC50471I NO MAINTENANCE TO REPORT
BMC50471I DB2 UTILITIES COMMON CODE--V11.01.00
BMC50471I NO MAINTENANCE TO REPORT
BMC50471I SOLUTION COMMON CODE--V11.01.00
BMC50471I MAINT: BPJ0661 BPJ0667 BPJ0671 BPJ0674 BPJ0675 BPJ0676 BPJ0682 BPJ0686 BPJ0689 BPJ0697
BMC50471I BMCSORT ENGINE--V02.04.01
BMC50471I MAINT: BPJ0691
BMC50471I BMC STATS API--V11.01.00
BMC50471I MAINT: BPU5409 BPU5534 BPU5674
BMC50471I EXTENDED BUFFER MANAGER--V06.01.00
BMC50471I MAINT: BPE0401 BPE0403 BPE0405 BPE0407 BPE0410 BPE0412 BPE0416
BMC50471I ANALYZE=(DB2STATS,NOLIMIT) FORCE_RPT=NO SMAX=16
BMC50471I CENTURY=(1950,2049) FORCE=NONE SMCORE=(0K,0K)
BMC50471I CHANGE_CONSISTENT=NO HISTORY=YES SORTNUM=32
BMC50471I CHANGE_QUIESCE=NO IBUFFS=25 SQLDELAY=3
BMC50471I CMAX=16 INLINE=NO SQLRETRY=100
BMC50471I CMRATIO=50 LOADDECP=NO TAPEDISP=DELETE
BMC50471I CONSTRULES=BMC LOCKROW=YES TASKMAX=200%
BMC50471I CURRENTDEGREE=NONE MAXP=5 UBUFFS=25
BMC50471I DELFILES=YES MSGLEVEL=1 UNLDMAX=200%
BMC50471I DRNDELAY=1 NULLCHAR=X'6F' UNLOADDN_ACTIVE=(YES,NO)
BMC50471I DRNRETRY=255 NULLTYPE=T1 UNLOADDN=(SYSREC,SYSRED)
BMC50471I DRNWAIT=NONE OPNDB2ID=YES USELRECL=NO
BMC50471I DSPLOCKS=DRNFAIL PLAN=ADUQA UXSTATE=SUP
BMC50471I EXCLDUMP=(X37,X22,X06) RECFM=AUTO WORKUNIT=SYSALLDA
BMC50471I FILEREFDN=SYSREF ROWSETSZ=100 ZIIP=ENABLED
BMC50471I FILL=NO SDUMP=YES ZONEDDECOVP=(C,D)
BMC50471I FORCE_AT=(START,3) SHRLEVEL=REFERENCE
BMC50471I TAPES=NONE
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
BMC50483I SYSREC DSNAME=&USERID.&TYPE.S&SELNUM
BMC50483I SYSRED DSNAME=&USERID.&TYPE.S&SELNUM
BMC50483I SYSREF DSNAME=&USERID.BMC
BMC50471I DB2 DSNHDECP MODULE SETTINGS:
BMC50471I VERSION = 1110
BMC50471I SUBSYSTEM DEFAULT = DEHJ
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 (-05:00)
BMC50028I DB2 MODE = NFM
BMC50471I BMC_BMCUTIL ='BMCUTIL.CMN_BMCUTIL'
BMC50471I BMC_BMCSYNC ='BMCUTIL.CMN_BMCSYNC'
BMC50471I BMC_BMCHIST ='BMCUTIL.CMN_BMCHIST'
BMC50471I BMC_BMCXCOPY ='BMCUTIL.CMN_BMCXCOPY'
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
BMC51689I ESTIMATED ROWS FOR SELECT 1 IS 0
BMC51689I ESTIMATED ROWS FOR SELECT 2 IS 0
BMC50004I UTILINIT PHASE COMPLETE. ELAPSED TIME = 00:00:00
BMC51639I FOR DDNAME 'SYSREC01' DSN=ADU.EXAMP011.SYSREC01,DCB=(RECFM=FB,BLKSIZE=27820,LRECL=260)
BMC51639I FOR DDNAME 'SYSREC02' DSN=ADU.EXAMP011.SYSREC02,DCB=(RECFM=VB,BLKSIZE=27993,LRECL=746)
BMC50041I 0: ZIIP ENABLED (0) USING XBM SUBSYSTEM XBMB
BMC50474I BELOW 16M = 8448K, ABOVE 16M = 1400920K, CPUS = 3
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 = 3, RDB LOCK WAITS = 0
BMC50477I 2: PARTITION = 0, ROWS/KEYS = 2375, I/O WAITS = 0 ,DDNAME = BMCCPY02
BMC50478I 2: RDB LOCK WAITS = 0
BMC50476I DDNAME = BMCCPY01, I/OS = 6, I/O WAITS = 2, RDB LOCK WAITS = 0
BMC50477I 1: PARTITION = 0, 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
BMC51686I UNLOADING OF DATASET 'ADU.QA.DSN1COPY.ADU11TSA' READ 61 PAGES
BMC51672I UNLOAD STATISTICS: 5000 ROWS PROCESSED FROM SPACE 'ADU11DB.ADU11TSA', 0 NOT SELECTED, 0 DISCARDED
BMC51686I UNLOADING OF DATASET 'ADU.QA.DSN1COPY.ADU11TSB' READ 228 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 XBMB
BMC50004I UNLOAD PHASE COMPLETE. ELAPSED TIME = 00:00:00
BMC51639I FOR DDNAME 'SYSCNTL' DSN=ADU.EXAMP011.SYSCNTL,DCB=(RECFM=FB,BLKSIZE=3120,LRECL=80)
BMC51801I LOAD TABLE STATEMENTS WRITTEN TO DDNAME 'SYSCNTL'
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 )
BMC50476I DDNAME = SYSCNTL, I/OS = 1, I/O WAITS = 1, RDB LOCK WAITS = 0
BMC50006I UTILITY EXECUTION COMPLETE, RETURN CODE = 0
Related topic