Помощь - Поиск - Пользователи - Календарь
Полная версия этой страницы: Як правильно завантажити номенклатуру з табл.документа?
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Пользователю 1С 8.3, 8.2, 8.1, 8.0 > 1С Управление торговлей 8 > Управление торговлей для Украины редакция 2 (Управление торговлей для России редакция 10)
zhezabel
1с8 УТ ред.2.3
Виникає проблема при завантаженні номенклатури через файл ЗагрузкаДаныхИзТабличногоДокумента в частині одиниць вимірювання. "Базова" завантажується, "для отчетов" і "хранения остатков" не виходить. Підкажіть, будь ласка, як правильно це зробити?
Zaval
Цитата(zhezabel @ 16.08.18, 16:35) необходимо зарегистрироваться для просмотра ссылки
"для отчетов" і "хранения остатков" не виходить.

Що саме?
zhezabel
Коли відкриваю Елемент номенклатури, то базова одиниця є, а "для отчетов" і "хранения остатков" червоне підкреслення і немає можливості вибрати(список пустий).
nik389
так а вы обработку подправьте. там пару строк дописать..
zhezabel
З 1с8 тільки починаю співпрацю) Підкажіть, будь ласка, що і куди дописати?
nik389
вот готовый кусок кода:
Процедура СоздатьЕдиницуХраненияОстатков(Номенклатура)

    Если ЗначениеЗаполнено(Номенклатура.ЕдиницаХраненияОстатков) Тогда
        Возврат;
    КонецЕсли;

    ВыборкаЕдиниц = Справочники.ЕдиницыИзмерения.Выбрать(, Номенклатура.Ссылка);
    Если ВыборкаЕдиниц.Следующий() Тогда
        НайденнаяЕдиница = ВыборкаЕдиниц.Ссылка;
    Иначе
        НайденнаяЕдиницаОбъект = Справочники.ЕдиницыИзмерения.СоздатьЭлемент();
        НайденнаяЕдиницаОбъект.Наименование            = СокрЛП(Номенклатура.БазоваяЕдиницаИзмерения);
        НайденнаяЕдиницаОбъект.ЕдиницаПоКлассификатору = Номенклатура.БазоваяЕдиницаИзмерения;
        НайденнаяЕдиницаОбъект.Коэффициент             = 1;
        НайденнаяЕдиницаОбъект.Владелец                = Номенклатура.Ссылка;

        Попытка
            НайденнаяЕдиницаОбъект.Записать();
        Исключение
            Сообщить("Не удалось записать единицу хранения остатков: " + ОписаниеОшибки(), СтатусСообщения.Важное);            
            Возврат;
        КонецПопытки;

        НайденнаяЕдиница = НайденнаяЕдиницаОбъект.Ссылка;
    КонецЕсли;

    Номенклатура.ЕдиницаХраненияОстатков = НайденнаяЕдиница;
    Номенклатура.ЕдиницаДляОтчетов = НайденнаяЕдиница;

КонецПроцедуры // ПроверитьЕдиницуХраненияОстатков()


куда дописать, думаю сами разберетесь..
zhezabel
не розібралась(
zhezabel
Професіонали 1с, скажіть, будь ласка, куди вставити цей код, щоб все нормально завантажувалось?
sanek6662009@gmail.com
zhezabel @ 21.08.18, 14:23 необходимо зарегистрироваться для просмотра ссылки ,
в обработку)
Егор Динин
необходимо зарегистрироваться для просмотра ссылки
Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.