Example JCL: Image Copy load
Review JCL examples for Image Copy load jobs.
Example 1: Manually specifying object translation target ID number pairs
You can specify an image copy data set and load the data from that image copy to the accelerator.
In the following example, the OBIDXLAT and control card cluster options are used to manually specify the object translation target ID number pairs.
//HLOSAMP1 JOB <JOB PARAMETERS>,REGION=0M
//*
//*-------------------------------------------------------------------*
//* *
//* Licensed Materials - Property of IBM *
//* 5639-OLE *
//* (c) Copyright Rocket Software, Inc. 2001-2015 All Rights Reserved.*
//* US Government Users Restricted Rights - Use, duplication or *
//* disclosure restricted by GSA ADP Schedule Contract with IBM Corp. *
//* *
//* Product : Accelerator Loader *
//* Product #: 5639-OLE *
//* Release : 2.1 *
//*-------------------------------------------------------------------*
//* *
//* PURPOSE: *
//* *
//* RUN A BATCH STEP TO LOAD AN IMAGE COPY DIRECTLY INTO THE *
//* ACCELERATOR WITH NO LOG APPLY PROCESSING. *
//* *
//*-------------------------------------------------------------------*
//*
//HLORUN EXEC PGM=HLO#MAIN,REGION=0M,PARM='<SSID>'
//STEPLIB DD DISP=SHR,
// DSN=#HLQ#.SHLOLOAD
// DD DISP=SHR,
// DSN=#HLQ#.SFECLOAD
// DD DSN=DSN.VA10.SDSNEXIT
// DD DSN=DSN.VA10.SDSNLOAD
//DB2PARMS DD DISP=SHR,DSN=<CONTROL FILE>
//SORAMSGS DD SYSOUT=*
//SR0AMSGS DD SYSOUT=*
//SORAWK00 DD UNIT=SYSDA,SPACE=(CYL,(00010,00010),,,ROUND)
//SORAWK01 DD UNIT=SYSDA,SPACE=(CYL,(00010,00010),,,ROUND)
//SORAWK02 DD UNIT=SYSDA,SPACE=(CYL,(00010,00010),,,ROUND)
//SR0AWK00 DD UNIT=SYSDA,SPACE=(CYL,(00010,00010),,,ROUND)
//SR0AWK01 DD UNIT=SYSDA,SPACE=(CYL,(00010,00010),,,ROUND)
//SR0AWK02 DD UNIT=SYSDA,SPACE=(CYL,(00010,00010),,,ROUND)
//SYSUDUMP DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SORTMSGS DD SYSOUT=*
//INFOM DD SYSOUT=*
//SYSINHLO DD *
IDAA_LOAD_IC -
( -
GROUP -
( -
SPACE -
( -
CREATOR 'DSNC810' -
NAME 'EMP01' -
TO_IC 'RSTEST.QA1A.DBHLOTS1.TSHLOSTA.DB2IC1' -
OBIDXLAT ( -
DBID '863,868' -
PSID '2,2' -
OBID '3,3' -
) -
) -
) -
ACCELNAME QA1AACC1 -
PARALLEL '0,1' -
LOG_COPY_PREFERENCE R1R2A1A2 -
USER_INDICATOR HLO -
DB2_SORT YES -
CHECK_DATA WRITE -
)
/*
// Example 2: Obtaining object translation target ID number pairs from the Db2 catalog
In the following example, the OBIDXLAT_CATALOG option is used to obtain the object translation target ID number pairs from the Db2 catalog of the specified object.
//HLOSAMP2 JOB <JOB PARAMETERS>,REGION=0M
//*
//*-------------------------------------------------------------------*
//* *
//* Licensed Materials - Property of IBM *
//* 5639-OLE *
//* (c) Copyright Rocket Software, Inc. 2001-2015 All Rights Reserved.*
//* US Government Users Restricted Rights - Use, duplication or *
//* disclosure restricted by GSA ADP Schedule Contract with IBM Corp. *
//* *
//* Product : IBM DB2 ANALYTICS ACCELERATOR LOADER FOR Z/OS *
//* Product #: 5639-OLE *
//* Release : 2.1 *
//*-------------------------------------------------------------------*
//* *
//* PURPOSE: *
//* *
//* RUN A BATCH STEP TO LOAD AN IMAGE COPY DIRECTLY INTO THE *
//* ACCELERATOR WITH NO LOG APPLY PROCESSING. *
//* *
//*-------------------------------------------------------------------*
//*
//HLORUN EXEC PGM=HLO#MAIN,REGION=0M,PARM='<SSID>'
//STEPLIB DD DISP=SHR,
// DSN=#HLQ#.SHLOLOAD
// DD DISP=SHR,
// DSN=#HLQ#.SFECLOAD
// DD DSN=DSN.VA10.SDSNEXIT
// DD DSN=DSN.VA10.SDSNLOAD
//DB2PARMS DD DISP=SHR,DSN=<CONTROL FILE>
//SORAMSGS DD SYSOUT=*
//SR0AMSGS DD SYSOUT=*
//SORAWK00 DD UNIT=SYSDA,SPACE=(CYL,(00010,00010),,,ROUND)
//SORAWK01 DD UNIT=SYSDA,SPACE=(CYL,(00010,00010),,,ROUND)
//SORAWK02 DD UNIT=SYSDA,SPACE=(CYL,(00010,00010),,,ROUND)
//SR0AWK00 DD UNIT=SYSDA,SPACE=(CYL,(00010,00010),,,ROUND)
//SR0AWK01 DD UNIT=SYSDA,SPACE=(CYL,(00010,00010),,,ROUND)
//SR0AWK02 DD UNIT=SYSDA,SPACE=(CYL,(00010,00010),,,ROUND)
//SYSUDUMP DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SORTMSGS DD SYSOUT=*
//INFOM DD SYSOUT=*
//SYSINHLO DD *
IDAA_LOAD_IC -
( -
GROUP -
( -
SPACE -
( -
CREATOR 'DSNC810' -
NAME 'EMP01' -
TO_IC 'RSTEST.QA1A.DBHLOTS1.TSHLOSTA.DB2IC1' -
OBIDXLAT_CATALOG -
) -
) -
ACCELNAME QA1AACC1 -
PARALLEL '0,1' -
LOG_COPY_PREFERENCE R1R2A1A2 -
USER_INDICATOR HLO -
DB2_SORT YES -
CHECK_DATA WRITE -
)
/*
// Example 3: Loading data to multiple accelerators using Image Copy load
Note: The following examples use Image Copy load functionality and not the HALOAD utility.
In the following example, multiple accelerators specified
individually will be loaded:
IDAA_LOAD_IC -
( -
GROUP -
( -
SPACE -
( -
CREATOR 'DSNC810' -
NAME 'EMP01' -
TO_IC 'RSTEST.QA1A.T21811S2.TSHLOTSA.DB2IC1' -
OBIDXLAT_CATALOG -
) -
) -
ACCELNAME 'IDAAS01,IDAAS02,IDAAS03' -
USER_INDICATOR HLO -
ACCEL_ON_SUCCESS_ENABLE YES -
DB2_SORT YES -
CHECK_DATA WRITE -
ACCEL_REMOVE_AND_ADD_TABLES -
)
In the following example, multiple accelerators will be loaded by specifying an
accelerator group. The accelerator group expands to its individual members at run
time.
IDAA_LOAD_IC -
( -
GROUP -
( -
SPACE -
( -
CREATOR 'DSNC810' -
NAME 'EMP01' -
TO_IC 'RSTEST.QA1A.T21811S2.TSHLOTSA.DB2IC1' -
OBIDXLAT_CATALOG -
) -
) -
ACCELNAME 'ACCELGRP' -
USER_INDICATOR HLO -
ACCEL_ON_SUCCESS_ENABLE YES -
DB2_SORT YES -
CHECK_DATA WRITE -
ACCEL_REMOVE_AND_ADD_TABLES -
)