Имя: Пароль:
1C
1С v8
Дополнительные реквизиты в справочник контрагентов
0 OptimusMaximus
 
29.04.15
16:22
не нашел примера удалось сделать самому

&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
    СпрКнт=Справочники.НаборыДополнительныхРеквизитовИСведений.Справочник_Контрагенты;

    НовыйМассив    = Новый Массив;
    НовыйМассив.Добавить(Тип("СправочникСсылка.Контрагенты"));
    НовыйТип = новый ОписаниеТипов(НовыйМассив);
    
    НовыйРеквизит=ПланыВидовХарактеристик.ДополнительныеРеквизитыИСведения.СоздатьЭлемент();
    НовыйРеквизит.ТипЗначения    =    НовыйТип;
    НовыйРеквизит.НаборСвойств    =    СпрКнт;
    НовыйРеквизит.Заголовок        =    "Основной контрагент.XXL";
    НовыйРеквизит.Наименование    =    НовыйРеквизит.Заголовок + " (" + НовыйРеквизит.НаборСвойств + ")";
    НовыйРеквизит.Записать();    
    
    Спр        =    СпрКнт.ПолучитьОбъект();
    Строка    =    Спр.ДополнительныеРеквизиты.Добавить();
    Строка.Свойство    =    НовыйРеквизит.Ссылка;
    Спр.Записать();

КонецПроцедуры
1 Лефмихалыч
 
29.04.15
16:23
(0) вы жалуетесь или хвастаетесь?
2 Господин ПЖ
 
29.04.15
16:24
ПриСозданииНаСервере

готично...
3 OptimusMaximus
 
29.04.15
16:40
не просто понял как добавить, чтобы осталось на мисте для последователей написал в тему
4 ДенисЧ
 
29.04.15
16:41
Мда...
Главное - больше одного раза не открывать форму!...
5 piter3
 
29.04.15
16:42
автор а кто на сервере будет смотреть вашу форму не задумывались
Здесь можно обсудить любую тему при этом оставаясь на форуме для 1Сников, который нужен для работы. Ymryn