Генератор кода 8.x (Управляемые и обычные формы)

Программирование - Практика программирования

Генератор кода справочник документ

132
Часто возникает необходимость написания кода, создающего новые элементы справочников, или новые объекты документов программно, например, при написании обмена данными. Я предлагаю обработку, которая при указании вида соответствующего справочника или документа, на основании метаданных конфигурации, последовательно перебирая реквизиты и табличные части, создаст болванку кода

Молочников Олег Spb. 2011.

Генератор кода.

 

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

Часто возникает необходимость написания кода, создающего новые элементы справочников, или новые объекты документов программно, например, при написании обмена данными.

Я предлагаю обработку, которая при указании вида соответствующего справочника на основании метаданных конфигурации, последовательно перебирая реквизиты и табличные части, создаст болванку кода наподобие следующего:

 

НовыйОбъект = Справочники.ВнешниеОбработки.СоздатьОбъект();
СтарыйОбъект = НовыйОбъект; // заглушка, поменяйте.
НовыйОбъект.ХранилищеВнешнейОбработки=неопределено; //Хранилище значения
НовыйОбъект.ВидОбработки=Перечисления.ВидыДополнительныхВнешнихОбработок.ПустаяСсылка(); //Виды дополнительных внешних обработок
НовыйОбъект.Комментарий=""; //Строка
НовыйОбъект.КомментарийКФайлуИсточнику=""; //Строка
//ЗаполнитьЗначенияСвойств(НовыйОбъект,СтарыйОбъект," ХранилищеВнешнейОбработки, ВидОбработки, Комментарий, КомментарийКФайлуИсточнику");


Для каждого СтараяСтрока из СтарыйОбъект.Принадлежность цикл
НоваяСтрока = НовыйОбъект.Принадлежность.Добавить();
НоваяСтрока.ПредставлениеОбъекта=""; //Строка
НоваяСтрока.СсылкаОбъекта=неопределено; //Все документы
НоваяСтрока.ТабличнаяЧастьИмя=""; //Строка
НоваяСтрока.ТабличнаяЧастьПредставление=""; //Строка
НоваяСтрока.НастройкиПостроителяДляОтбора=неопределено; //Хранилище значения
НоваяСтрока.ХранилищеВнешнейОбработки=неопределено; //Хранилище значения
НоваяСтрока.ЗаменяемаяПечатнаяФорма=неопределено; //Внешние обработки, Строка
НоваяСтрока.ИмяФайлаПечатнойФормы=""; //Строка
НоваяСтрока.ПредставлениеОтбораПостроителя=""; //Строка
НоваяСтрока.ПредставлениеКнопки=""; //Строка
НоваяСтрока.ДополнительныеПараметрыОбработки=неопределено; //Хранилище значения
НоваяСтрока.МетаданныеОбъекта=""; //Строка
НоваяСтрока.СпособЗапуска=Перечисления.СпособыЗапускаВнешнихОбработокВОтчетахНаБазеУниверсального.ПустаяСсылка(); //Способы запуска внешних обработок в отчетах на базе универсального
НоваяСтрока.ПредставлениеНастроекОбработки=""; //Строка
//ЗаполнитьЗначенияСвойств(НоваяСтрока,СтараяСтрока," ПредставлениеОбъекта, СсылкаОбъекта, ТабличнаяЧастьИмя, ТабличнаяЧастьПредставление, НастройкиПостроителяДляОтбора, ХранилищеВнешнейОбработки, ЗаменяемаяПечатнаяФорма, ИмяФайлаПечатнойФормы, ПредставлениеОтбораПостроителя, ПредставлениеКнопки, ДополнительныеПараметрыОбработки, МетаданныеОбъекта, СпособЗапуска, ПредставлениеНастроекОбработки");

КонецЦикла;
//НовыйОбъект.Принадлежность.Свернуть(" ПредставлениеОбъекта, СсылкаОбъекта, ТабличнаяЧастьИмя, ТабличнаяЧастьПредставление, НастройкиПостроителяДляОтбора, ХранилищеВнешнейОбработки, ЗаменяемаяПечатнаяФорма, ИмяФайлаПечатнойФормы, ПредставлениеОтбораПостроителя, ПредставлениеКнопки, ДополнительныеПараметрыОбработки, МетаданныеОбъекта, СпособЗапуска, ПредставлениеНастроекОбработки","");

