Coding the Logo Panel

Edit online

KLSZPLGO is the first dialog called by KLSZPTRK. It displays a logo panel, shown in Figure 1, that prompts the user to press Enter to continue the application.

Figure 1. Logo Panel





                            AAA     CCCC   MM    MMM  EEEEEEE                           
                           AA AA   CCCCCC  MMMM MMMM  EE                                
                          AA   AA  CC      MM MMM MM  EE                                
                          AA   AA  CC      MM     MM  EEEEE                             
                          AAAAAAA  CC      MM     MM  EE                                
                          AA   AA  CCCCCC  MM     MM  EE                                
                          AA   AA   CCCC   MM     MM  EEEEEEE                           
              Welcome to the Acme Industries Personal Computer Inventory System 
                      Press Enter to continue...

KLSZPLGO is shown in Figure 2 and explained in the sections that follow.

Figure 2. KLSZPLGO - Displaying a Logo Panel
   )option level(1) maxwidth maxdepth
   )comment
   ************************************************************************
   ********                                                        ********
   ******                                                            ******
   ****                    PC Inventory System                         ****
   ****                      ACME Industries                           ****
   ******                                                            ******
   ********                                                        ********
   ************************************************************************
   * Dialog Name: KLSZPLGO                                                *
   * Function   : Display the logo panel.                                 *
   *
   * Input      : N/A                                                     *
   * Output     : N/A                                                     *
   * Created    : 10/20/17                                                *
   ************************************************************************
   *                  Modification History Log                            *
   ************************************************************************
   *  Date    Modid   Description *
   *--------  ------  ----------------------------------------------------*
   *                                                                      *
   ************************************************************************
   *                                                                      *
   ************************************************************************
   
   )copy KLSZPATT

   )body center input
   #
   #
   #
   #                  AAA     CCCC   MM    MMM  EEEEEEE
   #                 AA AA   CCCCCC  MMMM MMMM  EE
   #                AA   AA  CC      MM MMM MM  EE
   #                AA   AA  CC      MM     MM  EEEEE
   #                AAAAAAA  CC      MM     MM  EE
   #                AA   AA  CCCCCC  MM     MM  EE
   #                AA   AA   CCCC   MM     MM  EEEEEEE
   #
   #
   #
        Welcome to the Acme Industries Personal Computer Inventory System
   #
   #            Press$Enter#to continue...
)option
See the explanation that follows Figure 1 for a description of the OPTION placeholder.
)comment
See the explanation that follows Figure 1 for a description of the )COMMENT placeholder.
)copy
In this example, the member KLSZPATT is copied. It contains the )ATTRS placeholder and the field attributes that are used to format the panel. See Figure 1 for the contents of KLSZPATT.
)body
The BODY section formats the panel for display. It uses the following parameters:
center
Specifies that the information is displayed in the center of the screen. The data is centered vertically as a block, not by individual line.
input
Specifies that although no fields are modifiable, the screen remains displayed until a function key or Enter is pressed. Without the INPUT parameter, the panel flashes briefly on the screen, but does not remain displayed.
freeform text
Freeform text is any text that you type as you want it to appear on the screen. In Figure 2, the freeform text is ACME, Welcome to the Acme Industries Personal Computer Inventory System , and Press Enter to continue... . The text is displayed as it appears in the BODY section as modified by the field attributes. The first character in a field sets the attributes that are associated with that character in KLSZPATT:
#
Sets the field as an output field, displayed in turquoise in normal intensity.
$
Defines Enter as an output field, displayed in yellow in high intensity. The # following Enter causes the rest of the line to be displayed in turquoise in normal intensity.