MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

JCL Utility

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Application Programming
View previous topic :: View next topic  
Author Message
saravanan80
Beginner


Joined: 25 Dec 2006
Posts: 14
Topics: 6

PostPosted: Mon Sep 24, 2007 11:28 am    Post subject: JCL Utility Reply with quote

I know the command LISTDS can display the member name alone in the PDS .
Is there any specific command (or JCL utility ) to display the dataset information ,ie, the PDS name date it created date modified,
If so please let me know the command name or the JCL.

Thanks in advance..
Back to top
View user's profile Send private message
videlord
Beginner


Joined: 09 Dec 2004
Posts: 147
Topics: 19

PostPosted: Mon Sep 24, 2007 1:18 pm    Post subject: Reply with quote

TSO command LISTCAT
Back to top
View user's profile Send private message
saravanan80
Beginner


Joined: 25 Dec 2006
Posts: 14
Topics: 6

PostPosted: Mon Sep 24, 2007 1:26 pm    Post subject: Reply with quote

Will this LISTCAT will work when we give as a command in JCL.. if so can u please provide me the JCL step.
Back to top
View user's profile Send private message
Nic Clouston
Advanced


Joined: 01 Feb 2007
Posts: 1075
Topics: 7
Location: At Home

PostPosted: Mon Sep 24, 2007 2:17 pm    Post subject: Reply with quote

just execute tso in batch - plenty of examples available in various groups here e.g. TSO,ISPF. Batch tso is IKJEFT01 (amongst others)
_________________
Utility and Program control cards are NOT, repeat NOT, JCL.
Back to top
View user's profile Send private message
saravanan80
Beginner


Joined: 25 Dec 2006
Posts: 14
Topics: 6

PostPosted: Mon Sep 24, 2007 9:27 pm    Post subject: Reply with quote

I feel the Listcat command will reveal the volume on which the dataset resides . but It won't give the date it created and date it got modified etc.
Back to top
View user's profile Send private message
semigeezer
Supermod


Joined: 03 Jan 2003
Posts: 1014
Topics: 13
Location: Atlantis

PostPosted: Mon Sep 24, 2007 11:42 pm    Post subject: Reply with quote

I think that you can use IEHLIST to get that info for non-migrated data sets. But that information comes from the VTOC so I'm not sure how the last referenced data is managed, particularly if the volume is mounted read-only (since the system could not update the VTOC in that case). It seems that this info should really come from the catalog, but I didn't see it in LISTCAT output either. Maybe looking at the data returned by the CSI interface would reveal it.

You can see a sample of IEHLIST output in ISPF by looking at the bottom of a listing produced with

TSO ISPMLIST data-set-name FORMAT

Note: Do not use ISPMLIST in your code!! It is an undocumented diagnostic Rexx that does nothing more than invoke IEHLIST and show the output in a Browse session. This also works only with non-VSAM data sets.

Another way to get the VTOC information for a data set is through the LISTDS command with the LABEL operand, but you need to interpret the label information yourself. The label information is described by the Format-1 DSCB but decoding the dates is not trivial. An example of doing that in Rexx is available in this edit macro.

Having said all that, you'd do better to run ISPF in batch using IKJEFT01 and running an exec that uses one of the ISPF services. The DSINFO service will give you the info you seek.
Back to top
View user's profile Send private message Visit poster's website
saravanan80
Beginner


Joined: 25 Dec 2006
Posts: 14
Topics: 6

PostPosted: Tue Sep 25, 2007 7:35 am    Post subject: Reply with quote

The command that u had provided wont give the result , is there anyother command to acheive this result.
Back to top
View user's profile Send private message
shekar123
Advanced


Joined: 22 Jul 2005
Posts: 528
Topics: 90
Location: Bangalore India

PostPosted: Tue Sep 25, 2007 8:57 am    Post subject: Reply with quote

Sarvanan,

How about this ?

Code:

//STEP010 EXEC PGM=IDCAMS                                               
//SYSPRINT DD SYSOUT=*                                                 
//SYSOUT   DD SYSOUT=*                                                 
//SYSIN    DD     *                                                     
  LISTCAT ENT(SHEKAR.SHEKAR.KSDS) ALL                                   
/*                                                                     


IDCAMS  SYSTEM SERVICES                                           TIME: 04:54:12
                                                                               
  LISTCAT ENT(SHEKAR.SHEKAR.KSDS) ALL                                           
CLUSTER ------- SHEKAR.SHEKAR.KSDS                                               
     IN-CAT --- CATALOG.USER.Z18CAT                                             
     HISTORY                                                                   
       DATASET-OWNER-----(NULL)     CREATION--------2007.268                   
       RELEASE----------------2     EXPIRATION------0000.000                   
     SMSDATA                                                                   
       STORAGECLASS ----TSOTRNG     MANAGEMENTCLASS---(NULL)                   
       DATACLASS --------(NULL)     LBACKUP ---0000.000.0000                   
       BWO STATUS------00000000     BWO TIMESTAMP---00000 00:00:00.0           
       BWO---------------(NULL)                                                 
     RLSDATA                                                                   
       LOG ----------------(NULL)   RECOVERY REQUIRED --(NO)     FRLOG ---------
       VSAM QUIESCED -------(NO)    RLS IN USE ---------(NO)                   
       LOGSTREAMID-----------------------------(NULL)                           
       RECOVERY TIMESTAMP LOCAL-----X'0000000000000000'                         
      RECOVERY TIMESTAMP GMT-------X'0000000000000000'                         
    PROTECTION-PSWD-----(NULL)     RACF----------------(NO)                   
    ASSOCIATIONS                                                               
      DATA-----SHEKAR.SHEKAR.KSDATA                                             
      INDEX----SHEKAR.SHEKAR.KSINDX                                             
  DATA ------- SHEKAR.SHEKAR.KSDATA                                             
    IN-CAT --- CATALOG.USER.Z18CAT                                             
    HISTORY                                                                   
      DATASET-OWNER-----(NULL)     CREATION--------2007.268                   
      RELEASE----------------2     EXPIRATION------0000.000                   
      ACCOUNT-INFO-----------------------------------(NULL)                   
    PROTECTION-PSWD-----(NULL)     RACF----------------(NO)                   
    ASSOCIATIONS                                                               
      CLUSTER--SHEKAR.SHEKAR.KSDS                                               
    ATTRIBUTES                                                                 
      KEYLEN-----------------3     AVGLRECL--------------50     BUFSPACE-------
      RKP--------------------0     MAXLRECL--------------50     EXCPEXIT-------
      SHROPTNS(1,3)   RECOVERY     UNIQUE           NOERASE     INDEXED       N
      UNORDERED          REUSE     NONSPANNED                                 
     STATISTICS                                                                 
       REC-TOTAL--------------7     SPLITS-CI--------------0     EXCPS----------
       REC-DELETED------------0     SPLITS-CA--------------0     EXTENTS--------
       REC-INSERTED-----------0     FREESPACE-%CI---------10     SYSTEM-TIMESTAM
       REC-UPDATED------------0     FREESPACE-%CA---------20          X'C1405C06
       REC-RETRIEVED----------7     FREESPC----------7368704                   
     ALLOCATION                                                                 
       SPACE-TYPE------CYLINDER     HI-A-RBA---------7372800                   
       SPACE-PRI-------------10     HI-U-RBA----------737280                   
       SPACE-SEC-------------10                                                 
     VOLUME                                                                     
       VOLSER------------ATTR03     PHYREC-SIZE---------4096     HI-A-RBA-------
IDCAMS  SYSTEM SERVICES                                           TIME: 04:54:12
       DEVTYPE------X'3010200F'     PHYRECS/TRK-----------12     HI-U-RBA-------
       VOLFLAG------------PRIME     TRACKS/CA-------------15                   
       EXTENTS:                                                                 
       LOW-CCHH-----X'19CB0000'     LOW-RBA----------------0     TRACKS---------
       HIGH-CCHH----X'19D4000E'     HIGH-RBA---------7372799                   
   INDEX ------ SHEKAR.SHEKAR.KSINDX                                             
    IN-CAT --- CATALOG.USER.Z18CAT                                             
    HISTORY                                                                   
      DATASET-OWNER-----(NULL)     CREATION--------2007.268                   
      RELEASE----------------2     EXPIRATION------0000.000                   
    PROTECTION-PSWD-----(NULL)     RACF----------------(NO)                   
    ASSOCIATIONS                                                               
      CLUSTER--SHEKAR.SHEKAR.KSDS                                               
    ATTRIBUTES                                                                 
      KEYLEN-----------------3     AVGLRECL---------------0     BUFSPACE-------
      RKP--------------------0     MAXLRECL------------4089     EXCPEXIT-------
      SHROPTNS(1,3)   RECOVERY     UNIQUE           NOERASE     NOWRITECHK     
      REUSE                                                                   
    STATISTICS                                                                 
      REC-TOTAL--------------1     SPLITS-CI--------------0     EXCPS----------
      REC-DELETED------------0     SPLITS-CA--------------0     EXTENTS--------
      REC-INSERTED-----------0     FREESPACE-%CI----------0     SYSTEM-TIMESTAM
      REC-UPDATED------------0     FREESPACE-%CA----------0          X'C1405C06
      REC-RETRIEVED----------0     FREESPC------------45056                   
    ALLOCATION                                                                 
       SPACE-TYPE---------TRACK     HI-A-RBA-----------49152                   
       SPACE-PRI--------------1     HI-U-RBA------------4096                   
       SPACE-SEC--------------1                                                 
     VOLUME                                                                     
       VOLSER------------ATTR03     PHYREC-SIZE---------4096     HI-A-RBA-------
       DEVTYPE------X'3010200F'     PHYRECS/TRK-----------12     HI-U-RBA-------
       VOLFLAG------------PRIME     TRACKS/CA--------------1                   
       EXTENTS:                                                                 
       LOW-CCHH-----X'025F0002'     LOW-RBA----------------0     TRACKS---------
       HIGH-CCHH----X'025F0002'     HIGH-RBA-----------49151                   
IDCAMS  SYSTEM SERVICES                                           TIME: 04:54:12
         THE NUMBER OF ENTRIES PROCESSED WAS:                                   
                   AIX -------------------0                                     
                   ALIAS -----------------0                                     
                   CLUSTER ---------------1                                     
                   DATA ------------------1                                     
                   GDG -------------------0                                     
                   INDEX -----------------1                                     
                   NONVSAM ---------------0                                     
                   PAGESPACE -------------0                                     
                   PATH ------------------0                                     
                   SPACE -----------------0                                     
                   USERCATALOG -----------0                                     
                   TAPELIBRARY -----------0                                     
                   TAPEVOLUME ------------0                                     
                   TOTAL -----------------3                                     
         THE NUMBER OF PROTECTED ENTRIES SUPPRESSED WAS 0                       
IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0                       
                                                                               
IDC0002I IDCAMS PROCESSING COMPLETE. MAXIMUM CONDITION CODE WAS 0               

_________________
Shekar
Grow Technically
Back to top
View user's profile Send private message
semigeezer
Supermod


Joined: 03 Jan 2003
Posts: 1014
Topics: 13
Location: Atlantis

PostPosted: Tue Sep 25, 2007 11:40 am    Post subject: Reply with quote

What result are you looking for exactly? Just saying something doesn't work is completely unhelpful, especially when you were given 3 very detailed options for getting the information you asked for, as well as a technical explanation of where the data is stored by the system and how and when it may be updated. If you have tried something, let us know what, what errors did you get, etc, etc, etc. We are not mind readers and personally, I expect a little more of a response than 'it didn't work' for the time I took to research, document and add references and links to the response. bonk

Note that MVS does not keep a modified date for data sets, only create, expiration and last referenced date. LISTCAT (IDCAMS) shows the create and expiration date. IEHLIST shows the same. DSINFO can get the last referenced date too. For updates you'd need to use SMF records which is not worth the trouble. Please be specific in your responses.
Back to top
View user's profile Send private message Visit poster's website
saravanan80
Beginner


Joined: 25 Dec 2006
Posts: 14
Topics: 6

PostPosted: Tue Sep 25, 2007 9:33 pm    Post subject: Reply with quote

Hi my actual requirement is when we get in to a PDS with 3.4 option it will display the list of members in it , the creation date , last modified date and last accessed ID , when we give savelist all those details will be saved in a flat file, instead of getting the result manualy by giving savelist command is there any utility or command that can be used in a JCL to acheive the result ..
Back to top
View user's profile Send private message
blitz2
Beginner


Joined: 23 Jan 2007
Posts: 84
Topics: 14

PostPosted: Thu Sep 27, 2007 1:40 am    Post subject: Reply with quote

Quote:

Having said all that, you'd do better to run ISPF in batch using IKJEFT01 and running an exec that uses one of the ISPF services. The DSINFO service will give you the info you seek.


I think semigeezer hit bull's-eye. Did you try it out?
________
UHWH
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Application Programming All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group