Skip to content
Open
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
Original file line number Diff line number Diff line change
Expand Up @@ -166,14 +166,14 @@
{0},7,1,0,00000000-0000-0000-0000-000000000000},
{1,0},0,0},9,2,0,2,0,1,
{5,38a2bd79-81a8-456d-981f-b55d6bfa5fa5,4,1,2,
{6,77f470c0-df97-4932-99fa-c1eb91f65dbb,1,fbe38877-b914-4fd5-8540-07dde06ba2e1,
{6,3866864d-0692-4b09-a680-8b508bd581aa,1,abde0c9a-18a6-4e0c-bbaa-af26b911b3e6,
{1,9d0a2e40-b978-11d4-84b6-008048da06df,0},0},
{6,f820c250-3622-4363-a93a-d3927c2c6198,1,fbe38877-b914-4fd5-8540-07dde06ba2e1,
{6,2,00000000-0000-0000-0000-000000000000,142,
{1,0,357c6a54-357d-425d-a2bd-22f4f6e86c87,2147483647,0},0,1},0},
{6,1ac2e949-466a-428b-8eb3-dd3364ffc988,1,abde0c9a-18a6-4e0c-bbaa-af26b911b3e6,
{1,9d0a2e40-b978-11d4-84b6-008048da06df,0},0},1,
{5,b78f2e80-ec68-11d4-9dcf-0050bae2bc79,4,0,2,1ac2e949-466a-428b-8eb3-dd3364ffc988,
{1,0,357c6a54-357d-425d-a2bd-22f4f6e86c87,2147483647,0},0,1},0},1,
{5,b78f2e80-ec68-11d4-9dcf-0050bae2bc79,4,0,2,3866864d-0692-4b09-a680-8b508bd581aa,
{8,"Разделитель",0,1,
{1,0},0,38a2bd79-81a8-456d-981f-b55d6bfa5fa5,2,1e2,2,1,1,0,1,0,0},77f470c0-df97-4932-99fa-c1eb91f65dbb,
{1,0},0,38a2bd79-81a8-456d-981f-b55d6bfa5fa5,2,1e2,2,1,1,0,1,0,0},f820c250-3622-4363-a93a-d3927c2c6198,
{8,"ОсновныеДействияФормыЗакрыть",0,1,
{1,1,
{"ru","Закрыть"}
Expand Down Expand Up @@ -244,23 +244,23 @@
{0},0,0,0,48312c09-257f-4b29-b280-284dd89efc1e},
{1,0},0,0},13,
{1,1,
{"ru","Генерация данных для констант"}
{"ru","Генерация данных"}
},1,1,0,0,0,
{4,0,
{0},"",-1,-1,1,0,""},
{0,0,0},0,0,0,0,0},
{1,
{0,e1692cc2-605b-4535-84dd-28440238746c,
{3,"кнГенерацияДанныхДляКонстантНажатие",
{1,"кнГенерацияДанныхДляКонстантНажатие",
{3,"кнГенерацияДанных",
{1,"кнГенерацияДанных",
{1,1,
{"ru","Кн генерация данных для констант нажатие"}
{"ru","Кн генерация данных"}
},
{1,1,
{"ru","Кн генерация данных для констант нажатие"}
{"ru","Кн генерация данных"}
},
{1,1,
{"ru","Кн генерация данных для констант нажатие"}
{"ru","Кн генерация данных"}
},
{4,0,
{0},"",-1,-1,1,0,""},
Expand Down Expand Up @@ -1178,7 +1178,7 @@
{-18},0,0,0},
{1,0},0,0},29,0,0,0,0,0,0,0,0,0,1,0,0,10,0,0,4,0,
{"U"},
{"U"},"",0,1,0,0,0,0,
{"U"},"",1,1,0,0,0,0,
{4,0,
{0},"",-1,-1,1,0,""},
{4,0,
Expand Down Expand Up @@ -1332,7 +1332,7 @@
{-18},0,0,0},
{1,0},0,0},29,0,0,0,0,0,0,0,0,0,1,0,0,10,0,0,4,0,
{"U"},
{"U"},"",0,1,0,0,0,0,
{"U"},"",1,1,0,0,0,0,
{4,0,
{0},"",-1,-1,1,0,""},
{4,0,
Expand Down Expand Up @@ -1407,7 +1407,7 @@
{3,0,
{0},0,0,0,48312c09-257f-4b29-b280-284dd89efc1e},
{1,0},0,0},9,2,1,0,1,1,
{5,c3ed1a36-1a78-4de5-af21-f021e23c48fe,60,1,0,1,
{5,c3ed1a36-1a78-4de5-af21-f021e23c48fe,85,1,0,1,
{5,b78f2e80-ec68-11d4-9dcf-0050bae2bc79,4,0,0,
{0,0,
{0}
Expand Down Expand Up @@ -1701,7 +1701,7 @@ CYGcwWBPZwKqGvLSfenfygT8jsON3BLEihiIbw==},0}
{-18},0,0,0},
{1,0},0,0},29,0,0,0,0,0,0,0,0,0,1,0,0,10,0,0,4,0,
{"U"},
{"U"},"",0,1,0,0,0,0,
{"U"},"",1,1,0,0,0,0,
{4,0,
{0},"",-1,-1,1,0,""},
{4,0,
Expand Down Expand Up @@ -2120,7 +2120,7 @@ CYGcwWBPZwKqGvLSfenfygT8jsON3BLEihiIbw==},0}
{3,0,
{0},0,0,0,48312c09-257f-4b29-b280-284dd89efc1e},
{1,0},0,0},9,2,1,0,1,1,
{5,c3ed1a36-1a78-4de5-af21-f021e23c48fe,91,1,0,1,
{5,c3ed1a36-1a78-4de5-af21-f021e23c48fe,116,1,0,1,
{5,b78f2e80-ec68-11d4-9dcf-0050bae2bc79,4,0,0,
{0,0,
{0}
Expand Down Expand Up @@ -2377,7 +2377,7 @@ CYGcwWBPZwKqGvLSfenfygT8jsON3BLEihiIbw==},0}
{0}
}
}
},619,419,1,0,1,4,4,719},
},619,419,1,0,1,4,4,757},
{
{1},25,
{16,
Expand Down

Large diffs are not rendered by default.

Original file line number Diff line number Diff line change
@@ -0,0 +1,96 @@

&НаКлиенте
Процедура ГенерацияДанных(Команда)
Результат = ГенерацияДанныхНаСервере();

Данные = ПолучитьИзВременногоХранилища(Результат);

Текст = Новый ТекстовыйДокумент;
Текст.УстановитьТекст(Данные.Процедура);
Текст.Показать("Процедура");

Текст = Новый ТекстовыйДокумент;
Текст.УстановитьТекст(Данные.СписокТестов);
Текст.Показать("СписокТестов");

Для каждого ОписаниеМакета из Данные.МассивМакетов Цикл
Если СтрДлина(ОписаниеМакета.Макет.ПолучитьТекст()) > 3 Тогда
ОписаниеМакета.Макет.Показать(ОписаниеМакета.ИмяМакета);
КонецЕсли;
КонецЦикла;

КонецПроцедуры

&НаСервере
Функция ГенерацияДанныхНаСервере()
Результат = Новый Структура();
Результат.Вставить("ТекстОписанияТестов", "");
Результат.Вставить("ТекстПроцедурУстановитьКонстанты", "");

ОбъектНаСервере = РеквизитФормыВЗначение("Объект");

Если ВыгружатьКонстанты = Истина Тогда

МассивКонстантИсключений = Новый Массив;
МассивКонстантИсключений.Добавить("ИдентификаторИнформационнойБазы");
Данные = ОбъектНаСервере.СгенерироватьУстановкуКонстатнтxUnit(ПутьКГенераторуFixtures, МассивКонстантИсключений);
Возврат ПоместитьВоВременноеХранилище(Данные, ЭтаФорма.УникальныйИдентификатор);

//Результат =
КонецЕсли;

КонецФункции

&НаКлиенте
Процедура ПутьКГенераторуFixturesНачалоВыбора(Элемент, ДанныеВыбора, СтандартнаяОбработка)

ПараметрыВыбора = Новый Структура("Элемент", Элемент);
ПараметрыВыбора.Вставить("Значение", "ПутьКГенераторуFixtures");
СтандартнаяОбработка = Ложь;

Режим = РежимДиалогаВыбораФайла.Открытие;
ДиалогОткрытияФайла = Новый ДиалогВыбораФайла(Режим);
ДиалогОткрытияФайла.МножественныйВыбор = Ложь;
ДиалогОткрытияФайла.Фильтр = НСтр("en='External processing form files (*.epf, *.erf)|*.epf; *.erf'; ru='Файлы внешних обработок (*.epf, *.erf)|*.epf; *.erf'");
ДиалогОткрытияФайла.Заголовок = НСтр("en='Choose an external processing form file'; ru='Выберите файл с внешней обработкой'");
ДиалогОткрытияФайла.ПроверятьСуществованиеФайла = Истина;
ФайлКаталог = Новый Файл(ДанныеВыбора); Каталог = ?(ФайлКаталог.Существует(), ФайлКаталог.Путь, "");
Если Не ПустаяСтрока(Каталог) Тогда
ДиалогОткрытияФайла.Каталог = Каталог;
КонецЕсли;

Если ЕстьПоддержкаАсинхронныхВызовов Тогда
Оповещение = Вычислить("Новый ОписаниеОповещения(""ПослеВыбораФайла"", ЭтаФорма, ПараметрыВыбора)");
ДиалогОткрытияФайла.Показать(Оповещение);
ИначеЕсли ДиалогОткрытияФайла.Выбрать() Тогда
ПослеВыбораФайла(ДиалогОткрытияФайла.ВыбранныеФайлы, ПараметрыВыбора);
КонецЕсли;


КонецПроцедуры


&НаКлиенте
Процедура ПослеВыбораФайла(ВыбранныеФайлы, ПараметрыВыбора) Экспорт

Если ВыбранныеФайлы = Неопределено Тогда
Возврат;
КонецЕсли;

Если ВыбранныеФайлы.Количество() > 0 Тогда
ЭтаФорма[ПараметрыВыбора.Значение] = ВыбранныеФайлы.Получить(0);
КонецЕсли;

КонецПроцедуры



&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)

ЕстьПоддержкаАсинхронныхВызовов = Ложь;
Попытка
ЕстьПоддержкаАсинхронныхВызовов = Вычислить("Метаданные.РежимИспользованияСинхронныхВызововРасширенийИВнешнихКомпонент <> Метаданные.СвойстваОбъектов.РежимИспользованияСинхронныхВызововРасширенийИВнешнихКомпонент.Использовать");
Исключение; КонецПопытки;

КонецПроцедуры
Loading