Examples of Sample Panels

Five examples of sample panel definitions follow.

Example 1

.DEFINE  >  prot  blue
.DEFINE ?  prot red
.DEFINE  #  unprot  num green
.DEFINE <  unprot invisible num
.DEFINE  @ protect  turq
.DEFINE  +  prot  blue underline
.PANEL signon
> Panel signon                             &companyname

?&message

@                    Welcome to ACME On-Line Tax Services

+Please enter your Account Number and Personal ID Number and press ENTER>


>Account Number :#7&account_num

>PIN            :<4&pin

Example 2

.DEFINE  >  prot  green
.DEFINE <  unprot underline white
.DEFINE  +  var service.
.DEFINE % skip turq
.PANEL   service
> Panel service           &disp_date          &companyname



% &salutation
% Tab the cursor to the type of service wanted and press the ENTER key.



<+> Itemized tax preparation

<+> Non-itemized tax preparation

<+> Query return status

<+> Show calendar

<+> Exit

Example 3

.DEFINE # protect bright
.DEFINE + protect
A panel to display a static message without erasing previous panel.
Notice the position of the escape sequence in lines 1 and 6.
See manual for an explanation about escape sequences.
.PANEL msgbox1
#++-------------------------------------------+++
#|                                           |+
#|  We are sorry but the service you have    |+
#|  chosen is not available at this time.    |+
#|  Press ENTER to continue.                 |+
#|                                           |+
#++-------------------------------------------+++

Example 4

.DEFINE ) protect bright
.DEFINE + drop
.DEFINE & var msg.
A panel to display output dynamic messages.
.PANEL msgbox2
)+-------------------------------------------+#
)|                                           |#
)|  &                                        |#
)|  &                                        |#
)|                                           |#
)+-------------------------------------------+#

Example 5

.DEFINE  >  skip  blue
.DEFINE <  skip green right
.DEFINE % var center_days.
.DEFINE + var right_days.
.DEFINE # VAR left_days.
.DEFINE @ var pf3 pf7 pf8
.PANEL   calendar
> Panel calendar        &disp_date                    &companyname


     > &disp_left_mon              &disp_center_mon            &disp_right_mon
>su mo tu we th fr sa        su mo tu we th fr sa        su mo tu we th fr sa
<# <# <# <# <# <# <# >      <% <% <% <% <% <% <% >      <+ <+ <+ <+ <+ <+ <+ >
<# <# <# <# <# <# <# >      <% <% <% <% <% <% <% >      <+ <+ <+ <+ <+ <+ <+ >
<# <# <# <# <# <# <# >      <% <% <% <% <% <% <% >      <+ <+ <+ <+ <+ <+ <+ >
<# <# <# <# <# <# <# >      <% <% <% <% <% <% <% >      <+ <+ <+ <+ <+ <+ <+ >
<# <# <# <# <# <# <# >      <% <% <% <% <% <% <% >      <+ <+ <+ <+ <+ <+ <+ >
<# <# >                     <% <% >                     <+ <+ >










>@    = Leave Calendar  >@    = Backup a month   >@    = Go forward a month

IF RC=4 & PAN.REA = 124 THEN /* warning and no input received */