Форум программистов «Весельчак У»
  *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

  • Рекомендуем проверить настройки временной зоны в вашем профиле (страница "Внешний вид форума", пункт "Часовой пояс:").
  • У нас больше нет рассылок. Если вам приходят письма от наших бывших рассылок mail.ru и subscribe.ru, то знайте, что это не мы рассылаем.
   Начало  
Наши сайты
Помощь Поиск Календарь Почта Войти Регистрация  
 
Страниц: [1]   Вниз
  Печать  
Автор Тема: Реквизиты из документа записать в справочник  (Прочитано 7322 раз)
0 Пользователей и 1 Гость смотрят эту тему.
Will
Интересующийся

ru
Offline Offline

« : 12-06-2011 21:13 » 

Здравствуйте!
Есть документ "Док" с реквизитами: Фамилия и Имя.
Есть кнопка "Отправить".
Есть справочник "Справ" с такими же реквизитами.
Как сделать так, чтоб при нажатии кнопки реквизиты из документа записывались в справочник?

Не получается.
Пишу что-то в этом роде:
Код:
Процедура КнопкаНажатие (Элемент);
Для каждого ЭлементыФормы Из ... Цикл
ЭлементФормы.Фамилия = Справочник.Справ.Фамилия
в общем бред... какой-то.
Помогите плз))
Записан
Dest
Опытный

ru
Offline Offline

« Ответ #1 : 13-06-2011 00:11 » 

Конфа не типовая да? Что-то ты тут опять замутил из документа в справочник  Здесь была моя ладья...
Нужно, с начала найти нужный элемент справочника. Можно запросом.
Код:
Запр = Новый запрос (Выбрать Спр.Ссылка ИЗ Справочник.ИмяТвоегоСправочника КАК Спр Где Спр.Фамилия  = &Фамилия и Спр.Имя = &Имя);
Запр.УстановитьПараметр("Фамилия", ФамилияИзДокумента);
Запр.УстановитьПараметр("Имя", ИмяИзДокумента);

Рез = Запр.Выполнить();

Если НЕ Рез.Пустой() Тогда //Если соответствующий элемент справочника найден

   Выборка = Рез.Выбрать();
 
   Пока Выборка. Следующий() Цикл // кстати  может быть найдено несколько элементов справочника с такими реквизитам
      Объект = Выборка.Ссылка.ПолучитьОбъект();
      Объект.РеквизитИзСправочника = Значение;
   КонецЦикла

Иначе
   Сообщить("Элемент справочника не найден");
КонецЕсли;
Записан
Will
Интересующийся

ru
Offline Offline

« Ответ #2 : 13-06-2011 04:34 » new

Dest, спасибо))
Записан
Страниц: [1]   Вверх
  Печать  
 

Powered by SMF 1.1.21 | SMF © 2015, Simple Machines