Имя: Пароль:
1C
1С v8
Торговля 10.3, заполнение остатками документа перемещение
0 mxs089
 
23.06.14
10:12
заполняю документ перемещения через заполнить - заполнить по остаткам на складе отправителя, после заполнения смотрю отчет ведомость по остаткам товаров на складах, совсем другие цифры. я так понимаю, что что то не так с виртуальными таблицами, делал тестирование базы, ничего не изменилось.
1 Godofsin
 
23.06.14
10:27
Jhufybpfwb. yt extk
2 Godofsin
 
23.06.14
10:27
Что значит: не учел организацию
3 mxs089
 
23.06.14
10:47
(2) не понял, что значит не учел организацию, должен быть остаток общий по складу
4 Godofsin
 
23.06.14
10:48
(3) Организаций несколько ведется?
5 mxs089
 
23.06.14
10:50
да
6 Godofsin
 
23.06.14
10:51
Тогда открой для себя отчет "Товары организаций и ГТД" и сравни по нему
7 mxs089
 
23.06.14
10:52
у меня получается, что отчет выдает где-то 50 позиций, а в документе 150, + если открыть список номенкл. то видно, что позиции такой не числится вообще на складе
8 Godofsin
 
23.06.14
10:54
(7) а вон оно чо... а минусов в количестве нет?
9 mxs089
 
23.06.14
10:54
Процедура КоманднаяПанельТоварыЗаполнитьОстаткамиПоСкладуОтправителю(Кнопка)

    Если НЕ ЗначениеЗаполнено(СкладОтправитель) Тогда
        Сообщить("Укажите склад-отправитель", СтатусСообщения.Внимание);
        Возврат;
    КонецЕсли;

    Если Товары.Количество() > 0 Тогда
        
        ТекстВопроса = "Перед заполнением табличная часть будет очищена. Заполнить?";
        Ответ = Вопрос(ТекстВопроса, РежимДиалогаВопрос.ДаНет, 60, КодВозвратаДиалога.Да,);
        Если Ответ <> КодВозвратаДиалога.Да Тогда
            Возврат;
        КонецЕсли;
        
    КонецЕсли;

    ТекстЗапроса =
        "ВЫБРАТЬ РАЗРЕШЕННЫЕ
        |    ТоварыНаСкладахОстатки.Номенклатура,
        |    ТоварыНаСкладахОстатки.ХарактеристикаНоменклатуры,
        |    ТоварыНаСкладахОстатки.СерияНоменклатуры,
        |    ТоварыНаСкладахОстатки.Качество,
        |    ТоварыНаСкладахОстатки.КоличествоОстаток,
        |    NULL КАК ЦенаВРознице
        |ИЗ
        |    РегистрНакопления.ТоварыНаСкладах.Остатки(&КонДата, Склад = &Склад) КАК ТоварыНаСкладахОстатки
        |ГДЕ
        |    ТоварыНаСкладахОстатки.КоличествоОстаток > 0
        |
        |ОБЪЕДИНИТЬ ВСЕ
        |
        |ВЫБРАТЬ
        |    ТоварыВНТТОстатки.Номенклатура,
        |    ТоварыВНТТОстатки.ХарактеристикаНоменклатуры,
        |    ТоварыВНТТОстатки.СерияНоменклатуры,
        |    ЗНАЧЕНИЕ(Справочник.Качество.Новый),
        |    ТоварыВНТТОстатки.КоличествоОстаток,
        |    ТоварыВНТТОстатки.ЦенаВРознице
        |ИЗ
        |    РегистрНакопления.ТоварыВНТТ.Остатки(&КонДата, Склад = &Склад) КАК ТоварыВНТТОстатки
        |ГДЕ
        |    ТоварыВНТТОстатки.КоличествоОстаток > 0
        |
        |ОБЪЕДИНИТЬ ВСЕ
        |
        |ВЫБРАТЬ
        |    ТоварыВРозницеОстатки.Номенклатура,
        |    ТоварыВРозницеОстатки.ХарактеристикаНоменклатуры,
        |    ТоварыВРозницеОстатки.СерияНоменклатуры,
        |    ТоварыВРозницеОстатки.Качество,
        |    ТоварыВРозницеОстатки.КоличествоОстаток,
        |    NULL
        |ИЗ
        |    РегистрНакопления.ТоварыВРознице.Остатки(&КонДата, Склад = &Склад) КАК ТоварыВРозницеОстатки
        |ГДЕ
        |    ТоварыВРозницеОстатки.КоличествоОстаток > 0";
        
    Запрос = Новый Запрос;
    Запрос.Текст = ТекстЗапроса;
    Запрос.УстановитьПараметр("КонДата", ?(ЭтоНовый(), КонецДня(Дата), Дата));
    Запрос.УстановитьПараметр("Склад",   СкладОтправитель);

    РезультатЗапроса = Запрос.Выполнить();
    Если РезультатЗапроса.Пустой() Тогда
        Предупреждение("Нет данных для заполнения!");
        Возврат;
    Иначе
        Товары.Очистить();
    КонецЕсли;

    Обход = РезультатЗапроса.Выбрать();
    Пока Обход.Следующий() Цикл

        НоваяСтрока = Товары.Добавить();
        НоваяСтрока.Номенклатура               = Обход.Номенклатура;
        НоваяСтрока.ХарактеристикаНоменклатуры = Обход.ХарактеристикаНоменклатуры;
        НоваяСтрока.СерияНоменклатуры          = Обход.СерияНоменклатуры;
        НоваяСтрока.Количество                 = Обход.КоличествоОстаток;
        НоваяСтрока.Цена                       = Обход.ЦенаВРознице;
        НоваяСтрока.Качество                   = Обход.Качество;
        НоваяСтрока.ЕдиницаИзмерения = НоваяСтрока.Номенклатура.ЕдиницаХраненияОстатков;
        НоваяСтрока.Коэффициент      = НоваяСтрока.ЕдиницаИзмерения.Коэффициент;

    КонецЦикла;

КонецПроцедуры
10 Godofsin
 
23.06.14
11:01
(9)Давай скрины, что то не верится
11 mxs089
 
23.06.14
11:07
нашел ошибку, спасибо за помощь, в поступлении указывали серии, а реализовывали без, соотв. при формировании остатков в разрезе серий минусы и вылезли
Основная теорема систематики: Новые системы плодят новые проблемы.