Fast Unload : How to run a Fast Unload Job to unload two tables in same JCL from an image copy?.

Products

• Fast Unload for DB2 for z/OS

Issue/Introduction

Fast Unload Job returned error message PFU0135E  when there are two FASTUNLOAD ... SELECT statements attempted to unload two tables from an image copy.  
  
The two image copies are concatenated in the same SYSIMG DD. 
 
//SYSIMAG DD DISP=SHR,DSN=HLQ.IMAGE.COPY.IC1 
//        DD DISP=SHR,DSN=HLQ.IMAGE.COPY.IC2

Then there are two SELECT statements.
FASTUNLOAD
INPUT-FORMAT IMAGECOPY
INDDN SYSIMAG
...
SELECT * FROM TABLE1;
...
SELECT * FROM TABLE2;
 
Fast Unload Job returned the PFU0135E error message.
 
PFU0135E - UNLOADING FROM MORE THAN ONE TABLESPACE IS NOT SUPPORTED FOR A COPY 

Environment

Release: R20
Component: PFU

Cause

Fast Unload does not support more than one table space for INPUT-FORMAT IMAGECOPY  with a single FASTUNLOAD statement.

Resolution

Fast Unload does not support more than one table space for INPUT-FORMAT IMAGECOPY  with a single FASTUNLOAD statement. But this can be achieved by using multiple FASTUNLOAD statements.

Sample JCL.  
  
//PTIMSG    DD  SYSOUT=*
//PTIIMSG   DD  SYSOUT=*
//SYSOUT    DD  SYSOUT=*  
//*INPUT IMAGECOPIES*
//SYIMG1    DD DISP=SHR,DSN=hlq.IMAGE.COPY.IC1
//SYIMG2    DD DISP=SHR,DSN=hlq.IMAGE.COPY.IC2
//* OUTPUT *
//SYREC101    DD DSN=hlq.UNLOAD.SYREC101, 
//             SPACE=...
//SYREC201    DD DSN=hlq.UNLOAD.SYREC201,
//             SPACE=...
//* LOAD control *
//SYCTL101  DD  SYSOUT=*
//SYCTL201  DD  SYSOUT=*
//*
//SYSIN   DD  *
FASTUNLOAD
  LOAD-CONTROL DB2LOAD
  INPUT-FORMAT IMAGECOPY
  DISPLAY-STATUS 1000,T
  IO-BUFFERS 60
  VSAM-BUFFERS 96
  SHRLEVEL REFERENCE
    INDDN  SYIMG1         -- INPUT IMAGECOPY First table space SYIMG1
    UNLDDN SYREC1         -- OUTPUT DDNAME Unload first table space SYREC101
    CTLDDN SYCTL1         -- LOAD CONTROL First table SYCTL101
    SELECT * FROM TABLE1; 

FASTUNLOAD
  LOAD-CONTROL DB2LOAD
  INPUT-FORMAT IMAGECOPY
  DISPLAY-STATUS 1000,T
  IO-BUFFERS 60
  VSAM-BUFFERS 96
  SHRLEVEL REFERENCE
    INDDN  SYIMG2         -- INPUT IMAGECOPY Second table space SYIMG2
    UNLDDN SYREC2         -- OUTPUT DDNAME Unload second table space SYREC201
    CTLDDN SYCTL2         -- LOAD CONTROL Second table SYCTL201
    SELECT * FROM TABLE2; 
  

Additional Information

Note when unloading from an image copy , the OBID can be different so it is recommended to first run a SEARCH-OBID report.

INPUT-FORMAT—Specify the Input Data Format

Unload from an Image Copy Data Set