А для документа  болванка будет выглядеть так:

 

НовыйДокумент = Документы.Доверенность.СоздатьДокумент();
СтарыйДокумент = НовыйДокумент; // заглушка, поменяйте.
НовыйДокумент.Дата='00010101000000'; //Дата документа
НовыйДокумент.Номер=""; //Номер документа
НовыйДокумент.Организация=Справочники.Организации.ПустаяСсылка(); //Организация
НовыйДокумент.ФизЛицо=Справочники.ФизическиеЛица.ПустаяСсылка(); //Физические лица
НовыйДокумент.БанковскийСчетОрганизации=Справочники.БанковскиеСчета.ПустаяСсылка(); //Банковский счет
НовыйДокумент.Контрагент=Справочники.Контрагенты.ПустаяСсылка(); //Контрагент
НовыйДокумент.ДоговорКонтрагента=Справочники.ДоговорыКонтрагентов.ПустаяСсылка(); //Договор контрагента
НовыйДокумент.Сделка=неопределено; //Счет на оплату поставщика, Заказ поставщику, Заказ покупателя, Счет на оплату покупателю
НовыйДокумент.ДатаДействия='00010101000000'; //Дата
НовыйДокумент.НаПолучениеОт=""; //Строка
НовыйДокумент.ПоДокументу=""; //Строка
НовыйДокумент.Подразделение=Справочники.Подразделения.ПустаяСсылка(); //Подразделение
НовыйДокумент.Комментарий=""; //Строка
НовыйДокумент.Ответственный=Справочники.Пользователи.ПустаяСсылка(); //Пользователь
//ЗаполнитьЗначенияСвойств(НовыйДокумент,СтарыйДокумент," Организация, ФизЛицо, БанковскийСчетОрганизации, Контрагент, ДоговорКонтрагента, Сделка, ДатаДействия, НаПолучениеОт, ПоДокументу, Подразделение, Комментарий, Ответственный");


Для каждого СтараяСтрока из СтарыйДокумент.Товары цикл
НоваяСтрока = НовыйДокумент.Товары.Добавить();
НоваяСтрока.НаименованиеТовара=""; //Строка
НоваяСтрока.ЕдиницаПоКлассификатору=Справочники.КлассификаторЕдиницИзмерения.ПустаяСсылка(); //Классификатор единиц измерения
НоваяСтрока.Количество=0; //Число
//ЗаполнитьЗначенияСвойств(НоваяСтрока,СтараяСтрока," НаименованиеТовара, ЕдиницаПоКлассификатору, Количество");

КонецЦикла;
//НовыйДокумент.Товары.Свернуть(" НаименованиеТовара, ЕдиницаПоКлассификатору, Количество","");

 

После чего программисту остается лишь удалить лишний для него код, и заменить «неопределено” на фактические значения. Только что с помощью этого генератора за 16 минут ( с отладкой)  создал код для формирования трех документов давальческой схемы при выгрузке в бухгалтерию.

АкцияВы можете скачать эту разработку в  составе архива всех моих разработок, которые я предлагаю за StartMone, по Специальной  цене:  //infostart.ru/public/960899/#archive

Обновление от 15.02.2017

Добавил управляемую форму

Обновление от 21.06.2012

Теперь вместо 'неопределено' реквизитам присваивается пустое значение типа.  Что позволяет сэкономить еще некотрое количества времени при написании кода.

Для документов добавились "Дата" и "Номер".

PS: Надеюсь вам понравится эта и другие мои разработки на //infostart.ru/profile/48714/.

Очень жду ваших комментариев  и пожеланий.

Молочников Олег Spb. 2011.

 

132

Скачать файлы

Наименование Файл Версия Размер
ГенераторКода 8.2 8.3
.epf 20,80Kb
15.02.17
366
.epf 1.3 20,80Kb 366 Скачать
ГенераторКода81
.epf 15,09Kb
21.06.12
40
.epf 15,09Kb 40 Скачать

См. также

Специальные предложения

