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

Срез последних

Автор Kostik2013, 26 фев 2013, 19:16

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

Kostik2013

Цитата: Yura063 от 26 фев 2013, 20:34Аппарат = Элемент.Родитель;


Это вставить в тот код который есть?простите за тупость...

Yura063

У вас так
Мобильники
  - HTC
    - Модели (Элементы справочника)
Цена установлена на Группу Мобильники?
Вставить перед вызовом функции!
Помогли, отблагодари!

Kostik2013

Цитата: Yura063 от 26 фев 2013, 20:34Аппарат = Элемент.Родитель;
так?Я правильно понял?Если да то не работает..


&НаКлиенте
Процедура ДиагностикаПриИзменении(Элемент)
   Аппарат = Элемент.Родитель;
КонецПроцедуры

&НаСервере
Функция ОпределитьДиагностику(Аппарат,Диагностика)
   Отбор=Новый Структура ("Аппарат",Аппарат);
   Отбор.Вставить("Диагностика",Диагностика);
   СтрокаРегистра=РегистрыСведений.ЦеныДиагностика.ПолучитьПоследнее(Объект.Дата,Отбор);
   Диагностика=СтрокаРегистра.Диагностика;
   Возврат Диагностика;
КонецФункции

Yura063

Чуть не так! В код приведите где вы функцию вызываете!
Помогли, отблагодари!

Kostik2013

Цитата: Yura063 от 26 фев 2013, 20:51
Чуть не так! В код приведите где вы функцию вызываете!

?

&НаСервере
Функция ОпределитьДиагностику(Аппарат,Диагностика)
   Отбор=Новый Структура ("Аппарат",Аппарат.Элемент.Родитель);
   Отбор.Вставить("Диагностика",Диагностика);
   СтрокаРегистра=РегистрыСведений.ЦеныДиагностика.ПолучитьПоследнее(Объект.Дата,Отбор);
   Диагностика=СтрокаРегистра.Диагностика;
   Возврат Диагностика;
КонецФункции
Добавлено: 26 фев 2013, 21:11


Цитата: Yura063 от 26 фев 2013, 20:51
Чуть не так! В код приведите где вы функцию вызываете!

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

Yura063

Это сама функция! Ладно это должно выглядеть так:

&НаКлиенте
Процедура ПриИзмененииТовара()
    Диагностика = ОпределитьДиагностику(Аппарат.Родитель);
КонецПроцедуры

&НаСервере
Функция ОпределитьДиагностику(Аппарат)
   Отбор=Новый Структура ("Аппарат",Аппарат);
   СтрокаРегистра=РегистрыСведений.ЦеныДиагностика.ПолучитьПоследнее(Объект.Дата,Отбор);
   Диагностика=СтрокаРегистраПолучить(0).Диагностика;
   Возврат Диагностика;
КонецФункции


Наверное как-то так! :)
Добавлено: 26 фев 2013, 22:02


Так тяжело писать! Если не получится помогу удаленно! пишите в личку!
Помогли, отблагодари!

Kostik2013

Цитата: Yura063 от 26 фев 2013, 22:01
Это сама функция! Ладно это должно выглядеть так:

&НаКлиенте
Процедура ПриИзмененииТовара()
    Диагностика = ОпределитьДиагностику(Аппарат.Родитель);
КонецПроцедуры

&НаСервере
Функция ОпределитьДиагностику(Аппарат)
   Отбор=Новый Структура ("Аппарат",Аппарат);
   СтрокаРегистра=РегистрыСведений.ЦеныДиагностика.ПолучитьПоследнее(Объект.Дата,Отбор);
   Диагностика=СтрокаРегистраПолучить(0).Диагностика;
   Возврат Диагностика;
КонецФункции


Наверное как-то так! :)
Добавлено: 26 фев 2013, 22:02


Так тяжело писать! Если не получится помогу удаленно! пишите в личку!

все ошибки...

Теги:

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

Рейтинг@Mail.ru

Поиск