helpf.pro
Регистрация

v7: 1С 7.7 экспорт справочника в DBF

plvplv
23.11.2023 07:12Прочитано: 758

1С 7.7 Создала обработку по выгрузке иерархического справочника. Всё работает. Но как обработать табличную часть?

Код 1C v 7.x
 	Выборка = Справочники.СД_КалендарьСпортивныхМероприятий.Выбрать();
Пока Выборка.Следующий() Цикл  
Если Не Выборка.ЭтоГруппа И Выборка.ПланГод<>0 Тогда  
СтрокаТаб=ТабДан.Добавить();
СтрокаТаб.Код = Выборка.Код; 
СтрокаТаб.Наименование = Выборка.Наименование; 
СтрокаТаб.Родитель = Выборка.Родитель.Наименование;          
СтрокаТаб.КодРодителя = Выборка.Родитель.Код;          
СтрокаТаб.ПланГод = Выборка.ПланГод;  
СтрокаТаб.Раздел = Выборка.Раздел;  
СтрокаТаб.НомерПоКалендарю = Выборка.НомерПоКалендарю;  
СтрокаТаб.ВидСпорта = Выборка.ВидСпорта;     
СтрокаТаб.ВидСоревнования = Выборка.ВидСоревнования;  
СтрокаТаб.НаименованиеМероприятий = Выборка.НаименованиеМероприятий; 
СтрокаТаб.ДатаПроведения = Выборка.ДатаПроведения;
СтрокаТаб.МестоПроведения = Выборка.МестоПроведения;
СтрокаТаб.КолУчастников = Выборка.КолУчастников;
СтрокаТаб.УчаствОрг = Выборка.УчаствОрг;
СтрокаТаб.ИсточнФинанс = Выборка.ИсточнФинанс;
СтрокаТаб.СуммаПоВидуСпорта = Выборка.СуммаПоВидуСпорта;
СтрокаТаб.СуммаПоВидуСор = Выборка.СуммаПоВидуСоревнований;
СтрокаТаб.СуммаПоПриказам = Выборка.СуммаПоПриказам;
СтрокаТаб.СуммаОтклПоВидуСпорта = Выборка.СуммаОтклоненияПоВидуСпорта;
СтрокаТаб.СуммаОтклПоВидуСор = Выборка.СуммаОтклоненияПоВидуСоревнований;
СтрокаТаб.Ключ = Выборка.Ключ; 
СтрокаТаб.КасРасх = Выборка.КасРасх;
СтрокаТаб.ФактРасх = Выборка.ФактРасх; 
СтрокаТаб.СсылкаНаПриказы = Выборка.Приказы;  


         // Определим группы
             СтрокаТаб.Код2 = Выборка.Родитель.Код;
             СтрокаТаб.Группа2 = Выборка.Родитель.Наименование;
             СтрокаТаб.Код1 = Выборка.Родитель.Родитель.Код;
             СтрокаТаб.Группа1 = Выборка.Родитель.Родитель.Наименование;
КонецЕсли;
КонецЦикла;  


Yandex
Возможно, вас также заинтересует
Реклама на портале
plv
01.12.2023 12:24Ответ № 1
Вопрос закрыт!
Подсказка: Для быстрого поиска ответов - используйте 'Поиск'
Вы не можете отправить комментарий анонимно, пожалуйста войдите или зарегистрируйтесь.