mirror of
https://github.com/tormozit/RDT1C.git
synced 2025-12-17 05:04:11 +00:00
38 lines
2.3 KiB
Plaintext
38 lines
2.3 KiB
Plaintext
// Параметры - ТаблицаЗначений с колонкой Имя
|
||
Функция ПараметрыКорректны(Параметры) Экспорт
|
||
|
||
Результат = Истина;
|
||
Если Параметры.Количество() = 0 Тогда
|
||
Возврат Результат;
|
||
КонецЕсли;
|
||
Для Каждого СтрокаПараметра Из Параметры Цикл
|
||
Если Не ЛксЛиИмяПеременной(СтрокаПараметра.Имя) Тогда
|
||
Результат = Ложь;
|
||
Сообщить("Имя параметра """ + СтрокаПараметра.Имя + """ не отвечает правилам формирования имен встроенного языка",
|
||
СтатусСообщения.Внимание);
|
||
КонецЕсли;
|
||
КонецЦикла;
|
||
НеуникальныеИмена = ирНеглобальный.ПолучитьНеуникальныеЗначенияКолонкиТаблицыЛкс(Параметры, "Имя");
|
||
Для Каждого НеуникальноеИмя Из НеуникальныеИмена Цикл
|
||
Сообщить("Параметр """ + НеуникальноеИмя + """ встречается более одного раза", СтатусСообщения.Внимание);
|
||
Результат = Ложь;
|
||
КонецЦикла;
|
||
Возврат Результат;
|
||
|
||
КонецФункции // ПараметрыКорректны()
|
||
|
||
#Если Клиент И Не ТонкийКлиент И Не ВебКлиент Тогда
|
||
|
||
Функция ОткрытьКонсольКодаДляАлгоритма(Ссылка) Экспорт
|
||
|
||
СтруктураПараметров = Новый Структура;
|
||
Для Каждого СтрокаПараметра Из Ссылка.Параметры Цикл
|
||
СтруктураПараметров.Вставить(СтрокаПараметра.Имя, СтрокаПараметра.Значение);
|
||
КонецЦикла;
|
||
ФормаКонсолиКода = ОперироватьСтруктурой(Ссылка.ТекстАлгоритма, , СтруктураПараметров);
|
||
ФормаКонсолиКода.ТекущийАлгоритм = Ссылка;
|
||
Возврат Неопределено;
|
||
|
||
КонецФункции
|
||
|
||
#КонецЕсли |