Имя: Пароль:
1C
1С v8
опупенное поведение флага "вести оперативный учет остатков НЗП " !!!
0 Гой1
 
28.07.11
14:08
Добрый день . Столкнулся с проблемой : при попытке у элемента спр номенклатура установить флаг "вести оперативный учет остатков НЗП " вижу удивительную картину : флаг устанавливается (визуально) но после записи элемента и повторном открытии формы - опять не установлен.
Соответсвенно элемент в отчеты по оперативному учету не попадает.
А теперь самое интересное : так ведут себя только некоторые элементы номенклатуры. У остальных флаг работает нормально.
Тестирование исправление не помогло... Платформа УПП 8.2 конфа 1.3.14.1
Может сталкивался кто ???
1 Леха Дум
 
28.07.11
14:37
А может стоит заглянуть в маодуль объекта?
2 vmv
 
28.07.11
14:44
я заглянул, я маладец)

Процедура ПередЗаписью(Отказ)

   Если ОбменДанными.Загрузка Тогда
       Возврат;
   КонецЕсли;
   
   Если ЭтоГруппа Тогда
       ПрошлыйИзмененныйРодительОбъектаДоступа = ?(Не ЭтоНовый() и Не Ссылка.Родитель = Родитель, Ссылка.Родитель, Неопределено);
       НастройкаПравДоступа.ПередЗаписьюНовогоОбъектаСПравамиДоступаПользователей(ЭтотОбъект, Отказ, Родитель);
       
   Иначе
       
       Если НЕ ЗначениеЗаполнено(ЕдиницаДляОтчетов) Тогда
           ЕдиницаДляОтчетов = ЕдиницаХраненияОстатков;
       КонецЕсли;
       
       Услуга   = (ВидНоменклатуры.ТипНоменклатуры = Перечисления.ТипыНоменклатуры.Услуга);
       Набор    = (ВидНоменклатуры.ТипНоменклатуры = Перечисления.ТипыНоменклатуры.Набор);
       Комплект = (ВидНоменклатуры.ТипНоменклатуры = Перечисления.ТипыНоменклатуры.Комплект);

       Если Услуга ИЛИ Набор Тогда
           ВестиУчетПоХарактеристикам = Ложь;
       КонецЕсли;

       Если ВидНоменклатуры.ТипНоменклатуры <> Перечисления.ТипыНоменклатуры.Товар Тогда
           
           ВестиУчетПоСериям                 = Ложь;
           ВестиПартионныйУчетПоСериям     = Ложь;
           Весовой                         = Ложь;
           ВестиОперативныйУчетОстатковНЗП  = Ложь;
           ВестиУчетПоСериямВНЗП             = Ложь;
           ВестиСерийныеНомера             = Ложь;

           НомерГТД                         = Неопределено;
           СтранаПроисхождения              = Неопределено;
           ПорядокПрисвоенияСерийногоНомера = Неопределено;
           НаправлениеВыпуска               = Неопределено;
           
       КонецЕсли;
       
   КонецЕсли;
   
КонецПроцедуры // ПередЗаписью()
3 hhhh
 
28.07.11
15:46
(2) ну и?
4 Maxus43
 
28.07.11
16:48
(3) зачем вопрос?
5 hhhh
 
28.07.11
16:49
(4) ну непонятно, заглянул, и что-то там увидел? Ведь интересно.
6 Maxus43
 
28.07.11
17:07
(5) смеёшся чтоль?)

       Если ВидНоменклатуры.ТипНоменклатуры <> Перечисления.ТипыНоменклатуры.Товар Тогда
           
           ВестиУчетПоСериям                  = Ложь;
           ВестиПартионныйУчетПоСериям      = Ложь;
           Весовой                          = Ложь;
           ВестиОперативныйУчетОстатковНЗП  = Ложь;
           ВестиУчетПоСериямВНЗП              = Ложь;
           ВестиСерийныеНомера              = Ложь;