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

D SMS,SG(group),LISTVOL


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Tue Sep 16, 2008 11:21 pm
Reply with quote

This command:

D SMS,SG(group),LISTVOL

What does this do? More importantly, is there a better way to retrieve this same information that wouldn't require an operator command to do? Something that could be done in a normal batch job or by any user without harming anything?
Back to top
View user's profile Send private message
Bill Dennis

Active Member


Joined: 17 Aug 2007
Posts: 562
Location: Iowa, USA

PostPosted: Wed Sep 17, 2008 2:47 am
Reply with quote

You could probably get the display online via ISMF panels but I don't know about batch!
Back to top
View user's profile Send private message
expat

Global Moderator


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

PostPosted: Wed Sep 17, 2008 11:57 am
Reply with quote

You could use DCOLLECT to get all of the required information, but would need to interpret the data by some program.

What is it that you want, I may already have that one ............
Back to top
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Thu Sep 18, 2008 5:59 pm
Reply with quote

OK.

The application initiates a BMC AutoOPERATOR REXX exec that issues that command and then waits for the results. It traps all of the resulting IGD002I messages:

Code:

STORGRP  TYPE    SYSTEM= 1 2 3 4                                     
TESTII   POOL            + + + +                                     
VOLUME   UNIT    SYSTEM= 1 2 3 4                         STORGRP NAME
MTS2AA   A189            + + + +                           TESTII   
MTS2AB   A18A            + + + +                           TESTII       
...


and counts the number of devices and stores the UNIT names into a stem variable. The exec then builds and submits a job that essentially runs the TSO command FCQUERY DEVN(X'device') for each device stored in the stem variables. A run through SORT of the resulting output gives us the total number of packs for that Storage Group that don't have a backup running.
Back to top
View user's profile Send private message
expat

Global Moderator


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

PostPosted: Fri Sep 19, 2008 2:51 pm
Reply with quote

Code:

  DCOLLECT OFILE(COLLDATA) SMSDATA(ACTIVE) NODATAINFO 

Will collect all of the info you require and can be fed into a REXX to do what ever. Easily scheduled as a batch job.

You will need to take a look at the DCOLLECT records mapping. I have used DCOLLECT many times for useful info, unfortunately not for what you want to save ytou having to write it.

Oh well.
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10872
Location: italy

PostPosted: Fri Sep 19, 2008 4:14 pm
Reply with quote

another approach .....

http://gsf-soft.com/Freeware/SHOWDASD.shtml

it works nicely
Back to top
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Tue May 11, 2010 2:56 am
Reply with quote

This topic is creeping up again. Do you think it's reasonable that I could expect the batch support team for this application to run DCOLLECT and be able to interpret the results, providing their applicatiion was granted the proper RACF authority? Any filters that the output can be pumped through to end up looking like the IGD002I message output? I'll check if there's any known REXX, DFSORT or SAS logic out there ...

update - I think DFSORT can give me what I need ...
Back to top
View user's profile Send private message
expat

Global Moderator


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

PostPosted: Tue May 11, 2010 12:42 pm
Reply with quote

Kevin, exactly what is it that you want as output, as I may have a couple of DCOLLECT analysis REXX's that with a bit of merging would give you the results.
Back to top
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Thu May 13, 2010 10:20 pm
Reply with quote

Thanks I think I got everything I need. For some reason I had a problem running DCOLLECT from a REXX exec, so I ran it from batch and then used a combination of SORT/REXX to capture the unit adress numbers and plug those into a series of FCQUERY commands, review the output, and validate the availability of those drives.

As of this morning, I find I can run DCOLLECT from a REXX exec (maybe last night's upgrade to z/OS V1R11 helped?), so I've scaled the whole "proof-of-concept" into a single exec that can handle the entire process.
Back to top
View user's profile Send private message
Pete Wilson

Active Member


Joined: 31 Dec 2009
Posts: 580
Location: London

PostPosted: Wed Jun 09, 2010 10:19 pm
Reply with quote

The command simply lists the named Storgrp and it's status and the volumes defined in the Storage group, including volume definitions where no physical volume exists. It shows the UCB of physical volumes and SMS status (ENABLE,DISNEW, QUIESCE etc) for each volume as well.

Similar report can be done via Naviquest batch job or other OEM's

You can also do direct calls to SMS via API's documented in the DFSMS Storage Admin Ref, but I've not tried that myself.
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 -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts Compare latest 2 rows of a table usin... DB2 1
No new posts Problem with IFTHEN=(WHEN=GROUP,BEGIN... DFSORT/ICETOOL 5
No new posts Splitting group records based on deta... DFSORT/ICETOOL 8
No new posts SORT HELP - SORT A COLUMN and GROUP B... DFSORT/ICETOOL 9
No new posts INCLUDE COND with WHEN=GROUP SYNCSORT 12
Search our Forums:

Back to Top