)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(YELLOW)
  $ TYPE(TEXT) COLOR(GREEN)
)BODY
%------------------------- zDIAG Job Card / Libraries -------------------------%
+
+Settings are saved in your ISPF profile and reused on later runs.
+The JOB/JES lines may be left blank until a diagnostic is submitted.
+
%REXX library  ===>#ZDEXEC
%Panel library ===>#ZDPANEL
+
?JOB card / JES control statements - use only the lines you need:
@ZDJC1                                                                      +
@ZDJC2                                                                      +
@ZDJC3                                                                      +
@ZDJC4                                                                      +
+
+Only the first nonblank line must be a //... JOB statement.
+Later lines may be // continuation, /*JOBPARM, /*ROUTE or comments.
+One, two, three or four lines are valid. Blank lines are ignored.
+
%Enter=Save and return   PF3=Cancel
?&ZSETMSG
)INIT
  .CURSOR = ZDJC1
  .HELP = ZDIAGH
)END
