Extracting LISTCAT

0

Hello

could anyone please provide some information on generating the LISTCAT and CSD files, in the format required by Blu Insights

Girish
gefragt vor einem Monat2147 Aufrufe
1 Antwort
2

To extract catalog information (LISTCAT), you should execute a command like LISTCAT CATALOG(catalogName) ALL OUTFILE(outputDatasetName) through IDCAMS.

For more detailed information: https://www.ibm.com/docs/en/zos/3.1.0?topic=commands-listcat

//LISTCAT      JOB (ZZNS0000),                                                      
//     CLASS=0CLASS=S,REGION=0M                                                 
//     MSGCLASS=X,                                                              
//     MSGLEVEL=(1,1),                                                          
//     NOTIFY=&SYSUID                                                           
//*                                                                             
/*JOBPARM BYTES=999999,LINES=9999                                               
//*       CICS                                                                  
//*                                                                             
//*********************************************************************         
//* DELETE INPUT/OUTPUT FILE FOR LISTCAT UTILITY *                                  
//*********************************************************************         
//DELETE  EXEC PGM=IDCAMS,REGION=1M                                             
//SYSPRINT DD SYSOUT=*                                                          
//SYSIN      DD *                                                               
           DELETE LISTCAT.OUTPUT NONVSAM  <<-- output file, where info is stored                              
/*                                                                              
//*                                                                             
//*********************************************************************         
//* DEFINE INPUT/OUTPUT DATASET FOR LISTCAT UTILITY *                               
//*********************************************************************         
//DEFINE  EXEC PGM=IEFBR14                                                      
//DD1      DD DISP=(NEW,CATLG,DELETE),                                          
//            DSN=LISTCAT.OUTPUT,  <<-- output file, where info is stored                                     
//            VOL=SER=CIXH02,UNIT=3390,                                         
//            DCB=(DSORG=PS,BLKSIZE=80,RECFM=F,LRECL=80),                       
//            SPACE=(CYL,(5,5))                                                 
//*                                                                             
//*********************************************************************         
//* EXEC LISTCAT TO EXTRACT CATALOG RESOURCE INTO SEQUENTIAL DATASET *             
//*********************************************************************         
//LISTCAT  JOB   ... 
//STEP1    EXEC  PGM=IDCAMS 
//OUTDD    DD    DSN=LISTCAT.OUTPUT,UNIT=3480,  <<-- output file, where info is stored     
//         VOL=SER=TAPE10,LABEL=(1,NL),DISP=(NEW,KEEP), 
//         DCB=(RECFM=VBA,LRECL=125,BLKSIZE=629) 
//SYSPRINT DD    SYSOUT=A 
//SYSIN    DD    * 
     LISTCAT CATALOG(YOURCAT) ALL OUTFILE(OUTDD)  <<-- YOURCAT, your catalog where info is stored    
     

To extract CICS System Definition (CSD) you should execute the command LIST ALL OBJECTS through DFHCSDUP program.

For more detailed information: https://www.ibm.com/docs/en/cics-ts/6.1?topic=commands-dfhcsdup-list-command

//CSD      JOB (ZZNS0000),                                                      
//     CLASS=0CLASS=S,REGION=0M                                                 
//     MSGCLASS=X,                                                              
//     MSGLEVEL=(1,1),                                                          
//     NOTIFY=&SYSUID                                                           
//*                                                                             
/*JOBPARM BYTES=999999,LINES=9999                                               
//*       CICS                                                                  
//*                                                                             
//*********************************************************************         
//* DELETE INPUT/OUTPUT FILE FOR CSD UTILITY *                                  
//*********************************************************************         
//DELETE  EXEC PGM=IDCAMS,REGION=1M                                             
//SYSPRINT DD SYSOUT=*                                                          
//SYSIN      DD *                                                               
           DELETE CICS410.DFHCSD.SEQ NONVSAM  <<-- output file, where info is stored                              
/*                                                                              
//*                                                                             
//*********************************************************************         
//* DEFINE INPUT/OUTPUT DATASET FOR CSD UTILITY *                               
//*********************************************************************         
//DEFINE  EXEC PGM=IEFBR14                                                      
//DD1      DD DISP=(NEW,CATLG,DELETE),                                          
//            DSN=CICS410.DFHCSD.SEQ,  <<-- output file, where info is stored                                     
//            VOL=SER=CIXH02,UNIT=3390,                                         
//            DCB=(DSORG=PS,BLKSIZE=80,RECFM=F,LRECL=80),                       
//            SPACE=(CYL,(5,5))                                                 
//*                                                                             
//*********************************************************************         
//* EXEC LIST ALL TO EXTRACT CSD RESOURCE INTO SEQUENTIAL DATASET *             
//*********************************************************************         
//CSDUP   EXEC PGM=DFHCSDUP,REGION=4096K,                                       
//             PARM='CSD(READONLY),PAGESIZE(60),COMPAT'                         
//STEPLIB  DD DSN=CICS410.SDFHLOAD,DISP=SHR  <<-- your CICS loadlib that contains DFHCSDUP                          
//         DD DSN=CICS410.SDFHAUTH,DISP=SHR  <<-- your CICS loadlib that contains DFHCSDUP                               
//DFHCSD   DD DSN=CICS410.DFHCSD,DISP=SHR  <<-- your DFHCSD file                                 
//SYSOUT   DD SYSOUT=*
//SYSPRINT DD DSN=CICS410.DFHCSD.SEQ,DISP=SHR  <<-- output file, where info is stored                             
//SYSIN      DD *
           LIST ALL OBJECTS
/*
//
AWS
ArnO
beantwortet vor einem Monat
  • Thanks Arno

  • You welcome ;) Could you please accept the answer ?

Du bist nicht angemeldet. Anmelden um eine Antwort zu veröffentlichen.

Eine gute Antwort beantwortet die Frage klar, gibt konstruktives Feedback und fördert die berufliche Weiterentwicklung des Fragenstellers.

Richtlinien für die Beantwortung von Fragen