DISPLAY

Format 1

DISPLAY { {src-item}
          {OMITTED }

     [ UPON new-window ]

 AT screen-loc

 AT LINE NUMBER line-num

 AT {COLUMN  } NUMBER col-num
    {COL     }
    {POSITION}
    {POS     }

 SIZE length

 WITH NO ADVANCING

 {ERASE} [TO END OF] {LINE  }    (VAX, ICOBOL)
 {BLANK}             {SCREEN}

 {ERASE} [EOS]                   (RM)
 {BLANK} [EOL]

 WITH  {BELL}
       {BEEP}

 {UNDERLINED}
 {HIGHLIGHT }
 {HIGH      }
 {BOLD      }
 {LOWLIGHT  }
 {LOW       }
 {STANDARD  }

 WITH  {BLINKING}
       {BLINK   }

 {REVERSE-VIDEO}
 {REVERSE      }
 {REVERSED     }

 SAME

 WITH {COLOR } color-val
      {COLOUR}

 {FOREGROUND-COLOR } IS fg-color
 {FOREGROUND-COLOUR}

 {BACKGROUND-COLOR } IS bg-color
 {BACKGROUND-COLOUR}

 SCROLL [UP  ] [ BY scrl-num {LINE } ]
        [DOWN]               {LINES}

 OUTPUT {JUSTIFIED}  {LEFT    }
        {JUST     }  {RIGHT   }
                     {CENTERED}

 WITH {CONVERSION}
      {CONVERT   }

 CONTROL cntrl-string

 UPON CRT

 } ...


Format 2

DISPLAY screen-name

    [ UPON new-window ]

 AT screen-loc

 AT LINE NUMBER line-num

 AT {COLUMN  } NUMBER col-num
    {COL     }
    {POSITION}
    {POS     }


Format 3

DISPLAY { SUBWINDOW }
        { WINDOW    }

   [ UPON new-window ]

 AT screen-loc

 AT LINE NUMBER line-num

 AT {COLUMN  } NUMBER col-num
    {COL     }
    {POSITION}
    {POS     }

 SIZE length

 LINES height

 {ERASE} SCREEN
 {BLANK}

 {REVERSE-VIDEO}
 {REVERSE      }
 {REVERSED     }

 WITH { COLOR  } color-val
      { COLOUR }

 {FOREGROUND-COLOR } IS fg-color
 {FOREGROUND-COLOUR}

 {BACKGROUND-COLOR } IS bg-color
 {BACKGROUND-COLOUR}

 {HIGHLIGHT}
 {HIGH     }
 {BOLD     }
 {LOWLIGHT }
 {LOW      }
 {STANDARD }

 {BACKGROUND-HIGH    }
 {BACKGROUND-LOW     }
 {BACKGROUND-STANDARD}

 BOXED

 SHADOW

 [TOP   ] [CENTERED] TITLE IS title
 [BOTTOM] [LEFT    ]
          [RIGHT   ]

 WITH NO SCROLL

 WITH NO WRAP

 CONTROL VALUE IS control-val

 POP-UP AREA IS save-area


Format 4

DISPLAY SCREEN SIZE  {80 }
                     {132}

   [ ON EXCEPTION statement-1 ]

   [ NOT ON EXCEPTION statement-2 ]

   [ END-DISPLAY ]


Format 5

DISPLAY LINE

   [ UPON new-window ]

   { SIZE length  }
   { LINES height }

 AT screen-loc

 AT LINE NUMBER line-num

 AT {COLUMN  } NUMBER col-num
    {COL     }
    {POSITION}
    {POS     }

 {REVERSE-VIDEO}
 {REVERSE      }
 {REVERSED     }

 WITH {COLOR } color-val
      {COLOUR}

 [CENTERED] TITLE IS title
 [LEFT    ]
 [RIGHT   ]


Format 6

DISPLAY BOX

   [ UPON new-window ]

 AT screen-loc

 AT LINE NUMBER line-num

 AT {COLUMN  } NUMBER col-num
    {COL     }
    {POSITION}
    {POS     }

 SIZE length

 LINES height

 {REVERSE-VIDEO}
 {REVERSE      }
 {REVERSED     }

 WITH {COLOR } color-val
      {COLOUR}

 [TOP   ] [CENTERED] TITLE IS title
 [BOTTOM] [LEFT    ]
          [RIGHT   ]


Format 7

DISPLAY source UPON WINDOW [TOP   ] [CENTERED] TITLE
                           [BOTTOM] [LEFT    ]
                                    [RIGHT   ]


Format 8

DISPLAY cmd-line UPON COMMAND-LINE


Format 9

DISPLAY {src-item} ... [ UPON mnemonic-name ] [ WITH NO ADVANCING ]


Format 10