Комментарии
Избранное Подписка Сортировка: Древо
1. NovSL 9 30.09.11 13:43 Сейчас в теме
До OpenConf 7-го далеко, но все же приятно использовать
ВадимЛитовченко; mdzen; +2 Ответить
2. cool.vlad4 43 30.09.11 13:44 Сейчас в теме
это можно в консоль кода или в запросник добавить...
3. milkers 2098 30.09.11 13:52 Сейчас в теме
(3) У меня есть некоторые планы по развитию этой темы. Сложно развивать чужие проекты
ВадимЛитовченко; +1 Ответить
4. DragonAgo 12 30.09.11 16:08 Сейчас в теме
Интересная обработка
ВадимЛитовченко; +1 Ответить
5. fishca 1132 30.09.11 16:11 Сейчас в теме
(0)Лень-двигатель прогресса! Спасибо!
6. anig99 2656 30.09.11 20:59 Сейчас в теме
текстовое поле на форме можно сделать типом Программный код (или как-то так), тогда текст будет раскрашиваться
ВадимЛитовченко; echo77; +2 Ответить
7. shisha136 01.10.11 12:56 Сейчас в теме
А что делать начинающим программистам? Совсем отупеют! Либо не быть им хорошими программистами =)
ВадимЛитовченко; +1 Ответить
8. K_A_O 515 01.10.11 13:05 Сейчас в теме
Более интересный набор конструкторов есть в обработке "Консоль выполнения произвольных текстов модуля"
http://infostart.ru/public/61601/
ВадимЛитовченко; tomvlad; Yasen; Арчибальд; +4 Ответить
9. Rustig 1037 01.10.11 14:22 Сейчас в теме
(0) классная вещь! хороший инструмент! отличная идея!
спасибо! :)
пригодится не только при обменах!
ВадимЛитовченко; +1 Ответить
10. artbear 1103 01.10.11 14:41 Сейчас в теме
Подобный код уже сейчас можно вставлять прямо в Конфигураторе с помощью проекта Снегопат www.snegopat.ru
Всем рекомендую
ЗЫ дело за малым - написать скрипт для Снегопата, вставляющий подобный код прямо в открытое окно.
ИМХО не должно быть сложно, т.к. фактически очень много из кода 1С доступно для выполнения в скриптах.
ВадимЛитовченко; sound; JohnyDeath; +3 Ответить
11. cool.vlad4 43 01.10.11 14:59 Сейчас в теме
(10) Артур может стоит подробнее описать(статью) snegopat? Уже не первый раз слышу, в принципе и на сайте был, и запускал...
13. artbear 1103 01.10.11 15:13 Сейчас в теме
(11) Пока что Снегопат на стадии тестирования, в открытую продажу еще не вышел.
Поэтому пока не создаю подобную публикацию.
В будущем у меня публикация запланирована, если автор, Саша Орефков, сам не выложит на сайт.
ИМХО он наверняка это сделает после выхода релиза, тем более, что это несложно - скопировать HTML со своего сайта на ИС.
ЗЫ Кучу фич уже юзаем :)

(12) У меня есть такая публикация :) Правда, давненько не обновлял :(
12. cool.vlad4 43 01.10.11 15:01 Сейчас в теме
Вообще неплохо бы как-то аккумулировать мысли по поводу кодинга, где-нибудь на форуме/блоге...
ВадимЛитовченко; +1 Ответить
14. WKBAPKA 194 01.10.11 15:15 Сейчас в теме
ну не знаю, где это может пригодиться...
для типовых не подходит...
для конфигураций с нуля, я сторонник унификации, лучше один раз потратить время, написать общие процедуры по заполнению параметров новых документов!
для обмена через СОМ, может быть, но код в этом случае достаточно специфичен, требует написания дополнительных функций... так что в чем полезность данной идеи не понимаю!
ВадимЛитовченко; +1 Ответить
15. vl88 01.10.11 16:59 Сейчас в теме
шикарный конструктор!
ВадимЛитовченко; +1 Ответить
16. KliMich 01.10.11 20:59 Сейчас в теме
Хорошая предпосылка для создания OpenConf для 8-ки!
ВадимЛитовченко; +1 Ответить
17. Rustig 1037 02.10.11 16:27 Сейчас в теме
(0) корректура кода для улучшений :)

