Universe basic преобразовать список выбора в массив?

У меня есть один основной список выбора в программе

ВЫПОЛНИТЬ 'ВЫБЕРИТЕ ПРОДУКТЫ С DEL.DATE ‹= "':EOM.DATE;'"' ЗАХВАТ ВЫВОДА

Затем я хочу преобразовать список выбора в массив, есть ли базовая функция Universe для этого или мне нужно написать функцию?


person ScaryMinds    schedule 27.03.2017    source источник


Ответы (1)


Используйте READLIST для чтения содержимого активного списка выбора в динамический массив (@FM) с разделителями полей. Это парадигма, которую я использую при работе с несколькими списками выбора, и полезная нагрузка не слишком велика. Вы также можете выбрать другой список, отличный от значения по умолчанию 0, но это немного запутывает интеллектуально.

EXECUTE 'SELECT PRODUCTS WITH DEL.DATE <= "':EOM.DATE;'"' CAPTURING OUTPUT
READLIST PRODUCTS.LIST ELSE PRODUCTS.LIST = ''
PRODUCTS.COUNT = DCOUNT(PRODUCTS.LIST,@FM)
FOR X=1 TO PRODUCTS.COUNT
   ID.PRODUCTS = PRODUCTS.LIST<X>
   ;* Your per ID magic goes here
NEXT X

Удачи!

person Van Amburg    schedule 29.03.2017
comment
Спасибо за ответ, пропустил READLIST, смутно подумал, что SELECT TO в одном из вариантов MV имеет тот же эффект, но определенно не в соответствии с руководствами UV 10, на которые я смотрю. - person ScaryMinds; 04.04.2017