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

How to get list of datasets in member file


IBM Mainframe Forums -> TSO/ISPF
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
sushanth bobby

Senior Member


Joined: 29 Jul 2008
Posts: 1020
Location: India

PostPosted: Fri Oct 24, 2008 10:38 am
Reply with quote

Hi,
I want to prepare a list of datasets with the following naming conventions
Code:
DBADEV.**.UL.D*


And i found out there are nearly 9500 datasets available.

Can i know to get this list in a sequential file using JCL.

Sushanth
Back to top
View user's profile Send private message
sushanth bobby

Senior Member


Joined: 29 Jul 2008
Posts: 1020
Location: India

PostPosted: Fri Oct 24, 2008 11:09 am
Reply with quote

To more clearly specify my need,

I go to 3.4 option(i will be in dataset list utility),
I enter the following naming conventions to get the list DBADEV.**.UL.D*

The result is i get nearly 9500 datasets matching.

How to get this list in a file?
Back to top
View user's profile Send private message
gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1702
Location: Australia

PostPosted: Fri Oct 24, 2008 11:33 am
Reply with quote

Hi,

search on LISTC or LISTCAT, plenty of examples and discussions on it.



Gerry
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Fri Oct 24, 2008 11:44 am
Reply with quote

One I've posted earlier, just need to put SYSPRINT to a dataset

Click HERE to see the thread.
Back to top
View user's profile Send private message
acevedo

Active User


Joined: 11 May 2005
Posts: 344
Location: Spain

PostPosted: Fri Oct 24, 2008 11:49 am
Reply with quote

or...once in 3.4 type SAVE list, the list will be stored with youruserid.list.datasets
Back to top
View user's profile Send private message
sushanth bobby

Senior Member


Joined: 29 Jul 2008
Posts: 1020
Location: India

PostPosted: Fri Oct 24, 2008 11:51 am
Reply with quote

I will try it out gcicchet & expat.

I have been asking everybody around. To give me a lead.
Thank You Thank You for giving lead.
Back to top
View user's profile Send private message
sushanth bobby

Senior Member


Joined: 29 Jul 2008
Posts: 1020
Location: India

PostPosted: Fri Oct 24, 2008 1:25 pm
Reply with quote

Thank You expat & acevedo.

ACEvedo in my shop the file naming conventions for the log differs
its like "HXSULL.ISPFB1.SPFLOG4.LIST"

THANK YOU again!

Sushanth Bobby
Back to top
View user's profile Send private message
Anuj Dhawan

Superior Member


Joined: 22 Apr 2006
Posts: 6250
Location: Mumbai, India

PostPosted: Fri Oct 24, 2008 1:34 pm
Reply with quote

The simplest method, I ever used is what is posted by acevedo.