Процедура ТипДанныхПриИзменении(Элемент)
	
	ВидДанных = Неопределено;	
	
	СписокОбъектовМетаданных = Новый СписокЗначений;
	
	Для Каждого МетаданныеДокумент Из Метаданные[ТипДанных] Цикл
		СписокОбъектовМетаданных.Добавить(МетаданныеДокумент.Имя, МетаданныеДокумент.Синоним);
	КонецЦикла;
	
	ЭлементыФормы.ВидДанных.СписокВыбора = СписокОбъектовМетаданных;
	
КонецПроцедуры
Показать


Далее, ставим галочку в Палитре свойств у Элемента формы "ВидДанных" на закладке Использование для параметра "РежимВыбораИзСписка". Это для быстрого поиска объекта: после набора первых символов названия объекта и нажатия Enter в поле ввода "Вид данных".
18. Rustig 1037 02.10.11 17:04 Сейчас в теме
(0) Начал использовать сей инструмент, задался вопросом: а тип "Виды поступлений товаров" - это справочник или перечисление? И тогда родилось ... предложение по расширению функциоанала:

я вместо кода
 + Реквизит.Тип 


записал так
 + ОпределитьТипЗначения(Тип) 


а функцию определил так
Функция ОпределитьТипЗначения(Тип) Экспорт
	
	СоставТипов = "";
	
	МассивТипов = Тип.Типы();
	Если МассивТипов.Количество() = 1 Тогда
		
		Если Справочники.ТипВсеСсылки().СодержитТип(МассивТипов[0]) Тогда
			СоставТипов = "Справочник ";
		ИначеЕсли Документы.ТипВсеСсылки().СодержитТип(МассивТипов[0]) Тогда
			СоставТипов = "Документ ";
		ИначеЕсли Перечисления.ТипВсеСсылки().СодержитТип(МассивТипов[0]) Тогда
			СоставТипов = "Перечисление ";
		КонецЕсли;	
		
		Возврат СоставТипов + Тип;
		
	Иначе //составной тип данных
		
		Для Каждого Эл Из МассивТипов Цикл
			
			Если Справочники.ТипВсеСсылки().СодержитТип(Эл) Тогда
				СоставТипов = СоставТипов + " Справочник " + Эл + ",";
			ИначеЕсли Документы.ТипВсеСсылки().СодержитТип(Эл) Тогда
				СоставТипов = СоставТипов + " Документ " + Эл + ",";
			ИначеЕсли Перечисления.ТипВсеСсылки().СодержитТип(Эл) Тогда
				СоставТипов = СоставТипов + " Перечисление " + Эл + ",";
			Иначе
				СоставТипов = СоставТипов + " " + Эл + ",";
			КонецЕсли;	 
			
		КонецЦикла;
		
		Возврат СоставТипов;
		
	КонецЕсли;
	
КонецФункции
Показать


Далее, если использовать КвалификаторыСтроки и КвалификаторыЧисла, можно вытащить длину строки или формат числа для примитивных типов.
19. Rustig 1037 02.10.11 17:09 Сейчас в теме
(0) вообще мне такой инструмент не хватал при написании алгоритмов проведения документов по регистрам... теперь я думаю вопрос только во времени, когда я это реализую (или кто-нибудь другой :))
и еще, что-то подобное я использовал, когда алгоритмы 7.7 переводил в алгоритмы 8.1 и наоборот. написал для этих целей конвертор строк кода. думаю эту тему можно будет развить в текущем функционале. опять-таки вопрос времени
20. CaSH_2004 349 02.10.11 19:12 Сейчас в теме
Из предложений:
- возможноость выбирать таб части
- обрабатывать не только док. и спр. но и все регистры с их особенностями
ИМХО конечно, но если рассуждать логически правильнее было бы добавить свой функционал в разработку http://infostart.ru/public/61601, она действительно будет пофункциональнее, а плодить кучу разработок как-то неправльно. Ведь каждая получается в чем-то уникальная, хотя и одной тематики. Вот и приходится всем один и тот же вилосипед изобретать, разного цвета, вместо того чтобы взять его и перекрасить :)
22. Rustig 1037 02.10.11 23:06 Сейчас в теме
(20) кто-нибудь может выложить ссылки на все обработки, которые он использует в своей практике? :) тогда махом закроются все вопросы по поводу изобретения велосипеда. ведь цель текущей публикации - это обмен опытом в части рабочих инструментов программиста-разработчика. :)
я попробую:
http://infostart.ru/public/19821/ - структура таблиц в базе
http://infostart.ru/public/22147/ - декомпиляция и анализ форм с генерацией кода формы
http://infostart.ru/public/89310/ - шаблоны с возможностью поиска и отбора по ключевым словам
http://infostart.ru/public/15782/ - конструктор параметров командной строки