DISPLAY title-1 UPON { FLOATING WINDOW handle-1 } TITLE
                     { GLOBAL WINDOW            }


Format 11

DISPLAY FLOATING [GRAPHICAL] WINDOW

 [ UPON parent-window ]

 {MODELESS}
 {MODAL   }

 {LINK} TO THREAD
 {BIND}

 SCREEN LINE NUMBER screen-line

 SCREEN {COLUMN  } NUMBER screen-col
        {COL     }
        {POSITION}
        {POS     }

 AT screen-loc

 AT LINE NUMBER line-num

 AT {COLUMN  } NUMBER col-num
    {COL     }
    {POSITION}
    {POS     }

 SIZE length

 LINES height

 FONT {IS} font-1
      {= }

 CONTROL FONT  {IS} font-3
               {= }

 CELL
   {SIZE  } {IS} {cell-units                                 }
   {HEIGHT} {= } {control-type-name FONT font-2 [SEPARATE  ]}
   {WIDTH }      {control-type-name FONT        [OVERLAPPED]}

 {ERASE} SCREEN
 {BLANK}

 {REVERSE-VIDEO}
 {REVERSE      }
 {REVERSED     }

 WITH {COLOR } color-val
      {COLOUR}

 {FOREGROUND-COLOR } IS fg-color
 {FOREGROUND-COLOUR}

 {BACKGROUND-COLOR } IS bg-color
 {BACKGROUND-COLOUR}

 {HIGHLIGHT}
 {HIGH     }
 {BOLD     }
 {LOWLIGHT }
 {LOW      }
 {STANDARD }

 {BACKGROUND-HIGH    }
 {BACKGROUND-LOW     }
 {BACKGROUND-STANDARD}

 { [USER-GRAY] [USER-WHITE] }
 {        USER-COLORS       }

 BOXED

 SHADOW

 TITLE-BAR

 [TOP   ] [CENTERED] TITLE IS title
 [BOTTOM] [LEFT    ]
          [RIGHT   ]

 WITH SYSTEM MENU

 WITH NO SCROLL

 WITH NO WRAP

 {AUTO-RESIZE}
 {RESIZABLE  }

 MIN-SIZE  {= } min-size
           {IS}
 MAX-SIZE  {= } max-size
           {IS}
 MIN-LINES {= } min-lines
           {IS}
 MAX-LINES {= } max-lines
           {IS}

 CONTROL VALUE {IS} control-val
               {= }

 VISIBLE {IS} {TRUE         }
         {= } {FALSE        }
              {visible-state}

 POP-UP MENU {IS}  {menu-1}
             {= }  {NULL}

 {POP-UP AREA IS } handle-name
 {HANDLE {IS}    }
         {IN}

 CONTROLS-UNCROPPED

 EVENT PROCEDURE IS { proc-1 [ {THROUGH} proc-2 ] }
                               {THRU   }
                    ( NULL                        }



ACTION	{IS} action

        {= }



Format 12

DISPLAY {INITIAL    } [GRAPHICAL] WINDOW
        {STANDARD   }
        {INDEPENDENT}

 MODELESS

 LINK TO THREAD

 SCREEN LINE NUMBER screen-line

 SCREEN {COLUMN  } NUMBER screen-col
        {COL     }
        {POSITION}
        {POS     }

 AT screen-loc  (independent only)

 AT LINE NUMBER screen-line  (independent only)

 AT {COLUMN  } NUMBER screen-col  (independent only)
    {COL     }
    {POSITION}
    {POS     }

 SIZE length

 LINES height

 FONT {IS} font-1
      {= }

 CONTROL FONT  {IS} font-3
               {= }

 CELL  {SIZE  } {IS} {cell-units                                }
        {HEIGHT} {= } {control-type-name FONT font-2 [SEPARATE  ]}
        {WIDTH }      {control-type-name FONT        [OVERLAPPED]}

 {ERASE} SCREEN
 {BLANK}

 {REVERSE-VIDEO}
 {REVERSE      }
 {REVERSED     }

 WITH {COLOR } color-val
      {COLOUR}

 {FOREGROUND-COLOR } IS fg-color
 {FOREGROUND-COLOUR}

 {BACKGROUND-COLOR } IS bg-color
 {BACKGROUND-COLOUR}

 {HIGHLIGHT}
 {HIGH     }
 {BOLD     }
 {LOWLIGHT }
 {LOW      }
 {STANDARD }

 {BACKGROUND-HIGH    }
 {BACKGROUND-LOW     }
 {BACKGROUND-STANDARD}

 { [USER-GRAY] [USER-WHITE] }
 {        USER-COLORS       }

 TITLE-BAR

 [TOP   ] [CENTERED] TITLE IS title
 [BOTTOM] [LEFT    ]
          [RIGHT   ]

 WITH SYSTEM MENU

 WITH NO SCROLL

 WITH NO WRAP

 AUTO-RESIZE
 RESIZABLE

 MIN-SIZE  {= } min-size
           {IS}
 MAX-SIZE  {= } max-size
           {IS}
 MIN-LINES {= } min-lines
           {IS}
 MAX-LINES {= } max-lines
           {IS}

 AUTO-MINIMIZE

 CONTROL VALUE {IS} control-val
               {= }

 VISIBLE {IS} {TRUE         }
         {= } {FALSE        }
              {visible-state}

 POP-UP MENU {IS}  {menu-1}
             {= }  {NULL}

 {POP-UP AREA IS } handle-name
 {HANDLE {IS}    }
         {IN}

 CONTROLS-UNCROPPED

 EVENT PROCEDURE IS { proc-1 [ {THROUGH} proc-2 ] }
                               {THRU   }
                    ( NULL                        }


