Вход | Регистрация

1С:Предприятие ::

Метки:справочники

Копирование эл.справочника с подчиненными

Я
   Bzzzzz
 
14.05.04 - 13:56
В 1С 7.7 можно интерактивно скопировать эл.справочника с его подчиненными элементами, так сказать "легкими нажатием на кнопку панели инструментов". А программно?
 
 
   lexa
 
1 - 14.05.04 - 14:01
Посмотри какую процедуру вызывает кнопка копировать (если она есть) и процедуру ВводНового() в форме справочника
   Bzzzzz
 
3 - 14.05.04 - 14:13
(2) Читал когда-то. А щаз нужно получить ответ на вопрос. Метода Спр.Скопировать() не нашел ;-). Если можешь ответить, ответь пжл. А нет, так нет.
   Valery
 
4 - 14.05.04 - 14:17
Если копирование "легкими нажатием на кнопку панели инструментов" имеется ввиду F9,то программно см. модуль формы справочника предопределенная процедура "приКопировании"
   Bzzzzz
 
5 - 14.05.04 - 14:20
(4) Такой процедуры нет. Есть ВводНового, но она вызывается только при интерактивном копировании и туда передается скопированный объект.
   lexa
 
6 - 14.05.04 - 14:57
ЭлементСправочника.Реквизит1 = ВремРеквизит1;
Спр = СоздатьОбъект("Справочник.НужныйСправочник");
СпрПодч = СоздатьОбъект("Справочник.ПодчСправочник");
СпрПодч.ИспользоватьВладельца(ЭлементСправочника);
СпрПодч.ВыбратьЭлементы();
ВремПодч = "";
Пока СпрПодч.ПолучитьЭлемент = 1 Цикл
     ВремПодч = СпрПодч.ТекущийЭлемент()
КонецЦикла;
Спр.Новый();
Спр.Реквизит1 = ВремРеквизит1;
Спр.Записать();
Если ПустоеЗначение(ВремПодч) = 0 Тогда
     СпрПодч.ИспользоватьВладельца(Спр.ТекущийЭлемент());
     СпрПодч.Новый();
     СпрПодч.Реквизит1 =  ВремПодч.Реквизит1;
     СпрПодч.Записать();
КонецЕсли;
   427
 
9 - 14.05.04 - 15:36
Ну насчет кучи ты загнул.....
Копирование вместе с подчиненными - универсальная процедура )для любого справочника вместе с подчиненными ... примерно 50 строк кода ....
   Bzzzzz
 
10 - 14.05.04 - 15:51
(9) Ну, согласись это тебе не Спр.Копировать(СпрНов);  :*)
Просто, не хотелось "мудиться"
 
  Рекламное место пустует
   iceTiger
11 - 14.05.04 - 15:56
А вообще можно и через метаданные, там и подчиненные справочники, и их реквизиты.... усе шо хочешь.
   Bzzzzz
 
12 - 14.05.04 - 16:10
(11) Как через метаданные получить все спр, подчиненные данному, без перебора?
   Gavrila
 
13 - 14.05.04 - 17:01
(12) Никак помойму, а чем перебор не устраивает?
   Bzzzzz
 
14 - 14.05.04 - 17:31
(13)Да устраивает. Я его и использовал. Просто хотел узнать - может есть способ эффективнее.
Например, для поиска эл.спр по Коду ты можешь использовать перебор, а можешь НайтиПоКоду  :-))


Список тем форума
Рекламное место пустует   Рекламное место пустует
ВНИМАНИЕ! Если вы потеряли окно ввода сообщения, нажмите Ctrl-F5 или Ctrl-R или кнопку "Обновить" в браузере.
Ветка сдана в архив. Добавление сообщений невозможно.
Но вы можете создать новую ветку и вам обязательно ответят!
Каждый час на Волшебном форуме бывает более 2000 человек.
Рекламное место пустует