IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Need to download ETT details from TWSz using batch job
IBM Mainframe Forums -> IBM Tools
Post new topic   Reply to topic Quick References
View previous topic :: View next topic  
Author Message
harisukumaran

New User


Joined: 14 Jun 2005
Posts: 75
PostPosted: Sat Dec 28, 2019 2:30 am
 Reply with quote
I need to download information about ETT from TWSz
Does anyone have the JCL for this ?
I did search the IBM manuals
PGM=EQQBATCH,PARM='EQQADPRT' gives only Application Details without ETT info
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 2454
Location: Hampshire, UK
PostPosted: Sat Dec 28, 2019 4:08 pm
 Reply with quote
What sort of information? Why is the information obtained so far insufficient?
Back to top
View user's profile Send private message
harisukumaran

New User


Joined: 14 Jun 2005
Posts: 75
PostPosted: Tue Dec 31, 2019 6:43 pm
 Reply with quote
It only gives information from the application database. It does not pull information about ETT. Does anyone have the JCL for querying ETT information from TWSz / OPC ?
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8700
Location: Dubuque, Iowa, USA
PostPosted: Tue Dec 31, 2019 7:24 pm
 Reply with quote
What did IBM tell you when you asked them? If you haven't asked them, you need to do so.
Back to top
View user's profile Send private message
harisukumaran

New User


Joined: 14 Jun 2005
Posts: 75
PostPosted: Wed Jan 01, 2020 3:20 am
 Reply with quote
I could do it using:
Code:

//RUNPIF   EXEC EQQYXJCL,                                             
//         SUBSYS=OPCG                                               
//STEPLIB  DD DISP=SHR,DSN=SYS1.SEQQLMD0                             
//OUTDATA  DD DSN=USER.TEST.ETTTABLE,                             
//          DISP=(NEW,CATLG,DELETE),                                 
//          UNIT=SYSDA,                                               
//          SPACE=(TRK,(15,10),RLSE),                                 
//          DCB=(RECFM=FB,LRECL=120,BLKSIZE=0)                       
//SYSIN    DD *                                                       
OUTPUT ETT DATA(OUTDATA) LOADER(OUTBL) KEYS()                         
FIELDS(ETTNAME,                         /* RESOURCE NAME          */ 
        ETTAPPL)                        /* APPLICATION TO TRIGGER */ 
LIST ETT                                                             


Code:

//EQQYXJCL PROC @=,                                                     
//         ARGS='',                                                     
//         CMD=EQQYXTOP,                                               
//         FILESPEC=FILENONE,                                           
//         LANG=EN,                                                     
//         OPTS=OPTDEFLT,                                               
//         PFX='IOHX0$S.PB.AOCTL.SOE',                                 
//         REF=REFERNCE,                                               
//         REG=4M,                                                     
//         SUBSYS=TWSA,                                                 
//         VER=V920,                                                   
//         #=                                                           
//*                                                                     
//*--------------------------------------------------------------------*
//*                                                                    *
//*     Licensed Materials - Property of IBM                           *
//*     5698-A17                                                       *
//*     (C) Copyright IBM Corp. 2010 All Rights Reserved.              *
//*     US Government Users Restricted Rights - Use, duplication       *
//*     or disclosure restricted by GSA ADP Schedule Contract          *
//*     with IBM Corp.                                                 *
//*                                                                    *
//*--------------------------------------------------------------------*
//* MODULE  : EQQYXJCL                                                 *
//* PURPOSE : SCHEDULER OPERATIONAL ENVIRONMENT BATCH PROCEDURE        *
//*                                                                    *
//* HISTORY------------------------------------------------------------*
//*                                                                    *
//*--------------------------------------------------------------------*
//* SYMBOLIC PARAMETERS:                                               *
//* ARGS     - ADDITIONAL OPTIONS                                      *
//* CMD      - REXX ENTRY POINT TO USE                                 *
//* FILESPEC - FILE DEFINITION MEMBER NAME                             *
//* LANG     - LANGUAGE FOR MESSAGES                                   *
//* OPTS     - OPTIONS MEMBER TO USE                                   *
//* PFX      - PREFIX FOR INSTALLATION DATASETS                        *
//* REG      - REGION TO ALLOCATE                                      *
//* REF      - REFERENCE MEMBER TO LOAD                                *
//* SUBSYS   - TWS SUBSYS TO COMMUNICATE WITH                          *
//* VER      - SUBSYSTEM SOFTWARE VERSION                              *
//*--------------------------------------------------------------------*
//*                                                                     
//*--------------------------------------------------------------------*
//* EXECUTE SOE MAIN MODULE                                            *
//*--------------------------------------------------------------------*
//EQQYXTOP EXEC PGM=IKJEFT01,                                           
//         REGION=&REG,                                                 
//         PARM=&@'&CMD &SUBSYS-&VER &ARGS'&#                           
//STEPLIB  DD DISP=SHR,DSN=IOHX0$S.PB.AOCTL.SOE.SEAGALT                 
//SYSPROC  DD DISP=SHR,DSN=IOHX0$S.PB.AOCTL.SOE.USRREXX                 
//         DD DISP=SHR,DSN=IOHX0$S.PB.AOCTL.SOE.REXX                   
//         DD DISP=SHR,DSN=IOHX0$S.PB.AOCTL.SOE.SOEEXEC                 
//EQQMLIB  DD DISP=SHR,DSN=SYS1.SEQQMSG0                               
//EQQMLOG  DD SYSOUT=*                                                 
//EQQDUMP  DD SYSOUT=*                                                 
//EQQLANG  DD DISP=SHR,DSN=&PFX..PARM(LANG&LANG.)                       
//EQQREF   DD DISP=SHR,DSN=&PFX..PARM(&REF.)                           
//EQQOPTS  DD DISP=SHR,DSN=&PFX..USRPARM(&OPTS.)                       
//EQQSUB   DD DISP=SHR,DSN=&PFX..USRPARM(OPTS&SUBSYS)                   
//EQQFILE  DD DISP=SHR,DSN=&PFX..PARM(&FILESPEC.)                     
//SYSTSPRT DD SYSOUT=*                                                 
//SYSTSIN  DD DUMMY                                                   
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> IBM Tools

 

Similar Topics
Topic Forum Replies
No new posts MacKinney Batch to CICS upgrade causi... CICS 7
No new posts Run rexx in batch job CLIST & REXX 7
No new posts Excuting store procedure via JCL batch JCL & VSAM 1
No new posts SORT on detail record, then repeat he... DFSORT/ICETOOL 3
No new posts batch SFTP job using AOPBATCH unable ... All Other Mainframe Topics 7
Search our Forums:

Back to Top
IBMMainframes.com is not an official and/or affiliated with IBM® in anyway
Board Rules | FAQ | Downloads | Wiki | SiteMap | Contact Us