I have batch of around 50 applications including 200 jobs.
Jobs starts with ACCT* generic names. All are running on same workstation AWST.
My requirement is to clone this batch with new naming convention. New batch will be having jobs starting with PROD* & will be running on PWST workstation.
Is there any feature of OPC that helps me to unload this OPC data, modify it (rename job, workstation, special resource, status of application-A or P) & reload this data to OPC again?
Joined: 27 Oct 2009 Posts: 2481 Location: Netherlands, Amstelveen
The EQQYCBAG member of the EQQSAMP library provides a sample in which the Batch Command Interface Tool (BCIT) is used to unload a group application, and all applications belonging to it, into a sequential file in batchloader control statement format. The group applications, as well as other applications, can be modified via the batchloader control statements. The sequential file can therafter be used as input to the batchloader run. This sample consists of two jobs: 1. The ’unload’ job, that uses the batch command interface tool 2. The ’load’ job, that uses the batchloader.Before running the job, you need to customize it with correct values for the job card name, data set names, subsystem name, and so on.
Thanks for information. We are using below JCL but it is not listing any output. Can you please correct it if it is wrong or provide sample JCL for this (Unload & Load)
Regards, RK
//WOPS3A JOB 'WOPS3',CLASS=A,MSGLEVEL=(1,1),NOTIFY=&SYSUID
//*
//* Licensed Materials - Property of IBM
//* 5698-A17
//* Copyright IBM Corp. 1990, 2009 All Rights Reserved.
//* US Government Users Restricted Rights - Use, duplication
//* or disclosure restricted by GSA ADP Schedule Contract
//* with IBM Corp.
//*
//*==================================================================*/
//*$MOD(EQQYCBAT) COMP(SAMPLES) PROD(OPC): BCIT execution */
//* */
//*Flag Reason Rlse Date Origin Flag Description */
//*---- -------- ------ ------ ------ -------------------------------*/
//*$01= DCR0145 240.6 010206 VP: Linkedit no more needed 96@01D*/
//*$41= DCR0148 850.7 081212 COND: add CPCOND @41A*/
//* */
//*==================================================================*/
//* */
//* THIS JOB EXECUTES THE EQQYCAIN PROGRAM,
//* THE BATCH COMMAND INTERFACE TOOL (BCIT).
//*
//* THE FOLLOWING STEP IS EXECUTED IN THIS JOB:
//*
//* PIFCMD: INVOKES THE EQQYCAIN PROGRAM TO ACCESS THE TWSz DATA
//*
//* IN ORDER TO USE THIS JOB SUCCESSFULLY YOU SHOULD MODIFY IT
//* AS FOLLOWS:
//* 1. REPLACE THE JOBCARD WITH A VALID JOBCARD FOR YOUR INSTALLATION.
//* 2. LOCATE DATA SET NAMES BEGINNING WITH PROD.INST AND REPLACE WITH
//* DATA SET NAMES VALID FOR YOUR INSTALLATION.
//* 3. LOCATE THE STRING 'OPCA' AND REPLACE WITH THE NAME OF YOUR
//* TWSz SYSTEM.
//* 4. CUSTOMIZE THE SYSIN PARAMETERS.
//*
//* NOTE THAT THIS JOB ASSUMES THAT TWSz HAS BEEN INSTALLED
//* AND THAT THE SMP ACCEPT FUNCTION HAS BEEN PERFORMED.
//* IT ALSO ASSUMES THAT THE TWSz LOAD MODULES REQUIRED BY THE
//* TWSz PROGRAM INTERFACE ARE AVAILABLE FROM STEPLIB.
//*
//*
//PIFCMD EXEC PGM=EQQYCAIN,COND=(4,LT),REGION=4096K,
// PARM='OPCX,,CPSTDA,,MISSCP'
//*STEPLIB DD DISP=SHR,DSN=PROD.INST.SEQQLMD0
//EQQMLIB DD DISP=SHR,DSN=SYS1.SEQQMSG0
//*EQQYPARM DD DISP=SHR,DSN=WOPS3.TEST.JCL(YPARM)
//BATCHL DD SYSOUT=*
//OI DD SYSOUT=*
//AD DD SYSOUT=*
//CPOC DD SYSOUT=*
//CPOP DD SYSOUT=*
//CPCOND DD SYSOUT=*
//DATAFI DD SYSOUT=*
//EXPORTAD DD SYSOUT=*
//EXPORTOI DD SYSOUT=*
//ERREUR DD SYSOUT=*
//EQQMLOG DD SYSOUT=*
//EQQDUMP DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSIN DD *
ACTION=OPTIONS,BL=N,BLPRT=Y,LTP=N;
ACTION=LIST,RESOURCE=ADKEY,ADID=DUMPBATCH1N.
/*
