Progress - ayuda con COMBO-BOX,

HOLA , SUPLICO AYUDA PARA DESPLEGAR EL CAMPO DE UNA TABLA EN UN
COMBO-BOX O UN CHECK LIST O ALGO QUE SE LE PARESCA Y MANTENERLO ACTUALIZADO EN TIEMPO DE EJECUCION. GRACIASSSS.

Primero tenes que pegar un combo y linkealo con un campo de la base de datos.

RUN llenarCombo (INPUT-OUTPUT lista-p).
IF lista-p <> '' THEN
DO:
ASSIGN cModulos:LIST-ITEM-PAIRS IN FRAME {&FRAME-NAME} = lista-p
cModulos:SCREEN-VALUE IN FRAME {&FRAME-NAME} = ENTRY(2,lista-p).
END.


PROCEDURE llenarCombo:
DEFINE INPUT-OUTPUT PARAMETER lista-p AS CHARACTER NO-UNDO.
FOR EACH tanexo NO-LOCK BREAK BY tanexo.deno-141:
lista-p = lista-p + (IF FIRST(tanexo.deno-141) THEN "" ELSE ",") + tanexo.deno-141 + "," + STRING(tanexo.codi-141).
END.
END PROCEDURE.

agradesco muchisimo tu ayuda., pero creo que me falto poner que estoy trabajando con appbuilder.... y me seria de mas utilidada concer la manera de hacerlo mediante el appbuilder gracias...