Tutorial › A Program That Displays System Information › The System1 News Panel

The System1 News Panel

The following program shows the panel for the System 1 screen (data set member SYS001):

)ATTR 
  % TYPE(text) INTENSE(HI) SKIP(ON) COLOR(white)
  + TYPE(text) INTENSE(LOW) SKIP(ON) COLOR(green)
  _ TYPE(input) INTENSE(LOW) COLOR(white)
)BODY 
+        System 1 News 
&zpanel
System 1 will be down for maintenance from 6:00 p.m 
Friday, May 25 to 6:00 a.m. Saturday.
         %PF3 +Return to Menu
     + ===>_acmd
)INIT
)END