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

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

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

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

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

 

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

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

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

 

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

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

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

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

 

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

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

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

 

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

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

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

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

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

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

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

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

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

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

 

54 Comments

  1. NovSL

    До OpenConf 7-го далеко, но все же приятно использовать

    Reply ↓
  2. cool.vlad4

    это можно в консоль кода или в запросник добавить…

    Reply ↓
  3. milkers

    (3) У меня есть некоторые планы по развитию этой темы. Сложно развивать чужие проекты

    Reply ↓
  4. DragonAgo

    Интересная обработка

    Reply ↓
  5. fishca

    (0)Лень-двигатель прогресса! Спасибо!

    Reply ↓
  6. anig99

    текстовое поле на форме можно сделать типом Программный код (или как-то так), тогда текст будет раскрашиваться

    Reply ↓
  7. shisha136

    А что делать начинающим программистам? Совсем отупеют! Либо не быть им хорошими программистами =)

    Reply ↓
  8. K_A_O

    Более интересный набор конструкторов есть в обработке «Консоль выполнения произвольных текстов модуля»

    http://infostart.ru/public/61601/

    Reply ↓
  9. Rustig

    (0) классная вещь! хороший инструмент! отличная идея!

    спасибо! 🙂

    пригодится не только при обменах!

    Reply ↓
  10. artbear

    Подобный код уже сейчас можно вставлять прямо в Конфигураторе с помощью проекта Снегопат http://www.snegopat.ru

    Всем рекомендую

    ЗЫ дело за малым — написать скрипт для Снегопата, вставляющий подобный код прямо в открытое окно.

    ИМХО не должно быть сложно, т.к. фактически очень много из кода 1С доступно для выполнения в скриптах.

    Reply ↓
  11. cool.vlad4

    (10) Артур может стоит подробнее описать(статью) snegopat? Уже не первый раз слышу, в принципе и на сайте был, и запускал…

    Reply ↓
  12. cool.vlad4

    Вообще неплохо бы как-то аккумулировать мысли по поводу кодинга, где-нибудь на форуме/блоге…

    Reply ↓
  13. artbear

    (11) Пока что Снегопат на стадии тестирования, в открытую продажу еще не вышел.

    Поэтому пока не создаю подобную публикацию.

    В будущем у меня публикация запланирована, если автор, Саша Орефков, сам не выложит на сайт.

    ИМХО он наверняка это сделает после выхода релиза, тем более, что это несложно — скопировать HTML со своего сайта на ИС.

    ЗЫ Кучу фич уже юзаем 🙂

    (12) У меня есть такая публикация 🙂 Правда, давненько не обновлял 🙁

    Reply ↓
  14. WKBAPKA

    ну не знаю, где это может пригодиться…

    для типовых не подходит…

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

    для обмена через СОМ, может быть, но код в этом случае достаточно специфичен, требует написания дополнительных функций… так что в чем полезность данной идеи не понимаю!

    Reply ↓
  15. vl88

    шикарный конструктор!

    Reply ↓
  16. KliMich

    Хорошая предпосылка для создания OpenConf для 8-ки!

    Reply ↓
  17. Rustig

    (0) корректура кода для улучшений 🙂

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

    Показать

    Далее, ставим галочку в Палитре свойств у Элемента формы «ВидДанных» на закладке Использование для параметра «РежимВыбораИзСписка». Это для быстрого поиска объекта: после набора первых символов названия объекта и нажатия Enter в поле ввода «Вид данных».

    Reply ↓
  18. Rustig

    (0) Начал использовать сей инструмент, задался вопросом: а тип «Виды поступлений товаров» — это справочник или перечисление? И тогда родилось … предложение по расширению функциоанала:

    я вместо кода

     + Реквизит.Тип 

    записал так

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

    а функцию определил так

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

    Показать

    Далее, если использовать КвалификаторыСтроки и КвалификаторыЧисла, можно вытащить длину строки или формат числа для примитивных типов.

    Reply ↓
  19. Rustig

    (0) вообще мне такой инструмент не хватал при написании алгоритмов проведения документов по регистрам… теперь я думаю вопрос только во времени, когда я это реализую (или кто-нибудь другой :))

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

    Reply ↓
  20. CaSH_2004

    Из предложений:

    — возможноость выбирать таб части

    — обрабатывать не только док. и спр. но и все регистры с их особенностями

    ИМХО конечно, но если рассуждать логически правильнее было бы добавить свой функционал в разработку http://infostart.ru/public/61601, она действительно будет пофункциональнее, а плодить кучу разработок как-то неправльно. Ведь каждая получается в чем-то уникальная, хотя и одной тематики. Вот и приходится всем один и тот же вилосипед изобретать, разного цвета, вместо того чтобы взять его и перекрасить 🙂

    Reply ↓
  21. Rustig

    (0) для болванки создания документов надо добавить обязательный к заполнению реквизит «Дата» документа.

    🙂

    Reply ↓
  22. Rustig

    (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/

    Reply ↓
  23. CaSH_2004

    (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С без компонент, не пользуюсь, но любуюсь 🙂 можно брать как пример и не городить заново аналоги

    Reply ↓
  24. Yashazz

    Бесполезная вещь, как все слишком универсальные конструкторы. Трудозатраты на доработку напильником «по месту» приблизительно равны тем, какие были бы в случае создания «с нуля». Элементарный копипаст — наше всё.

    Reply ↓
  25. milkers

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

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

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

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

    Reply ↓
  26. itar59
    milkers пишет:

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

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

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

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

    Совершенно согласен!!!

    Reply ↓
  27. smok1986

    Спасибо огромное за грамотную, нужную и полезную вещь!!!

    Reply ↓
  28. andrybar

    Полезная штучка. сэкономит немало времени. А время, как говорится, деньги, тем более для кодеров.

    Reply ↓
  29. vint2008

    Полезная штука пригодилась неоднократно 🙂

    Reply ↓
  30. g1s3s6

    помоему крутая штука

    Reply ↓
  31. YAN

    Спасибо за идею!

    Reply ↓
  32. Qseft

    Собрать бы все конструкторы (Ваш, конструктор ТаблицыЗначений и т.д.) в единый инструмент, было бы удобно.

    Reply ↓
  33. milkers

    (0)(32) Я планирую добавить конструктор ТЗ в собственной редакции в ближайшее время.

    Reply ↓
  34. milkers

    (0) 2011-10-08 Было немножко свободного времени — сделал генерацию кода цветной.

    Reply ↓
  35. dimanich70

    Коль уж создается новый документ, добавить в конце «Записать и т.д.» через Попытка и т.д.

    Reply ↓
  36. Noy12

    очень полезно. спасибо

    Reply ↓
  37. mtv:)

    (0) Наконец-то генерация кода стала цветной. Теперь можно скачать и попробовать.

    Спасибо.

    Хотя, может стоит дождаться «Конструктор ТЗ в собственной редакции»? 🙂

    Reply ↓
  38. napan

    Хорошая и очень полезная вещь. Спасибо автору.Мне точно пригодиться!!!

    Reply ↓
  39. testy05

    Полезно. спасибо!!

    Reply ↓
  40. opiumdx

    Спасибо, интересно.

    Reply ↓
  41. itsimpossible

    Интересная весч, попробуем

    Reply ↓
  42. orefkov

    Портирование под Снегопат начато, вот первая проба

    Reply ↓
  43. e.kogan

    (25) Возможность вместо Неопределено для всех монотипных реквизитов подставлять пустое значение типа. Ссылочные — ПустойСсылкой(), простые — соответственно типу.

    Reply ↓
  44. CaSH_2004

    Несмотря на Снегопат решил развить идею, и не только я:

    http://infostart.ru/public/119748/ — жто моедополнение, но и оно написано на чужое дополнение к данной обработке:

    http://infostart.ru/public/92872/

    Reply ↓
  45. fixin

    Изучать всё долго. Вброшу — а кто-нибудь догадался написать код, где выбираешь нужные существующие элементы справочника или докумнта, а он генерит код по их созданию????

    Reply ↓
  46. vec435

    (32) Qseft, было бы удобно создать некий шаблон, в котором подключаешь обработку тз от одного автора, генератор кода от другого. Не понравился от этого, подключил от другого. Но для этого нужно согласовать шаблон подключения, я думаю

    Reply ↓
  47. maxx

    Приятная штука.

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

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

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

    3.) Шаблон для справочников для прописывания значения в регистры сведений независимые, если Справочник участвует в Измерение как Ведущее

    Reply ↓
  48. milkers

    (48) Хорошие мысли. Надо добавить. Только со временем совсем напряг.

    Reply ↓
  49. romann

    Полезная вещь. А то всё время приходится ручками.. или, в лучшем случае, копипастить откуда-нибудь.

    Спасибо!

    Reply ↓
  50. eugen91

    Спасибо! Хороша обработка. Воспользовался вашим механизмом!

    Reply ↓
  51. It-developer

    Прикольно

    Reply ↓
  52. AlexO

    (45) fixin,

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

    Так а развитие идеи от CaSH_2004 от ( 45) не это делает?

    (47) vec435,

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

    Чьи обработки вы хотели бы так подключать?

    (50) romann,

    А то всё время приходится ручками.. или, в лучшем случае, копипастить откуда-нибудь.

    Вы только новые объекты в конфе все время создаете? 🙂

    Reply ↓
  53. yura1960

    Что-то подобное уже есть, но с более расширенным функционалом, где указывается объект, а потом проставляешь галочки, что тебе нужно и … И там же можно связывать объекты.

    Кажется я это здесь видел. К сожалению ссылки нет (((

    Reply ↓
  54. milkers

    (0) Обновление от 15.02.2017

    Добавил поддержку управляемых форм

    Reply ↓

Leave a Comment

Ваш адрес email не будет опубликован. Обязательные поля помечены *