MODIFY

Format 1

MODIFY { control-item } [ ( {index-1} ... ) ]
       { CONTROL       }

Remaining phrases are optional.

 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
       {= }

 {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
       {= }

 { [NOT] style-name } ...

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

 FONT {IS} font-handle
      {= }

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

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

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

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

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

where prop-option is one of the following:

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


Format 2

MODIFY {window-handle           }
       {WINDOW [generic-handle] }

Remaining phrases are optional.

 AT screen-loc

 LINE NUMBER line-num

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

 SCREEN LINE NUMBER screen-line

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

 SIZE width

 LINES height

 TITLE title

 ON EXCEPTION statement-1

 NOT ON EXCEPTION statement-2

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

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

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




ACTION	{IS} action

        {= }


END-MODIFY