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

[Kostik2013]

Доброго времени суток!Есть документ Инвентаризация



и на его основании делаются Оприходование и Списание Товаров. В Инвентаризации есть поле Отклонение т.е показывает разницу остатков товара и эту разницу мне надо запихнуть в Оприходование и Списание,но в документ попадают все записи и плюс и минус а мне надо рассортировать.Каким способом это можно сделать?

[Besart]

создайте два документа инвентаризация, в одном регистрируйте излишки и делайте оприходование, а в другом недостачу - списание, или же отсекайте соответственно записи с "+" и "-"  в процедуре ОбработкаЗаполнения в документах Оприходование и Списание

[Kostik2013]

создайте два документа инвентаризация, в одном регистрируйте излишки и делайте оприходование, а в другом недостачу - списание, или же отсекайте соответственно записи с "+" и "-"  в процедуре ОбработкаЗаполнения в документах Оприходование и Списание

Так я создал их)Каким способом можно отсечь */-?

[Besart]

Так я создал их)Каким способом можно отсечь */-?

покажите процедуру ОбработкаЗаполнения из каждого документа Оприходование и Списание

[Kostik2013]

Так я создал их)Каким способом можно отсечь */-?

покажите процедуру ОбработкаЗаполнения из каждого документа Оприходование и Списание

Я просто сделал вводом на основании

Добавлено: 10 апр 2013, 15:28

Хелп плиз...))))

[Besart]

Код Выделить Развернуть

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

это я взял из документа расходная, вам необходимо создать свою ОбработкуЗаполнения у Оприходование и Списание Товаров, на закладке Ввод на основании - конструктором ввода на основании

[Kostik2013]

Код Выделить Развернуть

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

это я взял из документа расходная, вам необходимо создать свою ОбработкуЗаполнения у Оприходование и Списание Товаров, на закладке Ввод на основании - конструктором ввода на основании

Спасибо!Ща буду пробовать!

Добавлено: 11 апр 2013, 14:18

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

Но мне кажется это не совсем правильно потому,что не работает...

Добавлено: 11 апр 2013, 15:10

Подскажите пожалуйста,что не так?

Добавлено: 11 апр 2013, 15:50

Код Выделить Развернуть

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

это я взял из документа расходная, вам необходимо создать свою ОбработкуЗаполнения у Оприходование и Списание Товаров, на закладке Ввод на основании - конструктором ввода на основании

???????

Спасибо!Ща буду пробовать!

Добавлено: 11 апр 2013, 14:18

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

Но мне кажется это не совсем правильно потому,что не работает...

Добавлено: 11 апр 2013, 15:10

Подскажите пожалуйста,что не так?

???????????????????????????????????????????????????????

Добавлено: 11 апр 2013, 16:21

Никто не поможет?Ну подскажите пожалуйста... я в этом новичек и подсказать мне некому...

[Kostik2013]

Так и не получилось у меня ...

[Besart]

могу только посочувствовать, должно было взлететь, если вы все делали как было в примерах, код покажите может поправим

[Kostik2013]

могу только посочувствовать, должно было взлететь, если вы все делали как было в примерах, код покажите может поправим

Процедура ОбработкаЗаполнения(ДанныеЗаполнения, СтандартнаяОбработка)
   
   //{{__КОНСТРУКТОР_ВВОД_НА_ОСНОВАНИИ
   // Данный фрагмент построен конструктором.
   // При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
   Если ТипЗнч(ДанныеЗаполнения) = Тип("ДокументСсылка.Инвентаризация") Тогда
      // Заполнение шапки
      Для Каждого ТекСтрокаТовары Из ДанныеЗаполнения.Товары Цикл
         
      Если  ТекСтрокаТовары.Отклонение < 0 Тогда
            Документы.СписаниеТоваров.Количество.Заполнить ();   
      КонецЕсли;
      
         НоваяСтрока = Товары.Добавить();
         НоваяСтрока.Количество = ТекСтрокаТовары.КонечныйОстаток;
         НоваяСтрока.Номенклатура = ТекСтрокаТовары.Номенклатура;
         НоваяСтрока.Сумма = ТекСтрокаТовары.Сумма;
         НоваяСтрока.Цена = ТекСтрокаТовары.Цена;
      КонецЦикла;
   КонецЕсли;
   //}}__КОНСТРУКТОР_ВВОД_НА_ОСНОВАНИИ


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