Помощь - Поиск - Пользователи - Календарь
Полная версия этой страницы: Приходные накладные не указано количество товара
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Программисту > Программирование в 1С Предприятие 8.2 > Программирование обычных форм 1С 8.2 и не интерфейсной логики
Yoja
Добрый день!
1С 8.2 УНФ
Создаю программно приходную накладную
Документы прихода создаються, товаром заполняються, все хорошо (рисунок 1)
Но когда смотришь отчет:
Ведомость по запасам (рисунок 2) - поле количество пустое. Как исправить, или где копать?
Ведомость по складу (рисунок 3) - вообще почему то пусто. Как исправить, или где копать?

КОД
Процедура ДокПриходнаяНакладная()
    Для Каждого СтрокаТаб из ТЗПриходныеНакладные Цикл
         Док = Документы.ПриходнаяНакладная.СоздатьДокумент();
         Док.Номер = СтрокаТаб.Номер;
         Док.Дата = СтрокаТаб.Дата;
         Док.Контрагент = Справочники.Контрагенты.НайтиПоНаименованию(СтрокаТаб.Контрагент);
         Док.ВидОперации = Перечисления.ВидыОперацийПриходнаяНакладная.ПоступлениеОтПоставщика;
         Док.СтруктурнаяЕдиница = Справочники.СтруктурныеЕдиницы.НайтиПоНаименованию(СтрокаТаб.Склад).Ссылка;
         Док.Договор =  Справочники.ДоговорыКонтрагентов.НайтиПоНаименованию(СтрокаТаб.ДоговорКонтрагента);
        
                Для Каждого СтрТаб из ТЗПриходныеНакладныеТовар Цикл
                    Если СтрокаТаб.Ссылка = СтрТаб.Ссылка Тогда
                        
                           Тв = Док.Запасы.Добавить();  
                           Тв.Номенклатура = Справочники.Номенклатура.НайтиПоКоду(СтрТаб.КодТовара);
                           Тв.Количество = СтрТаб.Количество;
                           Тв.Цена = СтрТаб.Цена;
                           Тв.СтавкаНДС = Справочники.СтавкиНДС.НайтиПоНаименованию(СтрТаб.СтавкаНДС);
                           Тв.Сумма = СтрТаб.Сумма;
                           Тв.СуммаНДС = СтрТаб.СуммаНДС;
                           Тв.Всего = СтрТаб.Сумма;
                    КонецЕсли;    
                КонецЦикла;    
         Док.НалогообложениеНДС = Перечисления.ТипыНалогообложенияНДС.ОблагаетсяНДС;
         Док.Курс = "9.0";
         Док.Кратность = "1.0";
         Док.ВалютаДокумента = Справочники.Валюты.НайтиПоНаименованию(СтрокаТаб.ВалютаДокумента);
         Док.СуммаДокумента = СтрокаТаб.СуммаДокумента;
         Док.СуммаВключаетНДС = СтрокаТаб.СуммаВключаетНДС;
         Док.Организация = Справочники.Организации.НайтиПоНаименованию("Наша фирма");
        
         Если СтрокаТаб.Проведен = Истина Тогда
             Док.Записать(РежимЗаписиДокумента.Проведение);    
         Иначе
             Док.Записать();
         КонецЕсли;
    КонецЦикла;    
КонецПроцедуры


Рисунок 1



Рисунок 2



Рисунок 3


python
Копать - в сторону единицы измерения. Заполнения данного реквизита я не вижу в коде.
Yoja
Реально, добавил строчку.

Тв.ЕдиницаИзмерения = Справочники.КлассификаторЕдиницИзмерения.НайтиПоНаименованию(СтрТаб.ЕдиницаИзмерения);


Ток еще не разобрался чем отличаются:
Справочники.КлассификаторЕдиницИзмерения
Справочники.ЕдиницыИзмерения

Спасибо.
python
Справочники.ЕдиницыИзмерения - этот нужен, по идее (конфу не видел) - подчинен номенклатуре.
Vofka
Классификатор - это штука, кг, м и т.п. А единица измерения может быть тонна (кг с коэффициентом 100), упаковка (шт с коэффициентом 6) и т.п. Но просто часто они совпадают.
Ardi
В демо базах УНФ Справочник.ЕдиницыИзмерения не используется.


В константах также есть возможноть отключить отображение единиц измерения в документах вообще.
Yoja
Всем спасибо, тема закрыта
Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.