Example 5 — Unloading data from a DSN1COPY
This example unloads four partitions of a four-partition table space. In this case, each partition has a separate DSN1COPY.
To accomplish this unload, the integer in the DSN1COPY ddname must match the partition. The following table describes the key command options for this job.
In the SYSPRINT, the echoed SAS statements show that some of the Db2 column names in this example exceed the SAS allowable length of 8 characters. For more information, see Generating-control-statements-for-Db2-or-other-software-products.
Message 50041I indicates the status of zIIP processing. For this example, the ZIIP installation option is ENABLED, but an SUF subsystem was not specified. UNLOAD PLUS automatically located an available SUF subsystem to provide zIIP processing.
Command options used in JCL | Description |
---|---|
INFILE DSN1CPY | Unloads data from a sequential data set rather than a Db2 table space data set |
CNTLCARDS SAS | Generates SAS external file INPUT statements in the SYSCNTL data set |
PART 4,1:3 | Designates the individual partitions and range of partitions that will be unloaded While you can specify a mixture of individual partitions and ranges of partitions in any order, UNLOAD PLUS unloads all partitions in ascending order. |
SELECT * | Unloads all columns |
FROM | Names the table to unload |
OBID | Specifies the OBID that will be associated with the selected table |
WHERE | Qualifies the data to unload |
The following figure shows the JCL for example 5:
//UNLOAD05 EXEC PGM=ADUUMAIN,REGION=0M,
// PARM=(DEHJ,'ADUXM05','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 DSN1CPY
CNTLCARDS SAS
PART 4,1:3
SELECT *
FROM BMC.EMPLS {OBID 3}
WHERE SSN > '200000000'
*
//DSN1CPY1 DD DISP=SHR,DSN=ADU.QA.DSN1COPY.ADUEX05.P1
//DSN1CPY2 DD DISP=SHR,DSN=ADU.QA.DSN1COPY.ADUEX05.P2
//DSN1CPY3 DD DISP=SHR,DSN=ADU.QA.DSN1COPY.ADUEX05.P3
//DSN1CPY4 DD DISP=SHR,DSN=ADU.QA.DSN1COPY.ADUEX05.P4
//SYSREC01 DD DSN=ADU.EXMPLE05.SYSREC01,
// DISP=(,CATLG),SPACE=(TRK,(1,1))
//SYSREC02 DD DSN=ADU.EXMPLE05.SYSREC02,
// DISP=(,CATLG),SPACE=(TRK,(1,1))
//SYSREC03 DD DSN=ADU.EXMPLE05.SYSREC03,
// DISP=(,CATLG),SPACE=(TRK,(1,1))
//SYSREC04 DD DSN=ADU.EXMPLE05.SYSREC04,
// DISP=(,CATLG),SPACE=(TRK,(1,1))
//SYSCNTL DD DSN=ADU.EXMPLE05.SYSCNTL,
// DISP=(,CATLG),SPACE=(TRK,(1,1))
//UTPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
SYSPRINT for example 5
The following figure shows the SYSPRINT for example 5:
(C) COPYRIGHT 1991 - 2013 BMC SOFTWARE, INC.
BMC50001I UTILITY EXECUTION STARTING 10/28/2013 13:03:04 ...
BMC50002I UTILITY ID = 'ADUXM05'. 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=8836K,ABOVE 16M=1413040K,IEFUSI=NO,CPUS=3
BMC50471I MEMLIMIT=17592186040320M,AVAILABLE=17592186040311M,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 *
BMC50102I UNLOAD INFILE DSN1CPY
BMC50102I CNTLCARDS SAS
BMC50102I PART 4,1:3
BMC50102I SELECT *
BMC50102I FROM BMC.EMPLS {OBID 3}
BMC50102I WHERE SSN > '200000000'
BMC50102I *
BMC51654I DIRECT YES IN EFFECT
BMC51689I ESTIMATED ROWS FOR SELECT 1 IS 0
BMC50004I UTILINIT PHASE COMPLETE. ELAPSED TIME = 00:00:00
BMC51639I FOR DDNAME 'SYSREC01' DSN=ADU.EXAMPLE5.SYSREC01,DCB=(RECFM=VB,BLKSIZE=27993,LRECL=111)
BMC51639I FOR DDNAME 'SYSREC02' DSN=ADU.EXAMPLE5.SYSREC02,DCB=(RECFM=VB,BLKSIZE=27993,LRECL=111)
BMC51639I FOR DDNAME 'SYSREC03' DSN=ADU.EXAMPLE5.SYSREC03,DCB=(RECFM=VB,BLKSIZE=27993,LRECL=111)
BMC51639I FOR DDNAME 'SYSREC04' DSN=ADU.EXAMPLE5.SYSREC04,DCB=(RECFM=VB,BLKSIZE=27993,LRECL=111)
BMC50041I 0: ZIIP ENABLED (0) USING XBM SUBSYSTEM XBMB
BMC50474I BELOW 16M = 8464K, ABOVE 16M = 1403620K, CPUS = 3
BMC51701I MAX TASKS = 4, MAX PARTITIONS PER TASK = 1, SORTWKS PER TASK = 0, MAX OPEN PARTITIONS PER TASK = 1
BMC50476I DDNAME = DSN1CPY2, I/OS = 1, I/O WAITS = 1, RDB LOCK WAITS = 0
BMC50477I 2: PARTITION = 2, ROWS/KEYS = 5, I/O WAITS = 0 ,DDNAME = DSN1CPY2
BMC50478I 2: RDB LOCK WAITS = 0
BMC50476I DDNAME = DSN1CPY1, I/OS = 1, I/O WAITS = 1, RDB LOCK WAITS = 0
BMC50476I DDNAME = DSN1CPY4, I/OS = 1, I/O WAITS = 1, RDB LOCK WAITS = 0
BMC50477I 1: PARTITION = 1, ROWS/KEYS = 8, I/O WAITS = 2 ,DDNAME = DSN1CPY1
BMC50476I DDNAME = DSN1CPY3, I/OS = 1, I/O WAITS = 1, RDB LOCK WAITS = 0
BMC50477I 3: PARTITION = 3, ROWS/KEYS = 5, I/O WAITS = 0 ,DDNAME = DSN1CPY3
BMC50478I 1: RDB LOCK WAITS = 0
BMC50478I 3: RDB LOCK WAITS = 0
BMC50477I 4: PARTITION = 4, ROWS/KEYS = 2, I/O WAITS = 0 ,DDNAME = DSN1CPY4
BMC50478I 4: RDB LOCK WAITS = 0
BMC50476I DDNAME = SYSREC01, I/OS = 1, I/O WAITS = 1, RDB LOCK WAITS = 0
BMC50476I DDNAME = SYSREC02, I/OS = 1, I/O WAITS = 1, RDB LOCK WAITS = 0
BMC50476I DDNAME = SYSREC03, I/OS = 1, I/O WAITS = 1, RDB LOCK WAITS = 0
BMC50476I DDNAME = SYSREC04, I/OS = 1, I/O WAITS = 1, RDB LOCK WAITS = 0
BMC51671I UNLOAD STATISTICS: 8 ROWS PROCESSED FROM PARTITION 1
BMC51686I UNLOADING OF DATASET 'ADU.QA.DSN1COPY.ADUEX05.P1' READ 3 PAGES
BMC51671I UNLOAD STATISTICS: 5 ROWS PROCESSED FROM PARTITION 2
BMC51686I UNLOADING OF DATASET 'ADU.QA.DSN1COPY.ADUEX05.P2' READ 3 PAGES
BMC51671I UNLOAD STATISTICS: 4 ROWS PROCESSED FROM PARTITION 3
BMC51686I UNLOADING OF DATASET 'ADU.QA.DSN1COPY.ADUEX05.P3' READ 3 PAGES
BMC51671I UNLOAD STATISTICS: 2 ROWS PROCESSED FROM PARTITION 4
BMC51686I UNLOADING OF DATASET 'ADU.QA.DSN1COPY.ADUEX05.P4' READ 3 PAGES
BMC51672I UNLOAD STATISTICS: 19 ROWS PROCESSED FROM SPACE 'BMCEXDB.BMCEXATS', 1 NOT SELECTED, 0 DISCARDED
BMC51674I UNLOAD STATISTICS: 8 RECORDS WRITTEN TO DDNAME 'SYSREC01'
BMC51674I UNLOAD STATISTICS: 5 RECORDS WRITTEN TO DDNAME 'SYSREC02'
BMC51674I UNLOAD STATISTICS: 4 RECORDS WRITTEN TO DDNAME 'SYSREC03'
BMC51674I UNLOAD STATISTICS: 2 RECORDS WRITTEN TO DDNAME 'SYSREC04'
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.EXAMPLE5.SYSCNTL,DCB=(RECFM=FB,BLKSIZE=3120,LRECL=80)
BMC51801I SAS STANDARD EXTERNAL FILE 'INFILE' STATEMENTS WRITTEN TO DDNAME 'SYSCNTL'
BMC51839I OPTIONS INVALIDDATA='.';
BMC51821I DATA BMC;
BMC51822I INFILE SYSREC;
BMC51823I INPUT
BMC51828I EMPL_ID ?? PD3.0
BMC51824I SSN $CHAR9.
BMC51824I HIRE_DATE $CHAR10. /* NAME TOO LARGE */
BMC51832I NULL1 $CHARZB1.
BMC51824I DEPT_NO $CHAR4.
BMC51831I JOB_CODE IB2.
BMC51832I NULL2 $CHARZB1.
BMC51824I SALARY_CODE $CHAR1. /* NAME TOO LARGE */
BMC51828I SALARY_HRLY ?? PD5.2 /* NAME TOO LARGE */
BMC51832I NULL3 $CHARZB1.
BMC51824I PART_401K $CHAR1. /* NAME TOO LARGE */
BMC51832I NULL4 $CHARZB1.
BMC51836I VARLEN1 IB2. @; /* LENGTH OF FIELD EMPL_LNAME */
BMC51837I IF VARLEN1 ¬= 0 THEN INPUT
BMC51825I EMPL_LNAME $VARYING15. VARLEN1 /* NAME TOO LARGE */ @;
BMC51838I INPUT /* RESUME INPUT */
BMC51836I VARLEN2 IB2. @; /* LENGTH OF FIELD EMPL_FNAME */
BMC51837I IF VARLEN2 ¬= 0 THEN INPUT
BMC51825I EMPL_FNAME $VARYING10. VARLEN2 /* NAME TOO LARGE */ @;
BMC51838I INPUT /* RESUME INPUT */
BMC51836I VARLEN3 IB2. @; /* LENGTH OF FIELD EMPL_MNAME */
BMC51837I IF VARLEN3 ¬= 0 THEN INPUT
BMC51825I EMPL_MNAME $VARYING10. VARLEN3 /* NAME TOO LARGE */ @;
BMC51838I INPUT /* RESUME INPUT */
BMC51832I NULL5 $CHARZB1.
BMC51824I REC_CREATED $CHAR26. /* NAME TOO LARGE */
BMC51823I ;
BMC50476I DDNAME = SYSCNTL, I/OS = 1, I/O WAITS = 1, RDB LOCK WAITS = 0
BMC50006I UTILITY EXECUTION COMPLETE, RETURN CODE = 0