Инвентаризация.Количество.

Besart · 08 мая 2013, 12:37

попробуйте так

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

        КонецЦикла;
      КонецЕсли;
 
   КонецЕсли;
   //}}__КОНСТРУКТОР_ВВОД_НА_ОСНОВАНИИ

Kostik2013 · 08 мая 2013, 12:46

     Если ТекСтрокаТовары.Отклонение < 0 Тогда
Документы.СписаниеТоваров.Количество.Заполнить(ДанныеЗаполнения);
      КонецЕсли;

Ошибка,не видит поле,хотя оно у меня есть

{Документ.СписаниеТоваров.МодульОбъекта(13)}: Поле объекта не обнаружено (Отклонение)

Besart · 08 мая 2013, 12:51

Цитата: Kostik2013 от 08 мая 2013, 12:46

     Если ТекСтрокаТовары.Отклонение < 0 Тогда
Документы.СписаниеТоваров.Количество.Заполнить(ДанныеЗаполнения);
      КонецЕсли;

Ошибка,не видит поле,хотя оно у меня есть

{Документ.СписаниеТоваров.МодульОбъекта(13)}: Поле объекта не обнаружено (Отклонение)

у вас поле отклонение отсутствует в документе расходная, поэтому метод заполнить в вашем случае не подойдет, см выше
да и поля остаток склад и остаток реальный то же отсутствуют с документе расходная

Kostik2013 · 08 мая 2013, 17:52

Цитата: Besart от 08 мая 2013, 12:51
Цитата: Kostik2013 от 08 мая 2013, 12:46

     Если ТекСтрокаТовары.Отклонение < 0 Тогда
Документы.СписаниеТоваров.Количество.Заполнить(ДанныеЗаполнения);
      КонецЕсли;

Ошибка,не видит поле,хотя оно у меня есть

{Документ.СписаниеТоваров.МодульОбъекта(13)}: Поле объекта не обнаружено (Отклонение)

у вас поле отклонение отсутствует в документе расходная, поэтому метод заполнить в вашем случае не подойдет, см выше
да и поля остаток склад и остаток реальный то же отсутствуют с документе расходная

Так а зачем мне там это поле? А причем расходная здесь?Я же нигде её не упоминал

Besart · 08 мая 2013, 18:10

Цитата: Kostik2013 от 08 мая 2013, 17:52Так а зачем мне там это поле? А причем расходная здесь?Я же нигде её не упоминал

то есть документ списаниие, метод Зполнить() работает в том случае если у источника и приемника совпадают соответствующие данные

Kostik2013 · 08 мая 2013, 18:13

Цитата: Besart от 08 мая 2013, 18:10
Цитата: Kostik2013 от 08 мая 2013, 17:52Так а зачем мне там это поле? А причем расходная здесь?Я же нигде её не упоминал
то есть документ списаниие, метод Зполнить() работает в том случае если у источника и приемника совпадают соответствующие данные

Плохо дело...

Besart · 09 мая 2013, 10:51

упс, ошибочка вышла, нужно так

Код Выделить

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

КонецПроцедуры

Kostik2013 · 10 мая 2013, 21:09

Цитата: Besart от 09 мая 2013, 10:51
упс, ошибочка вышла, нужно так
Код Выделить Развернуть
Процедура ОбработкаЗаполнения(ДанныеЗаполнения, СтандартнаяОбработка) Если ТипЗнч(ДанныеЗаполнения) = Тип("ДокументСсылка.Инвентаризация") Тогда Для Каждого ТекСтрокаТовары Из ДанныеЗаполнения.Товары Цикл Если ТекСтрокаТовары.Отклонение < 0 Тогда НоваяСтрока = Товары.Добавить(); НоваяСтрока.Количество = -ТекСтрокаТовары.Отколонение; НоваяСтрока.Номенклатура = ТекСтрокаТовары.Номенклатура; НоваяСтрока.Сумма = ТекСтрокаТовары.Сумма; НоваяСтрока.Цена = ТекСтрокаТовары.Цена; КонецЕсли; КонецЦикла; КонецЕсли; КонецПроцедуры

Да,спасибо!Сегодня так и сделал))Работает))

Инвентаризация.Количество.

Поиск