jmeza, en este caso lo mejor sería un ComboBox. De todos modos ambos comparten los mismos métodos y propiedades:
Código COBOL:
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 IDX-1 PIC S9(4) COMP-5.
01 WS-TEXTO PIC X(50).
PROCEDURE DIVISION.
*> AÑADIR LINEA
INVOKE CmCombo1 "AddString" USING WS-TEXTO
INVOKE CmList1 "AddString" USING WS-TEXTO
*> OBTENER TEXTO DE UNA LINEA CONCRETA
MOVE 1 TO IDX-1
MOVE "ListString"(IDX-1) OF CmCombo1 TO WS-TEXTO
MOVE "ListString"(IDX-1) OF CmList1 TO WS-TEXTO
*> OBTENER LINEA SELECCIONADA
MOVE "SelString" OF CmCombo1 TO WS-TEXTO
MOVE "SelString" OF CmList1 TO WS-TEXTO