Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
22 ноя 2024, 02:27

Загрузка данных из Excel и упорядочивание

Автор bestname, 26 апр 2016, 17:05

0 Пользователей и 1 гость просматривают эту тему.

bestname

Здравствуйте. Загружаю обработкой данные из файла Excel в документ 1С. И 1С каким-то образом упорядочивает в документе номенклатуру по алфавитному порядку. Но в обработке я не задавал никаких условий по этому поводу. Как сделать, чтобы структура позиций сохранялась такая, как в Excel?
Даже не знаю что скидывать из кода...


//Создаем документ "Установка цен номенклатуры"
Док = Документы.УстановкаЦенНоменклатуры.СоздатьДокумент();

//Определяем столбец с кодом товара в Excel
НомерКолонкиКодаТовара = 2;

//С какой строки начинаем
НомерСтрокиТЧ = 19;

Для а = НомерСтрокиТЧ по ФайлСтрок Цикл

КодТовара = СокрЛП(Excel.Cells(а,НомерКолонкиКодаТовара).Value);
Товар = Справочники.Номенклатура.НайтиПоКоду(КодТовара);

    Если НЕ Товар.Пустая() Тогда
ТЧТовары = Док.Товары.Добавить();
ТЧТовары.Номенклатура = Товар.Ссылка;   
ТЧТовары.Цена = ЦенаОпт;
ТЧТовары.ЕдиницаИзмерения = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию(СокрЛП(Товар.БазоваяЕдиницаИзмерения),Истина);
ТЧТовары.ТипЦен = Справочники.ТипыЦенНоменклатуры.НайтиПоНаименованию("Реализация опт");
ТЧТовары.Валюта = Справочники.Валюты.НайтиПоКоду("980");
    КонецЕсли;
КонецЦикла;

Rasty

смотрите код самого документа, скорее всего там где то это есть.
Помогли - Скажи спасибо! Решил сам - поделись решением!
:)

cska-fanat-kz

да, нигде не попадалось "насильное" упорядочивание ТЧ.
во всяком случае максимум где искать - модуль объекта (например ПередЗаписью()) или подписки на событие на ПередЗаписью().
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск