IBM Mainframe Forum

Mainframe Technical Support Forums

Skip to content


%free of all the storage group by batch



Help for IBM's record-oriented filesystem VSAM, ESDS, KSDS, RRDS, LDS and Storage management Subsystems
Post a reply

Re: %free of all the storage group by batch

Postby samb01 » Tue Feb 20, 2018 6:17 pm

Hello, it's better and better . I got now a library from the file : FILE410.XMI but when i read a member, there is :

Select all


BROWSE    XW0.MXI.FILE41D.JCLLIB(MXIREXX)           Line 00000000 Col 001 080
Command ===>                                                  Scroll ===> CSR  
******************************** Top of Data **********************************
Ø.....0MXIREXX .......§RDSFRMUC..ÅY...8MXI     ...-....MXIINI  .......8RDSGETDD
Ø.....0MXIPRINT.......AMXISTEM ...Ç...0MXIMEN00...¢....MXIMSG  ..®.....MXICMDSA
Ø.....0MXICMDSL..È....`MXICMDSM..ié...éMXICMDSN..yØ...YMXICMDSO..½Ç....MXICMDSP
Ø.....0MXIOPTN ...h...-MXIAGRP ...Y...èMXITTL  ..¼Ì....RDSFRMJR..-y...MRDSDSCB1
Ø.....0MXICAFOP.......YMXICAT  ..<.....RDSFRMPC..Å&...qRDSSORT ..×y...YMXICA1  
Ø...<.0£ASVT   ..Äq...Ü£MXVT   ..½8...*£MX88   ..òì...ü£CVT    ..ÉH...ð£OUCB  
Ø...$.0£RCVT   ..2Ç...æ£GDA    ..[ì...æ£SCVT   ..³....*£CCT    ..ÅÌ...УSMCA  
Ø...ù.0£LDA    ..sì...<£TSVT   ...H....£UCB    ........MXICDE  ..Ñh...¼MXICDEX
Ø...µ.0MXICMDAC..€0...VMXIOPPMT..õ....ÊMXIERMSG..=Q....MXIMKPMT...¢...4MXIPKPMT
Ø...h.0MXICS   ..·H...DMXICSR  ..×[...:RDSDATE ...Q....MXIDA   ..H....öRDSSMFSS
Ø...p.0MXIDB   ...Q....MXIINIM1........MXIDBBP .......EMXITRACE..©ç...mMXIDBDA
Ø...w.0SRBDDNSX..Q8... MXIDEV  ..6ç....RDSDEVA ..@.....RDSUCBLK..èé...àMXIFPAS
Ø...].0MXIENC  ..)0....MXIENQ  ..?....þMXIEXC  ..±0...ÁMXIGQE  ..è½...^MXIGRS  
Ø...D.0MXIINIT ...\...DMXIIPL  ...¢...ðMXILINK ..!ç...ÑMXILLA  ..$&...^MXILLS  


 
samb01
 
Posts: 427
Joined: Mon Nov 16, 2009 7:24 pm
Has thanked: 1 time
Been thanked: 0 time
Top

Re: %free of all the storage group by batch

Postby willy jensen » Tue Feb 20, 2018 8:50 pm

Yes, that is to be expected as MXIREXX is a program. If you look at the dataset specs, you will see that is has record format U, record length 0 and block size 6144, which is fairly typical for a load library. Antother hint is that the description on the download page says 'File # 410 Rob Scott's MXI monitor package - load modules '.
Now you must get the file409 as well and read members $INSTALL and $GUIDE. FILE409 is a source library by the way.
As an appetizer and as a curtesy I have provided samples for listing a storage group with MXI batch and REXX respectively:
Select all
//MXIBATCH  EXEC PGM=MXI,PARM='BATCH,NOTITLES'    
//STEPLIB   DD  DISP=SHR,DSN=WJENSEN.CBT.FILE410  
//SYSPRINT  DD  SYSOUT=*                          
//SYSIN     DD  *                                
  SGRP SG1                                        

Select all
//GO       EXEC RXINSTRM                      
//STEPLIB  DD DISP=SHR,DSN=WJENSEN.CBT.FILE410
//REXX     DD *                                
 /* REXX */                                    
 cc = MXIREXX('mxi.','sgrp SG1')  
 do n=1 to mxi.0                              
   say '->' mxi.n                              
 end                                          

Note that RXINSTREM is not a standard proc, it is my own method for running REXX pgms in batch.
willy jensen
 
Posts: 455
Joined: Thu Mar 10, 2016 5:03 pm
Has thanked: 0 time
Been thanked: 69 times
Top

Re: %free of all the storage group by batch

Postby willy jensen » Tue Feb 20, 2018 8:54 pm

forgot to mention, the SGRP without a name will show a very nice overview of all the storage groups.
willy jensen
 
Posts: 455
Joined: Thu Mar 10, 2016 5:03 pm
Has thanked: 0 time
Been thanked: 69 times
Top

Re: %free of all the storage group by batch

Postby samb01 » Tue Feb 20, 2018 10:20 pm

Hello,i've just read the member $INSTALL but i'm sorry it's too complicated for to install it.
I thought i would get JCL example et not Rexx or Library Load Module....
But i kwnow rexx, so i can get a file frome the PGM=MXI and after making rexx :

Select all

//MXI01 EXEC PGM=MXI,PARM='BATCH'                                      
//SYSPRINT DD DSN=XW40.MXI.IN,                                        
//            SPACE=(TRK,(1,1),RLSE),                                  
//            DISP=(,CATLG),LRECL=133,RECFM=FB                          
//SYSIN DD *                                                            
  SGRP *                                                                
/*                                                                      
//******************************************************************    
//*                                  
//******************************************************************    
//REXX01   EXEC PGM=IRXJCL,PARM=('XDSAS'),COND=(0,NE,MXI01)            
//SYSEXEC  DD DISP=SHR,DSN=XW40.REXX                      
//SYSTSPRT DD SYSOUT=*                                                  
//SYSTSIN  DD SYSOUT=*                                                  
//XW40IN   DD DSN=XW40.MXI.IN,DISP=SHR            
//XW40OUT  DD DSN=XW40.MXI.OUT,DISP=(,CATLG),      
//            SPACE=(TRK,(1,1),RLSE),              
//            LRECL=133,RECFM=FB                    

 


I just want to know what could i do by bathc with PGM=MXI :

//MXI01 EXEC PGM=MXI,PARM='BATCH'

For example, what this batch do ?

Select all

//MXIBATCH  EXEC PGM=MXI,PARM='BATCH'        
//SYSPRINT  DD   SYSOUT=*                    
//SYSIN     DD   *                          
  SET DSCB ON                                
  APF                                        
  SVC                                        
  SSI                                        
  DA * ONLY(STC)                            
/*                                          

 


I am looking for a help online, but i can't find.

Other example, is it possible to be alerted if a storage groupe is almost full ? By wich way could i be alerted ?

Thank's for your help.
samb01
 
Posts: 427
Joined: Mon Nov 16, 2009 7:24 pm
Has thanked: 1 time
Been thanked: 0 time
Top

Re: %free of all the storage group by batch

Postby enrico-sorichetti » Tue Feb 20, 2018 10:35 pm

what about reading Yourself the docs :?: :evil:
cheers
enrico
When I tell somebody to RTFM or STFW I usually have the page open in another tab/window of my browser,
so that I am sure that the information requested can be reached with a very small effort
enrico-sorichetti
Global moderator
 
Posts: 2994
Joined: Fri Apr 18, 2008 11:25 pm
Has thanked: 0 time
Been thanked: 164 times
Top

Re: %free of all the storage group by batch

Postby willy jensen » Wed Feb 21, 2018 12:03 am

Read the MXIMEN00 member for a list of commands and a short description. To get the detailed information you need to install the product (see member $INSTJCL) and use the HELP command. No manuals as far as I know.
is it possible to be alerted if a storage groupe is almost full ?

Sure, run the job at regular intervals, parse the output and send an alert when a threshold is reached.
By wich way could i be alerted ?

That is totally up to you and your organisation.
willy jensen
 
Posts: 455
Joined: Thu Mar 10, 2016 5:03 pm
Has thanked: 0 time
Been thanked: 69 times
Top

Re: %free of all the storage group by batch

Postby samb01 » Wed Feb 21, 2018 1:03 pm

enrico-sorichetti wrote:what about reading Yourself the docs :?: :evil:

i'd prefer you let willy jensen answer me... Thank you
samb01
 
Posts: 427
Joined: Mon Nov 16, 2009 7:24 pm
Has thanked: 1 time
Been thanked: 0 time
Top

Re: %free of all the storage group by batch

Postby expat » Wed Feb 21, 2018 1:11 pm

Have you tried the following

a) ISMF if you have access, i.e. one of the storage administrators (and this is posted in the VSAM / SMS section)
b) Asking one of the storage administrators if that isn't your job



samb01 wrote:i'd prefer you let willy jensen answer me... Thank you

.................. because he does a lot of what I should do myself for me
expat
 
Posts: 459
Joined: Sat Jun 09, 2007 3:21 pm
Has thanked: 0 time
Been thanked: 8 times
Top

Re: %free of all the storage group by batch

Postby samb01 » Wed Feb 21, 2018 1:21 pm

willy jensen wrote:Read the MXIMEN00 member for a list of commands and a short description. To get the detailed information you need to install the product (see member $INSTJCL) and use the HELP command. No manuals as far as I know.
is it possible to be alerted if a storage groupe is almost full ?

Sure, run the job at regular intervals, parse the output and send an alert when a threshold is reached.
By wich way could i be alerted ?

That is totally up to you and your organisation.


willy jensen,

Thank you for your help.
samb01
 
Posts: 427
Joined: Mon Nov 16, 2009 7:24 pm
Has thanked: 1 time
Been thanked: 0 time
Top

Re: %free of all the storage group by batch

Postby samb01 » Wed Feb 21, 2018 2:38 pm

expat wrote:Have you tried the following

a) ISMF if you have access, i.e. one of the storage administrators (and this is posted in the VSAM / SMS section)
b) Asking one of the storage administrators if that isn't your job



samb01 wrote:i'd prefer you let willy jensen answer me... Thank you

.................. because he does a lot of what I should do myself for me


Because he simply answered my questions....
samb01
 
Posts: 427
Joined: Mon Nov 16, 2009 7:24 pm
Has thanked: 1 time
Been thanked: 0 time
Top
PreviousNext
Post a reply

Return to VSAM/SMS

 


  • Related topics
    Replies
    Views
    Last post
Forum Rules|FAQ|Subscriptions|Bookmarks