Имя: Пароль:
1C
1С v8
Получить список не пустых регистров
0 yliya_1C
 
26.11.17
21:45
Здравствуйте!
Подскажите, пожалуйста, каким образом можно получить список регистров сведений, в которых есть записи?
1 Cyberhawk
 
26.11.17
21:51
Я бы сделал это через ИР
2 yliya_1C
 
26.11.17
22:56
А кодом как-нибудь можно?
3 Tarlich
 
26.11.17
23:36
4 Tarlich
 
26.11.17
23:39
Для Каждого РегистрИзМетаданных Из Метаданные.РегистрыСведений Цикл
        ОбластьМакета.Параметры.Регистр=РегистрИзМетаданных.Имя;
        Запрос=Новый Запрос;
        Запрос.Текст = "ВЫБРАТЬ КОЛИЧЕСТВО(*)
         |ИЗ РегистрСведений." + СокрЛП(РегистрИзМетаданных.Имя);
        Выборка = Запрос.Выполнить().Выбрать();
        КоличествоЗаписей=0;
        Пока Выборка.Следующий() цикл
        НаборЗаписей = РегистрыСведений[РегистрИзМетаданных.Имя].СоздатьНаборЗаписей();
        НаборЗаписей.Прочитать();
        КоличествоЗаписей=НаборЗаписей.Количество()+КоличествоЗаписей;
        КонецЦикла;
        КолВо=КолВо+1;
    Если КоличествоЗаписей=0 Тогда
5 mikecool
 
27.11.17
00:36
(4) а нафига тебе запрос или вторая часть?
6 Рэйв
 
27.11.17
07:16
(4)С РС, подчиненному регистратору просто НаборЗаписей.Прочитать();
не взлетит. Потребует отбор по регистратору поставить...
И непонятно зачем оно тебе если у тебя в запросе все решается
AdBlock убивает бесплатный контент. 1Сергей