And my favourite one...
Code:
//STEP10  EXEC PGM=IKJEFT1A                       
//SYSPROC   DD DSN=SYS1.SAMPLIB,DISP=SHR         
//SYSTSPRT  DD DSN=...list,             
//             DISP=(NEW,CATLG,DELETE),           
//             UNIT=DISK,SPACE=(CYL,(50,50),RLSE),
//             DCB=(RECFM=FB,LRECL=133,BLKSIZE=0)
//SYSTSIN   DD *                                 
%IGGCSIRX                                         
DBADEV.**.UL.D*                         
/*                                               
//                                               


-Ad
Back to top
View user's profile Send private message
sushanth bobby

Senior Member


Joined: 29 Jul 2008
Posts: 1020
Location: India

PostPosted: Wed Oct 29, 2008 12:48 pm
Reply with quote

Hi,
Quote:
One I've posted earlier, just need to put SYSPRINT to a dataset

Click HERE to see the thread.

I am trying use the JCL & REXX in the above link iam getting MAX-RC as 0012. In spool, i am getting as
Code:
Exec member name must not be specified when exec load DD refers to a sequential data set.


What should i do. This is the code.

Code:
//HXSULLXX JOB (T,TEST),'HXSULL',MSGCLASS=X,CLASS=L,NOTIFY=&SYSUID     
//*********************************************************************
//*                                                                   *
//*       SCAN THE SYSTEM FOR A PARTICULAR FILE NAME CONVENTION       *
//*                                                                   *
//*********************************************************************
//STEP0020 EXEC PGM=IKJEFT01,DYNAMNBR=256,                             
//           PARM='CSIUTIL SCAN DASD TAPE MIGR'                       
//*   PARM VALUES - SCAN    - LIST ONLY                               
//*               - RUN     - PROCESS REQUESTS - DELETE OR HSM         
//*               - DASD    - LIST/DELETE DASD DATASETS               
//*               - MIGR    - LIST/DELETE MIGRATED DATASETS           
//*               - TAPE    - LIST/DELETE TAPE DATASETS               
//*               - RCALL   - LIST/RECALL SELECTED DATASETS           
//*               - ARCH    - LIST/MIGRATE SELECTED DATASETS TO ML1   
//*               - ARCH2   - LIST/MIGRATE SELECTED DATASETS TO ML2   
//SYSEXEC  DD DSN=HXSULL.QOUT,DISP=SHR                                 
//SYSOUT   DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//SYSTSIN  DD DUMMY   
//DATASETS DD *       
DBADEV.**.UL.D*       
/*                   
//EXCLUDE  DD *       
/*                   


HXSULL.QOUT is the REXX code. What should i do ?

Just FYI, i don't know REXX. Should any of these things need to be done before executing REXX, like
Compiling REXX code,
Setting up path for REXX(obj,load file)

I am very sorry. "I just don't know rexx".

I would also be very helpful, if you could also give me some info regarding REXX. Like starting from "HELLO WORLD". LIke to know, how to compile ?, how to code ?, how to run ?, how to see the output ?.

My Sincere Thanks,
Sushanth Bobby
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Wed Oct 29, 2008 1:07 pm
Reply with quote

The REXX code should be a member in a PDS referenced by the SYSEXEC DD.

I believe that you have used a PS file to store the REXX code.

BTW - the exclude does work on very simple generics,
e.g. ABC.DEF.GH*
Will exclude anything that begins ABC.DEF.GH
Back to top
View user's profile Send private message
sushanth bobby

Senior Member


Joined: 29 Jul 2008
Posts: 1020
Location: India

PostPosted: Wed Oct 29, 2008 1:38 pm
Reply with quote

expat,

Your belief was correct.
JCL name : SCANSYST
REXX code: SCANREX
Both the programs are member of PDS "HXSULL.JCL"

I replaced the previous SYSEXEC by the following code.
Code:
//SYSEXEC  DD DSN=HXSULL.JCL,DISP=SHR


I executed it, this is what i got.
Code:
COMMAND CSIUTIL NOT FOUND
READY                   
END                     


What should i do? Where am i making the mistake ?

Sushanth
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Wed Oct 29, 2008 2:36 pm
Reply with quote

Code:
//           PARM='CSIUTIL SCAN DASD TAPE MIGR'


CSIUTIL is the name of the member in SYSEXEC to execute.

If you have not called the member CSIUTIL, then change CSIUTIL in the PARM statement to the member name that you have used.
Back to top
View user's profile Send private message
sushanth bobby

Senior Member


Joined: 29 Jul 2008
Posts: 1020
Location: India

PostPosted: Wed Oct 29, 2008 3:39 pm
Reply with quote

Expat,

No errors. Return Code is 0.
Code:
//HXSULLXX JOB (T,TEST),'HXSULL',MSGCLASS=X,CLASS=L,NOTIFY=&SYSUID     
//*********************************************************************
//*                                                                   *
//*       SCAN THE SYSTEM FOR A PARTICULAR FILE NAME CONVENTION       *
//*                                                                   *
//*********************************************************************
//STEP0020 EXEC PGM=IKJEFT01,DYNAMNBR=256,                             
//*          PARM='CSIUTIL SCAN DASD TAPE MIGR'                       
//           PARM='SCANREX SCAN DASD TAPE MIGR'                       
//*   PARM VALUES - SCAN    - LIST ONLY                               
//*               - RUN     - PROCESS REQUESTS - DELETE OR HSM         
//*               - DASD    - LIST/DELETE DASD DATASETS               
//*               - MIGR    - LIST/DELETE MIGRATED DATASETS           
//*               - TAPE    - LIST/DELETE TAPE DATASETS               
//*               - RCALL   - LIST/RECALL SELECTED DATASETS           
//*               - ARCH    - LIST/MIGRATE SELECTED DATASETS TO ML1   
//*               - ARCH2   - LIST/MIGRATE SELECTED DATASETS TO ML2   
//SYSEXEC  DD DSN=HXSULL.JCL,DISP=SHR                                 
//SYSOUT   DD SYSOUT=*       
//SYSTSPRT DD SYSOUT=*       
//SYSPRINT DD SYSOUT=*       
//SYSTSIN  DD DUMMY           
//DATASETS DD *               
DBADEV.**.UL.D*               
//EXCLUDE  DD *               
HLQ.DATASET.ONE               
HLQ.DATASET.NINE             


I have added the SYSPRINT. I am not getting the SYSPRINT in the spool.
Right now, there is no output.

In SYSTSPRT in spool,
Code:
READY
END



Sushanth
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Wed Oct 29, 2008 3:44 pm
Reply with quote

The wildcards can sometimes be a bit funny.

Suggest you start with

DBADEV.**
or try
DBADEV.**.UL.D**
Back to top
View user's profile Send private message
sushanth bobby

Senior Member


Joined: 29 Jul 2008
Posts: 1020
Location: India

PostPosted: Wed Oct 29, 2008 4:01 pm
Reply with quote

Expat,

I tried the combinations. I am getting the same output. Only SYSTSPRT.
My doubts is job finishes soo quickly. In 3.4(list dataset utility), if i enter this naming convention, it takes atleast a minute or two, for the list to appear. This job finishes in 3-5 seconds.

Sushanth
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Wed Oct 29, 2008 4:10 pm
Reply with quote

Big Grin ...............................

Yes, I have just seen the code that was originally posted. Unfortunately from site to site the ! and the | are sometimes changed depending on the language configuration.

The site I was working at when it was posted used ! instead of |

so ................. edit the REXX code and type
C X'5A' X'4F' ALL

which will change the ! to a | and all should be well.
Back to top
View user's profile Send private message
sushanth bobby

Senior Member


Joined: 29 Jul 2008
Posts: 1020
Location: India

PostPosted: Wed Oct 29, 2008 4:30 pm
Reply with quote

EXPAT,

It works GREAT !
T H A N K Y O U


Sushanth
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 -> TSO/ISPF

 


Similar Topics
Topic Forum Replies
No new posts Extract the file name from another fi... DFSORT/ICETOOL 6
No new posts How to split large record length file... DFSORT/ICETOOL 10
No new posts Extracting Variable decimal numbers f... DFSORT/ICETOOL 17
No new posts SFTP Issue - destination file record ... All Other Mainframe Topics 2
No new posts Access to non cataloged VSAM file JCL & VSAM 18
Search our Forums:

Back to Top