:) так что, друзья-разработчики, пишите еще

П.С. Посмотрел - сравнил - и ответственно заявляю :) , что текущая разработка отличается от того, что предлагает обработка http://infostart.ru/public/61601/
23. CaSH_2004 349 03.10.11 00:30 Сейчас в теме
(22) Да было бы неплохо выложить все, да вот только к сожалению бесполезно это, т.к. рейтинг обновляется и статья через 1-2 месяца не будет висеть. Тут нужен инструмент на сайте чтобы видны были такие обработки. Хотя можно пользоваться фильтрами.

Да http://infostart.ru/public/61601/ отличается, но не так значительно как перечисленные тобой обработки, там те же конструкторы и то же формирование кода, поэтому логичнее включить данную разработку в ее функционал, например как продолжение проекта

В копилку обработок для программистов 8-ков я бы добавил:
http://infostart.ru/public/15317/ - Power Explorer, один из первых комбайнов, я до сих пор в основном им пользуюсь
http://infostart.ru/public/15324 - Интерфейсная панель
http://infostart.ru/public/69707/ - Универсальный журнал документов, до сих пор развивается!
http://infostart.ru/public/16332/ - WindowsПроводник 1.3, просто отличный пример что может 1С без компонент, не пользуюсь, но любуюсь :) можно брать как пример и не городить заново аналоги
21. Rustig 1037 02.10.11 22:34 Сейчас в теме
(0) для болванки создания документов надо добавить обязательный к заполнению реквизит "Дата" документа.
:)
24. Yashazz 2323 03.10.11 11:17 Сейчас в теме
Бесполезная вещь, как все слишком универсальные конструкторы. Трудозатраты на доработку напильником "по месту" приблизительно равны тем, какие были бы в случае создания "с нуля". Элементарный копипаст - наше всё.
25. milkers 2098 03.10.11 12:19 Сейчас в теме
Какой функционал Вы хотели бы добавить в следующих версиях? Я вижу несколько направлений:
1) Генерация кода для различных операций с таблицами. (Создание, поиск, удаление и т.д.)
2) Генерация вызовов отчетов расшифровок с заданными отборами, группировками и другими настройками.
И добро пожаловать в соответствующую ветку форума: Какой функционал Вы хотели бы добавить в следующих версиях?
43. e.kogan 1839 07.02.12 11:03 Сейчас в теме
(25) Возможность вместо Неопределено для всех монотипных реквизитов подставлять пустое значение типа. Ссылочные - ПустойСсылкой(), простые - соответственно типу.
26. itar59 87 03.10.11 13:13 Сейчас в теме
milkers пишет:

Какой функционал Вы хотели бы добавить в следующих версиях? Я вижу несколько направлений:

1) Генерация кода для различных операций с таблицами. (Создание, поиск, удаление и т.д.)

2) Генерация вызовов отчетов расшифровок с заданными отборами, группировками и другими настройками.

И добро пожаловать в соответствующую ветку форума: Какой функционал Вы хотели бы добавить в следующих версиях?



