The first example creates a drop-down combo box (the default style) that contains a one-line entry field and a four-line list box (total of five lines):
DISPLAY COMBO-BOX, LINES 5, HANDLE IN COMBO-BOX-1.
Here is the Screen Section equivalent. This definition also specifies a data item in which the combo box choice will be stored:
03 COMBO-BOX-1, COMBO-BOX, TO COMBO-BOX-DATA, LINES 5.
Here is an example of code that adds 10 items to the combo box:
PERFORM VARYING IDX FROM 1 BY 1 UNTIL IDX > 10
MODIFY BOX-1, ITEM-TO-ADD = BOX-DATA( IDX )
END-PERFORM.
The following combo box does not use a drop-down list (the list is always displayed):
03 COMBO-BOX, USING BOX-DATA, STATIC-LIST, LINE 5,
COLUMN 40, SIZE 20, LINES 8.