Format 13

DISPLAY TOOL-BAR

 HANDLE {IS} handle-name
        {IN}

 LINES {IS} height [CELL ]
       {= }        [CELLS]

 CONTROL FONT {IS} font-1
              {= }

 WITH {COLOR } color-val
      {COLOUR}

 {FOREGROUND-COLOR } IS fg-color
 {FOREGROUND-COLOUR}

 {BACKGROUND-COLOR } IS bg-color
 {BACKGROUND-COLOUR}

 {HIGHLIGHT}
 {HIGH     }
 {BOLD     }
 {LOWLIGHT }
 {LOW      }
 {STANDARD }

 {BACKGROUND-HIGH    }
 {BACKGROUND-LOW     }
 {BACKGROUND-STANDARD}

 CELL
   {SIZE  } {IS} {cell-units                                 }
   {HEIGHT} {= } {control-type-name FONT font-2 [SEPARATE  ]}
   {WIDTH }      {control-type-name FONT        [OVERLAPPED]}


Format 14

DISPLAY {control-type-name   }
        {OBJECT control-type }

 [ title ]

 [ UPON new-window ]

 {IDENTIFICATION} {IS} control-id
 {ID            } {= }

 AT screen-loc

 AT LINE NUMBER line-num

 AT {COLUMN  } NUMBER col-num
    {COL     }
    {POSITION}
    {POS     }

 AT CLINE NUMBER cline-num

 AT CCOL NUMBER ccol-num

 SIZE {IS} length [CELL ]
      {= }        [CELLS]

 LINES {IS} height [CELL ]
       {= }        [CELLS]

 CSIZE   {IS} clength  [CELL]
         {= }          [CELLS]

 CLINES  {IS} cheight  [CELL]
         {= }          [CELLS]

 TITLE {IS} title
       {= }

 KEY {IS} key-letter
     {= }

 {COLOR } IS color-val
 {COLOUR}

 {FOREGROUND-COLOR } IS fg-color
 {FOREGROUND-COLOUR}

 {BACKGROUND-COLOR } IS bg-color
 {BACKGROUND-COLOUR}

 {HIGHLIGHT}
 {HIGH     }
 {BOLD     }
 {LOWLIGHT }
 {LOW      }
 {STANDARD }

 {BACKGROUND-HIGH    }
 {BACKGROUND-LOW     }
 {BACKGROUND-STANDARD}

 STYLE {IS} style-flags
       {= }

 {style-name} ...

 VALUE {IS} [ MULTIPLE ] value [ LENGTH {IS} length-1 ]
       {= } [ TABLE    ]                {= }

 FONT {IS} font-handle
      {= }

 HANDLE {IN} control-handle
        {IS}

 ENABLED {IS} {TRUE         }
         {= } {FALSE        }
             {enabled-state}

 VISIBLE {IS} {TRUE         }
         {= } {FALSE        }
              {visible-state}

 POP-UP MENU {IS}  {menu-1}
             {= }  {NULL}

 HELP-ID {IS} help-id
         {= }

 EVENT PROCEDURE IS {proc-1 [ {THROUGH} proc-2 ] }
                              {THRU   }
                    {NULL                        }

 {{ property-name          }  {IS } property-option [GIVING result-1]}. . .
  { PROPERTY property-type }  {ARE}
                             {=  }

 where property-option is one of the following:

    { property-value [ LENGTH {IS} length-1 ] }
    {                         {= }            }
    { ( {property-value} ... )                }
    {                                         }
    { {MULTIPLE} property-table               }
    { {TABLE   }                              }



Format 15

DISPLAY MESSAGE BOX

 { text } . . .

 TITLE {IS} title
       {= }

 TYPE {IS} type
      {= }

 ICON {IS} icon
      {= }

 DEFAULT {IS} default
         {= }

 {GIVING   } value
 {RETURNING}


Format 16

DISPLAY external-form-item