View previous topic :: View next topic
|
Author |
Message |
sushanth bobby
Senior Member
Joined: 29 Jul 2008 Posts: 1020 Location: India
|
|
|
|
Hi,
I want to prepare a list of datasets with the following naming conventions
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 |
|
|
sushanth bobby
Senior Member
Joined: 29 Jul 2008 Posts: 1020 Location: India
|
|
|
|
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 |
|
|
gcicchet
Senior Member
Joined: 28 Jul 2006 Posts: 1702 Location: Australia
|
|
|
|
Hi,
search on LISTC or LISTCAT, plenty of examples and discussions on it.
Gerry |
|
Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
One I've posted earlier, just need to put SYSPRINT to a dataset
Click HERE to see the thread. |
|
Back to top |
|
|
acevedo
Active User
Joined: 11 May 2005 Posts: 344 Location: Spain
|
|
|
|
or...once in 3.4 type SAVE list, the list will be stored with youruserid.list.datasets |
|
Back to top |
|
|
sushanth bobby
Senior Member
Joined: 29 Jul 2008 Posts: 1020 Location: India
|
|
|
|
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 |
|
|
sushanth bobby
Senior Member
Joined: 29 Jul 2008 Posts: 1020 Location: India
|
|
|
|
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 |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6250 Location: Mumbai, India
|
|
|
|
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 |
|
|
sushanth bobby
Senior Member
Joined: 29 Jul 2008 Posts: 1020 Location: India
|
|
|
|
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 |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
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 |
|
|
sushanth bobby
Senior Member
Joined: 29 Jul 2008 Posts: 1020 Location: India
|
|
|
|
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 |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
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 |
|
|
sushanth bobby
Senior Member
Joined: 29 Jul 2008 Posts: 1020 Location: India
|
|
|
|
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,
Sushanth |
|
Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
The wildcards can sometimes be a bit funny.
Suggest you start with
DBADEV.**
or try
DBADEV.**.UL.D** |
|
Back to top |
|
|
sushanth bobby
Senior Member
Joined: 29 Jul 2008 Posts: 1020 Location: India
|
|
|
|
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 |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
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 |
|
|
sushanth bobby
Senior Member
Joined: 29 Jul 2008 Posts: 1020 Location: India
|
|
|
|
EXPAT,
It works GREAT !
T H A N K Y O U
Sushanth |
|
Back to top |
|
|
|