Uso de PickList

Este código muestra una vista en forma de lista, al seleccionar un registro este se guarda en el campo "CAMPO_NOMBRE".

Código:

FIELD campo_nombre := @PickList([Custom]:[Single];"Servidor" : "Directorio2/Basededatos.nsf" ; "Nombre_vista" ; "Titulo" ; "Mensaje:";1);
@Command([ViewRefreshFields]);
@All

Nota:
Este código lo puedes introducir en un botón para que al oprimirlo te aparezca la lista, la vista debe esta ordenada.