)ATTR DEFAULT(%+_)
  % TYPE(TEXT) COLOR(WHITE)
  + TYPE(TEXT) COLOR(TURQ)
  @ TYPE(INPUT) COLOR(YELLOW) CAPS(OFF) JUST(LEFT) PAD(' ')
  ! TYPE(INPUT) COLOR(YELLOW) CAPS(ON) JUST(LEFT) PAD(' ')
  $ TYPE(TEXT) COLOR(GREEN)
  ? TYPE(TEXT) COLOR(YELLOW)
  ~ TYPE(TEXT) COLOR(RED)
)BODY
%----------------------------- zDIAG Batch Suite ------------------------------%
%Command ===>@ZCMD                                      ?&ZSTATUS
+
+Select with %S+ or enter the number/name in Command.
%Parameters ===>@ZPARM
+
?Sel  No. Utility    Description
?---  --- ---------  --------------------------------------------------------
!S1 %  1  $JOBDIAG+    JES2 resource / spool diagnostic
!S2 %  2  $JES2DIAG+   JES2 subsystem / internal health diagnostic
!S3 %  3  $CPUDIAG+    CPU utilization and workload diagnostic
!S4 %  4  $LONGDIAG+   Long-running job / address-space diagnostic
!S5 %  5  $STORDIAG+   Storage, paging and memory diagnostic
!S6 %  6  $ENQDIAG+    ENQ / GRS contention and dependency diagnostic
!S7 %  7  $ASIDDIAG+   ASID availability / shortage diagnostic
!S8 %  8  $XCFDIAG+    XCF and sysplex connectivity diagnostic
!S9 %  9  $ZFSDIAG+    zFS filesystem usage and capacity diagnostic
!S10% 10  $LOGRDIAG+   System Logger and log-stream diagnostic
+
%Commands:+ HELP  JOBCARD
%Aliases :+ JOB JES2 CPU LONG STOR ENQ ASID XCF ZFS LOGR
+PF1=Help  PF3=Exit  Parameter field preserves lower/mixed case.
?&ZMSG
)INIT
  .CURSOR = ZCMD
  .HELP = ZDIAGH
)END
