)attr                                                                           
/*                                                                   */         
/* Name: WORKWAIT                                     03/97  BRG     */         
/* Purpose: Brain food for your users while they wait...             */         
/*  Special thanks to David Alcock, the father of this panel routine.*/         
/* 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(LOW)  COLOR(TURQ)                                        
 º TYPE(TEXT)   INTENS(HIGH) COLOR(GREEN)  HILITE(BLINK)                        
 › TYPE(TEXT)   INTENS(LOW)  COLOR(BLUE)                                        
 ( TYPE(TEXT)   INTENS(HIGH) COLOR(RED)                                         
 ) TYPE(OUTPUT) INTENS(HIGH) COLOR(PINK) JUST(ASIS)                             
 ` type(text) intens(high) color(yellow)                                        
 ~ type(text) intens(low)  color(turq)                                          
)Body Expand(!!)                                                                
ºWW+      ºWW+ºOOOOOOOOOOOO+ºRRRRRRRRRRR+ ºKK+      ºKK+   `Time   -~&ZTIME     
ºWW+      ºWW+ºOOOOOOOOOOOO+ºRRRRRRRRRRRR+ºKK+     ºKK+    `Date   -~&ZDATE     
ºWW+      ºWW+ºOO+      ºOO+ºRR+      ºRR+ºKK+    ºKK+     `Julian -~&ZJDATE    
ºWW+      ºWW+ºOO+      ºOO+ºRR+      ºRR+ºKK+   ºKK+      `User   -~&ZUSER     
ºWW+      ºWW+ºOO+      ºOO+ºRR+      ºRR+ºKK+  ºKK+                            
ºWW+      ºWW+ºOO+      ºOO+ºRRRRRRRRRRRR+ºKKKKKKK+        º/ \ / \ / \ +       
ºWW+ ºWW+ ºWW+ºOO+      ºOO+ºRRRRRRRRRRR+ ºKKKKKKK+        º\ / \ / \ / +       
ºWW+ºWWWW+ºWW+ºOO+      ºOO+ºRR+  ºRR+    ºKK+  ºKK+                            
ºWWºWW+ºWWºWW+ºOO+      ºOO+ºRR+   ºRR+   ºKK+   ºKK+                           
ºWWWW+  ºWWWW+ºOO+      ºOO+ºRR+    ºRR+  ºKK+    ºKK+                          
ºWWW+    ºWWW+ºOOOOOOOOOOOO+ºRR+     ºRR+ ºKK+     ºKK+                         
ºWW+      ºWW+ºOOOOOOOOOOOO+ºRR+      ºRR+ºKK+      ºKK+                        
+                                      ºIIIIIIIIII+ ºNN+      ºNN+ ºGGGGGGGGGG+ 
+                                     ºIIIIIIIIII+ ºNNN+     ºNN+ºGGGGGGGGGGGG+ 
+                                        ºII+     ºNNNN+    ºNN+ºGG+      ºGG+  
(Please be patient, performing:         ºII+     ºNNºNN+   ºNN+ºGG+             
+                                      ºII+     ºNN+ºNN+  ºNN+ºGG+              
)FUNCTION                             ºII+     ºNN+ ºNN+ ºNN+ºGG+               
+                                    ºII+     ºNN+  ºNN+ºNN+ºGG+   ºGGGGG+      
+                                   ºII+     ºNN+   ºNNºNN+ºGG+   ºGGGGG+       
+                                  ºII+     ºNN+    ºNNNN+ºGG+      ºGG+        
+                                 ºII+     ºNN+     ºNNN+ºGG+      ºGG+         
+                            ºIIIIIIIIII+ ºNN+      ºNN+ºGGGGGGGGGGGG+          
+                           ºIIIIIIIIII+ ºNN+       ºN+ ºGGGGGGGGGG+            
)init                                                                           
)proc                                                                           
)end