Совершенно согласен!!!
27. smok1986 31 03.10.11 14:06 Сейчас в теме
Спасибо огромное за грамотную, нужную и полезную вещь!!!
28. andrybar 324 03.10.11 15:58 Сейчас в теме
Полезная штучка. сэкономит немало времени. А время, как говорится, деньги, тем более для кодеров.
29. vint2008 03.10.11 17:37 Сейчас в теме
Полезная штука пригодилась неоднократно :)
30. g1s3s6 04.10.11 08:35 Сейчас в теме
31. YAN 1370 04.10.11 11:16 Сейчас в теме
32. Qseft 05.10.11 15:57 Сейчас в теме
Собрать бы все конструкторы (Ваш, конструктор ТаблицыЗначений и т.д.) в единый инструмент, было бы удобно.
47. vec435 15 27.06.12 12:02 Сейчас в теме
(32) Qseft, было бы удобно создать некий шаблон, в котором подключаешь обработку тз от одного автора, генератор кода от другого. Не понравился от этого, подключил от другого. Но для этого нужно согласовать шаблон подключения, я думаю
33. milkers 2098 05.10.11 16:00 Сейчас в теме
(0)(32) Я планирую добавить конструктор ТЗ в собственной редакции в ближайшее время.
34. milkers 2098 08.10.11 21:28 Сейчас в теме
(0) 2011-10-08 Было немножко свободного времени - сделал генерацию кода цветной.
35. dimanich70 194 13.10.11 19:26 Сейчас в теме
Коль уж создается новый документ, добавить в конце "Записать и т.д." через Попытка и т.д.
36. Noy12 19.10.11 13:32 Сейчас в теме
37. mtv:) 993 21.10.11 20:42 Сейчас в теме
(0) Наконец-то генерация кода стала цветной. Теперь можно скачать и попробовать.
Спасибо.
Хотя, может стоит дождаться "Конструктор ТЗ в собственной редакции"? :)
38. napan 11 24.10.11 19:57 Сейчас в теме
Хорошая и очень полезная вещь. Спасибо автору.Мне точно пригодиться!!!
39. testy05 26.10.11 15:41 Сейчас в теме
40. opiumdx 31.10.11 07:27 Сейчас в теме
41. itsimpossible 13.11.11 18:39 Сейчас в теме
Интересная весч, попробуем
42. orefkov 1958 08.12.11 11:34 Сейчас в теме
Портирование под Снегопат начато, вот первая проба
cool.vlad4; +1 Ответить
44. CaSH_2004 349 07.03.12 15:25 Сейчас в теме
Несмотря на Снегопат решил развить идею, и не только я:
http://infostart.ru/public/119748/ - жто моедополнение, но и оно написано на чужое дополнение к данной обработке:
http://infostart.ru/public/92872/
45. fixin 3791 29.03.12 22:39 Сейчас в теме
Изучать всё долго. Вброшу - а кто-нибудь догадался написать код, где выбираешь нужные существующие элементы справочника или докумнта, а он генерит код по их созданию????
53. AlexO 126 17.10.13 01:29 Сейчас в теме
(45) fixin,
а кто-нибудь догадался написать код, где выбираешь нужные существующие элементы справочника или докумнта, а он генерит код по их созданию????

Так а развитие идеи от CaSH_2004 от ( 45) не это делает?
(47) vec435,
было бы удобно создать некий шаблон, в котором подключаешь обработку тз от одного автора, генератор кода от другого.
Чьи обработки вы хотели бы так подключать?
(50) romann,
А то всё время приходится ручками.. или, в лучшем случае, копипастить откуда-нибудь.
Вы только новые объекты в конфе все время создаете? :)
48. maxx 660 01.08.12 12:49 Сейчас в теме
Приятная штука.

Хорошо еще бы добавить шаблоны:

1.) Для документов событие "Обработка проведения" заполнение регистров сопоставляя имена, типа как делает сейчас конструктор, для событие ОбработкаЗаполнения - как бы если один документ заполнялся другим (даже если ввода на основании в конфигураторе не указан документ)

2.) Для регистров прописывание набор записей во все регистры независимо программно

3.) Шаблон для справочников для прописывания значения в регистры сведений независимые, если Справочник участвует в Измерение как Ведущее
49. milkers 2098 01.08.12 13:03 Сейчас в теме
(48) Хорошие мысли. Надо добавить. Только со временем совсем напряг.
50. romann 11.09.12 17:07 Сейчас в теме
Полезная вещь. А то всё время приходится ручками.. или, в лучшем случае, копипастить откуда-нибудь.
Спасибо!
51. eugen91 06.12.12 15:41 Сейчас в теме
Спасибо! Хороша обработка. Воспользовался вашим механизмом!
52. It-developer 20 05.09.13 14:56 Сейчас в теме
55. yura1960 15.06.14 11:01 Сейчас в теме
Что-то подобное уже есть, но с более расширенным функционалом, где указывается объект, а потом проставляешь галочки, что тебе нужно и ... И там же можно связывать объекты.
Кажется я это здесь видел. К сожалению ссылки нет (((
56. milkers 2098 15.02.17 16:25 Сейчас в теме
(0) Обновление от 15.02.2017

Добавил поддержку управляемых форм
Оставьте свое сообщение