)ATTR default(›+_)                                                              
/*                                                                   */         
/* Name: SYSPLEXP                                                    */         
/* Purpose: Display Commands available to SYSPLEX utility.           */         
/* Components: SYSPLEX (rexx exec) SYSPLEXP (panel) SYSPLEXW (panel) */         
/*                                                                   */         
/* Disclaimer:                                                       */         
/* The "Sysplex" utility IS NOT Public Domain Freeware Software.     */         
/* You may use the Sysplex utility AT YOUR OWN RISK, it is provided  */         
/* for your enjoyment, neither the Author or his Employer provides   */         
/* any warranty for its use.                                         */         
/*                                                                   */         
/* Please leave author name, e-mail address in the comment section   */         
/* Author: Bruce R. Gillispie - email: gillispi@texasrock.com        */         
/*                                                                   */         
 ` type(text) intens(high) color(white)                                         
 ^ type(text) intens(high) color(green)                                         
 ~ type(text) intens(high) color(yellow)                                        
 $ type(text) intens(high) color(turq)                                          
 › type(text) color(pink)  hilite(blink)                                        
 # area(scrl) extend(on)                                                        
)BODY expand(||) width(80)                                                      
~=|=|›Interactive Parallel Sysplex Display Commands~|=|=                        
›COMMAND ===>_ZCMD                                                              
+                                                                               
^Select Option:_UserIn %                                                        
#PLEX01 ---------------------------------------------------------------#        
+                                                                               
~=|=|                                                                           
+                                                                               
)AREA PLEX01 DEPTH(15)                                                          
^   1$LIST LOGR (SYSLOG)           ^Invoke IXCMIAPU utility                     
^   2$CFRM Report                  ^Invoke IXCMIAPU utility                     
^   3$CFRM Structure Health Check  ^Location of Structures in CFs               
^   4$D ETR,DATA                   ^External Timer Status                       
^   5$D CF                         ^Couple Facility Details                     
^   6$D XCF,SYSPLEX,ALL            ^Systems in the Sysplex                      
^   7$D XCF,COUPLE                 ^Status of Couple Data Sets                  
^   8$D XCF,POLICY                 ^The active Policy name(s)                   
^   9$D XCF,PI,DEV=ALL             ^Status of CTC Pathin(s)                     
^  10$D XCF,PO,DEV=ALL             ^Status of CTC Pathout(s)                    
^  11$D XCF,PI,STRNAME=IXC*        ^Status of Structure Pathin(s)               
^  12$D XCF,PO,STRNAME=IXC*        ^Status of Structure Pathout(s)              
^  13$D XCF,STR                    ^Active Structure names                      
^  14$D XCF,STR,STRNAME=*          ^Active Structures in detail                 
^  15$D XCF,CF,CFNAME=*            ^Active Couple Facility detail               
^  16$D XCF,LOCALMSG               ^Message buffers pool usage                  
^  17$D XCF,GROUP                  ^Sysplex Groups Information                  
^  18$D XCF,STR,STAT=ALLOCATED     ^Allocated Structures                        
^  19$D XCF,STR,STAT=ALTER         ^Structure in Alter State                    
^  20$D XCF,STR,STAT=DEALLOCPENDING^Structure pending de-allocation             
^  21$D XCF,STR,STAT=DUPREBUILD    ^Duplexed Structures                         
^  22$D XCF,STR,STAT=FPCONN        ^Failed-Persistent Structures                
^  23$D XCF,STR,STAT=INCLEANUP     ^Structure in cleanup                        
^  24$D XCF,STR,STAT=NOCONN        ^Structure not connected                     
^  25$D XCF,STR,STAT=NOTALLOCATED  ^Structure not allocated                     
^  26$D XCF,STR,STAT=POLICYCHANGE  ^Structure pending Policy Change             
^  27$D XCF,STR,STAT=REBUILD       ^Structure in Rebuild State                  
^  28$D WLM,SYSTEMS                ^WLM Info all Systems in Plex                
^  29$D LOGGER,STATUS              ^Logger State                                
^  30$D LOGGER,L                   ^LOGSTREAM Status                            
^  31$D LOGGER,CONNECTION          ^Logger Connections                          
^  32$D LOGGER,STRUCTURE           ^Logger Structures                           
^  33$D XCF,ARMS,STATE=START       ^Element has initially registered            
^  34$D XCF,ARMS,STATE=AVAIL       ^Element ready to accept work                
^  35$D XCF,ARMS,STATE=FAILED      ^Element has ended                           
^  36$D XCF,ARMS,STATE=RESTART     ^MVS initiated a restart on Element          
^  37$D XCF,ARMS,STATE=RECOVER     ^Element restarted and re-registered         
^  38$D XCF,ARMS                   ^ARM Stat Summary                            
^  39$Build SETXCF FORCE Commands  ^Build SETXCF FORCE Commands                 
^  40$D SFM,SYSTEMS                ^SFM Info all Systems in Plex                
+                                                                               
)INIT                                                                           
 &UserIn = ' '                                                                  
 .CURSOR = &UserIn                                                              
)PROC                                                                           
 VER (&UserIn,NB,LIST,+                                                         
     1,2,3,4,5,6,7,8,9,10,+                                                     
     11,12,13,14,15,16,17,18,19,20,+                                            
     21,22,23,24,25,26,27,28,29,30,+                                            
     31,32,33,34,35,36,37,38,39,40)                                             
 VPUT '(UserIn)' PROFILE                                                        
)END