Итак, задача научиться выбирать темы из вида. То есть получить список тем. Смотрим код:

theView = av.FindDoc("View1")
listTheme=theView.GetThemes 
type = MsgBox.ChoiceAsString(listTheme, "Select Theme to:", "Theme" )

А вот результат.

В коде находим вид по имени (FindDoc) дальше получаем все темы в список (GetThemes) и выводит окно со списком (MsgBox.ChoiceAsString) передавая туда список. При желании можно проверить был ли выбор или нажата кнопка Canсel.

theView = av.FindDoc("View1")
listTheme=theView.GetThemes 
type = MsgBox.ChoiceAsString(listTheme, "Select Theme to:", "Theme" )

if (type=nil) then
 MsgBox.Info( "No Theme", "")
end

В случае отсутствия выбора будет возвращен nil.