Имя: Пароль:
1C
1С v8
Как узнать движений документа
0 мистер игрек
 
04.05.12
14:35
Для Каждого Рег Из Документ.Метаданные().Движения Цикл
       СтрТЧ = Регистры.Добавить();
       СтрТЧ.Регистр  = Рег.Имя;
       // Вот здесь как указать, что тип регистра: регистр накопления или регистр сведений?
   КонецЦикла;
1 Ненавижу 1С
 
гуру
04.05.12
14:40
кусок из типовой


Для Каждого СтрокаДвижения ИЗ ТаблицаДвижений Цикл
       // имя регистра передается как значение, полученное с помощью
       // функции ПолноеИмя() метаданных регистра
       ПозицияТочки = Найти(СтрокаДвижения.Имя, ".");
       ТипРегистра = Лев(СтрокаДвижения.Имя, ПозицияТочки - 1);
       ИмяРегистра = СокрП(Сред(СтрокаДвижения.Имя, ПозицияТочки + 1));

       МассивОбрабатываемыхСтрокТаблицыДвижений.Добавить(СтрокаДвижения);
       
       ЕСли ТипРегистра = "РегистрНакопления" Тогда
           Набор = РегистрыНакопления[ИмяРегистра].СоздатьНаборЗаписей();
               
       ИначеЕсли ТипРегистра = "РегистрСведений" Тогда
           Набор = РегистрыСведений[ИмяРегистра].СоздатьНаборЗаписей();              
               
       КонецЕсли;
2 мистер игрек
 
04.05.12
14:45
спасибо