Имя: Пароль:
1C
1С v8
Помогите новичку!
0 Lamosinho
 
12.10.11
13:47
Добрый день! Вопрос очень простой....не могу приравнять реквизит справочника "Цена" к элементу таблЧасти документа ...при выборе тмц из справочника хочу чтобы выбивалась цена , она занесена в справочник...в документ не падает...что делаю не так???



&НаКлиенте
Процедура ПриходнаяТМЦПриИзменении(Элемент)
          ВыполнитьПроцедуруНаСервере();
КонецПроцедуры
  &НаСервере

  Процедура ВыполнитьПроцедуруНаСервере()
      СпрТМЦ = Справочники.ТМЦ;
      Выборка=СпрТМЦ.Выбрать();
      Пока  Выборка.Следующий() Цикл
          ОбъектТМЦ=Выборка.ПолучитьОбъект();
          СтрокаТабличнойЧасти = Элементы.Приходная.ТекущиеДанные;
          Если СтрокаТабличнойЧасти.ТМЦ = ОбъектТМЦ.Наименование Тогда
              СтрокаТабличнойЧасти.Цена = ОбъектТМЦ.Цена;
          КонецЕсли;
      КонецЦикла;
  КонецПроцедуры
1 Wobland
 
12.10.11
13:49
не глядя: используешь выборку вместо запроса
2 Milok
 
12.10.11
13:49
В этой строке:
Если СтрокаТабличнойЧасти.ТМЦ = ОбъектТМЦ.Наименование Тогда
ты сравниваешь ссылку и наименование.
3 Lamosinho
 
12.10.11
13:54
с помощью выборки это не возможно осуществить?
4 Milok
 
12.10.11
13:55
(3) возможно, но это не правильно.
5 Lamosinho
 
12.10.11
13:56
ты мог бы подсказать как правильно обратиться?
6 Рэйв
 
12.10.11
13:57
СтрокаТабличнойЧасти = Элементы.Приходная.ТекущиеДанные;
->
СтрокаТабличнойЧасти = Элементы.Приходная.ТекущаяСтрока;
7 Рэйв
 
12.10.11
13:58
+
ОбъектТМЦ=СтрокаТабличнойЧасти.ТМЦ.ПолучитьОбъект();

и без всяких выборок
8 Lamosinho
 
12.10.11
13:58
с "ТекущейСтрокой" тоже не работает....
9 Рэйв
 
12.10.11
13:59
+только вот зачем тебе объект?:)
10 ptiz
 
12.10.11
14:00
(0)
ОбъектТМЦ=Выборка.ПолучитьОбъект(); <--------- лишнее

Если СтрокаТабличнойЧасти.ТМЦ = Выборка.Ссылка Тогда
  СтрокаТабличнойЧасти.Цена = Выборка.Цена;
11 Lamosinho
 
12.10.11
14:08
сделал как подсказал....всеравно не работает..
12 Tirael
 
12.10.11
15:07
(0) какой тип у
СтрокаТабличнойЧасти.ТМЦ
13 GhostTM
 
12.10.11
15:55
Если я правильно понял желаемое


&НаКлиенте
Процедура ПриходнаяТМЦПриИзменении(Элемент)
   ТекСтрока = Элементы.Приходная.ТекущиеДанные;
   ТекСтрока.Цена = ПолучитьЦену(ТекСтрока.ТМЦ);
КонецПроцедуры

&НаСервереБезКонтекста
Функция ПолучитьЦену(ТМЦ)
   Возврат ТМЦ.Цена;
КонецФункции
Выдавать глобальные идеи — это удовольствие; искать сволочные маленькие ошибки — вот настоящая работа. Фредерик Брукс-младший