Гони отчёт!

1с и бла-бла-бла

Пример копирования ТЗ (Таблицы значений) с фильтром по какой-либо колонке:

Код:
// Создает копию таблицы значений с фильтром по значению в колонке
// Сортировка при этом может нарушиться
Функция ТЗ_ВыгрузитьСОтбором(тзДанные, ИмяКолонки, ЗначОтбора)
   
    КолСтр = 0;
   
    тзТмп = СоздатьОбъект("ТаблицаЗначений");
    тзДанные.Выгрузить(тзТмп);
   
    тзТмп.НоваяКолонка("_Уд");
   
    тзТмп.ВыбратьСтроки();
    Пока (тзТмп.ПолучитьСтроку() = 1) Цикл
        Если тзТмп.ПолучитьЗначение(тзТмп.НомерСтроки, ИмяКолонки) = ЗначОтбора Тогда // Ссылка на справочник
            КолСтр = КолСтр + 1;
            тзТмп._Уд = 1;
        КонецЕсли;
    КонецЦикла;
   
    тзТмп.Сортировать("+_Уд");
    тзТмп.УдалитьКолонку("_Уд");
   
    тзБуф = СоздатьОбъект("ТаблицаЗначений");
   
    Если КолСтр = 0 Тогда
        тзТмп.УдалитьСтроки(); // Очищаем таблицу
        Возврат тзТмп;
    КонецЕсли;
   
    тзТмп.Выгрузить(тзБуф, 1, КолСтр);
   
    Возврат тзБуф;   
   
КонецФункции /CODE]
+ симулятор bad block для статьи по восстановлению 1с базы SQL

+ портал на сайт

Hs header

Site logo

Подсветка кода
Для получения списка последовательностей из метаданных используем следующий код:

Код:
Для к = 1 По Метаданные.Последовательность() Цикл
    Сообщить(Метаданные.Последовательность(к));
КонецЦикла;
./CODE]