Главная » 1С Предприятие » ВВОД ЗНАЧЕНИЙ ПЕРЕЧИСЛЕНИЯ

0

Задание  перечислений  выполняется  в  конфигурации. Для  получения  значения  п еречисления  в    программе   используются   его   методы,   а  также   встроенная   функция ВвестиПеречисление. Функция  открывает  диалог со  списком  значений  перечисления (рис. 4.3).

Рис. 4.3. Диалог, открываемый функцией ВвестиПеречисление для перечисления Скидки

Функция  имеет следующий синтаксис:

флаг = ВвестиПеречисление(значПер, заг, [задержка]);

Параметр  значПер   является   входным/выходным.  На   входе  он   может   иметь   тип Перечисление.  В  этом  случае  он  задает  одно  из  значений  перечисления,  на  котором после  открытия диалога расположится  курсор.  Например:

значПер = Перечисление.Скидки.Скидка40Проц;

На  выходе он  также  будет  иметь тип Перечисление,  но  содержать  уже  выбранное значение.

Также  параметр значПер  может  на  входе иметь символьный  тип. В  этой  ситуации перед  вызовом  функции  переменной  значПер  нужно   присвоить строку,   содержащую идентификатор перечисления, значение  которого мы хотим выбрать,  например

значПер = "Скидки";                 //          Скидки идентификатор перечисления

На выходе, однако, мы, как и в первом случае, получим значение типа Перечисл ение.

Смысл  параметров  заг и  задержка разъяснен в  табл.  2.3

Функция  вернет  1, если  значение  выбрано, вернет 0, если  не  выбрано, и   -1,  если время  отображения  диалога превысило величину,  заданную   параметром   задержка.

Пример.  Отображается диалог выбора значения  перечисления  Скидки:

процедура Выполнить( )               //         Связана с кнопкой Пуск  обработки Проба  перем флаг, значПер;

ОчиститьОкноСообщений();

значПер = Перечисление.Скидки.Скидка40Проц;

// или значПер = "Скидки";

флаг = ВвестиПеречисление(значПер,  "Выберите значение и нажмите ОК");

// Если нажали OK, Enter или дважды ударили мышью  по выбранному значению если флаг = 1 тогда

// Сообщаем значение выбранного перечисления Сообщить(значПер);

иначе

Предупреждение("Ничего не выбрано.");  конецЕсли;

конецПроцедуры // Выполнить

Замечание.   Ввод значения  значПер  перечисления  можно  также  выполнить,  применив встроенную  функцию  ВвестиЗначение (разд.  2.5), например, так:

перем флаг, значПер;

флаг = ВвестиЗначение(значПер, "Выбор скидки", "Перечисление.Скидки");

4.2.        ВЫВОДЫ

1.      Перечисление  состоит  из  элементов,  каждый   из  которых   имеет  идентификатор и представление.  Само  же перечисление задается  идентификатором;  для  представления перечисления  используется  его  синоним  или сам  идентификатор перечисл ения, если синоним не задан.

2.      Значением   элемента  перечисления   является   либо  его   представление,   либо   его идентификатор, если представление не задано.

3.      Перечисления хранятся в файле  1CV7.MD, содержащем конфигурацию системы.

4.       Интерактивный  ввод значения   перечисления   осуществляется  встроенной   функцией ВвестиПеречисление.

5.     СПРАВОЧНИК И

Источник: Бартеньев О. В. 1С:Предприятие:  программирование для  всех.  Базовые объекты и расчеты на одной дискете. М.: Диалог-МИФИ, 2005. 464 с.

По теме:

  • Комментарии