Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
19 апр 2024, 10:26

Не получается списывать товар с ОБЩЕГО списка :(

Автор cobra77777, 28 фев 2013, 19:40

0 Пользователей и 1 гость просматривают эту тему.

cobra77777


Здравствуйте!
  [size=78%]Есть Документ ПоступлениеТовараКартриджи, и человек [/size][size=78%]который принимает этот товар из Основного Склада. Соответственного завхоз принял товар (картриджи). К[/size][size=78%]роме завхоза могут еще 2 человека этот товар списывать. Вот код:[/size]
[size=78%]Процедура ОбработкаПроведения(Отказ, Режим)[/size]
   //{{__КОНСТРУКТОР_ДВИЖЕНИЙ_РЕГИСТРОВ
   // Данный фрагмент построен конструктором.
   // При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!


   // регистр УчетКартриджей Приход
   Движения.УчетКартриджей.Записывать = Истина;
   Для Каждого ТекСтрокаМатериал Из Материал Цикл
      Движение = Движения.УчетКартриджей.Добавить();
      Движение.ВидДвижения = ВидДвиженияНакопления.Приход;
      Движение.Период = Дата;
      Движение.Склад = Склад;
      Движение.Картридж = ТекСтрокаМатериал.Картридж;
      Движение.Количество = ТекСтрокаМатериал.Количество;
   КонецЦикла;


   // регистр УчетКартриджейПоСотрудникам Приход
   Движения.УчетКартриджейПоСотрудникам.Записывать = Истина;
   Для Каждого ТекСтрокаМатериал Из Материал Цикл
      Движение = Движения.УчетКартриджейПоСотрудникам.Добавить();
      Движение.ВидДвижения = ВидДвиженияНакопления.Приход;
      Движение.Период = Дата;
      Движение.Сотрудник = СотрудникАвтоматизации;
      Движение.Картридж = ТекСтрокаМатериал.Картридж;
      Движение.Количество = ТекСтрокаМатериал.Количество;
      Движение.СотрудникОтдела = СотрудникОтдела;
   КонецЦикла;


   //}}__КОНСТРУКТОР_ДВИЖЕНИЙ_РЕГИСТРОВ
КонецПроцедуры


Вопрос: На примере (код выше) завхоз с ОБЩЕГО списка списывает картриджи, а другие сотрудники не могут списывать с ОБЩЕГО Списка (списывается только единично). Как сделать так чтобы др.сотрудники тоже могли списывать с ОБЩЕГО Списка ?

cobra77777


Besart

я так понял что ошибка в этой строке Движение.Сотрудник = СотрудникАвтоматизации;, если так то откуда берется СотрудникАвтоматизации, в смысле заполнется вручную ил автоматически в зависимости от пользователя? и вообще хорошо бы было узнать какая ошибка вываливается

cobra77777

Цитата: Besart от 01 мар 2013, 23:31
я так понял что ошибка в этой строке Движение.Сотрудник = СотрудникАвтоматизации;, если так то откуда берется СотрудникАвтоматизации, в смысле заполнется вручную ил автоматически в зависимости от пользователя? и вообще хорошо бы было узнать какая ошибка вываливается

СотрудникАвтоматизации выбирается из Справочника в зависимости от пользователя. Ошибка никакая не вываливается. И код другой конечно, по ошибке не тот код выложил (приход) нужно расход :Процедура ОбработкаПроведения(Отказ, Режим)
   //{{__КОНСТРУКТОР_ДВИЖЕНИЙ_РЕГИСТРОВ
   // Данный фрагмент построен конструктором.
   // При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!

   // регистр УчетКартриджей Расход
   Движения.УчетКартриджей.Записывать = Истина;
   Движение = Движения.УчетКартриджей.Добавить();
   Движение.ВидДвижения = ВидДвиженияНакопления.Расход;
   Движение.Период = Дата;
   Движение.Склад = Склад;
   Движение.Картридж = Картридж;
   Движение.Количество = 1;

   // регистр УчетКартриджейПоСотрудникам Расход
   Движения.УчетКартриджейПоСотрудникам.Записывать = Истина;
   Движение = Движения.УчетКартриджейПоСотрудникам.Добавить();
   Движение.ВидДвижения = ВидДвиженияНакопления.Расход;
   Движение.Период = Дата;
   Движение.Сотрудник = Сотрудникавтоматизации;
   Движение.Картридж = Картридж;
   Движение.Количество = 1;
   Движение.СотрудникОтдела = СотрудникОтдела;

   //}}__КОНСТРУКТОР_ДВИЖЕНИЙ_РЕГИСТРОВ
КонецПроцедуры

Besart

тогда у вас проблема наверное с правами доступа на документ списание по сотрудникам, попробуйте предостаивть полные права на данный документ тем  сотрудникам к\е имеют право списывать картриджы

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск