Гони отчёт!
1с и бла-бла-бла
Пример копирования ТЗ (Таблицы значений) с фильтром по какой-либо колонке:
Код:
// Создает копию таблицы значений с фильтром по значению в колонке // Сортировка при этом может нарушиться Функция ТЗ_ВыгрузитьСОтбором(тзДанные, ИмяКолонки, ЗначОтбора) КолСтр = 0; тзТмп = СоздатьОбъект("ТаблицаЗначений"); тзДанные.Выгрузить(тзТмп); тзТмп.НоваяКолонка("_Уд"); тзТмп.ВыбратьСтроки(); Пока (тзТмп.ПолучитьСтроку() = 1) Цикл Если тзТмп.ПолучитьЗначение(тзТмп.НомерСтроки, ИмяКолонки) = ЗначОтбора Тогда // Ссылка на справочник КолСтр = КолСтр + 1; тзТмп._Уд = 1; КонецЕсли; КонецЦикла; тзТмп.Сортировать("+_Уд"); тзТмп.УдалитьКолонку("_Уд"); тзБуф = СоздатьОбъект("ТаблицаЗначений"); Если КолСтр = 0 Тогда тзТмп.УдалитьСтроки(); // Очищаем таблицу Возврат тзТмп; КонецЕсли; тзТмп.Выгрузить(тзБуф, 1, КолСтр); Возврат тзБуф; КонецФункции /CODE]
+ симулятор bad block для статьи по восстановлению 1с базы SQL
+ портал на сайт
Hs header
Site logo
Подсветка кода
+ портал на сайт
Hs header
Site logo
Подсветка кода
Для получения списка последовательностей из метаданных используем следующий код:
Код:
Для к = 1 По Метаданные.Последовательность() Цикл Сообщить(Метаданные.Последовательность(к)); КонецЦикла; ./CODE]
XenPorta 2 PRO
© 8WAYRUN.com