×
Показано с 1 по 7 из 7
  1. #1
    Клерк
    Регистрация
    05.11.2006
    Сообщений
    4

    Поиск по справочнику, редактирование и сохраниение реквизита

    Есть справочник сотрудники с реквизитами - Сотрудник, Должность, ДатаПриема, ДатаУвольнения. Есть документ Увольнение с реквизитами Сотрудник, ДатаУвольнения. Люди приведите пример кода Процедуры ОбработкаПроведения, чтобы по реквизиту документа Сотрудник происходил поиск в справочнике и проставлял в нем ДатуУвольнения.
    Начало видимо такое :
    СпрСотр=Справочники.Сотрудники;
    СпрСотр.НайтиПоНаименованию(Сотрудник);
    ....
    Допишите код или создайте свою версию плиз!!!
    Поделиться с друзьями

  2. #2
    Клерк
    Регистрация
    05.11.2006
    Сообщений
    4

    Осторожно забыл добавить код версии 1с 8.0.

    в 1с7.7 это делается просто

  3. #3
    Умный Клерк!
    Регистрация
    07.01.2004
    Адрес
    Владимир
    Сообщений
    13,623
    Справочник сотрудники тут совершенно не при чем, ибо информация об увольнение пишется скорее всего в другое место (а о конфигурации вы любезно умолчали) (нет в v8 периодических реквизитов у справочников - все в регистре сведений)
    1.Открыта новая радиостанция для юзеров под названием RТ FМ. По ней будут транслироваться чтения различных мануалов и ответы на часто задаваемые вопросы.
    2. "Помогая ленивым людям, ты помогаешь им сесть на свою шею" Сян-Цзы

  4. #4
    Клерк
    Регистрация
    05.11.2006
    Сообщений
    4

    это просто пример

    с точки зрения разработки конфигурации я с тобой спорить не буду...
    мне нужен код, который ищет реквизит в справочнике и проставляет другой. просто нужен пример взаимосвязи объектов в иерархии в8. кто может написать код?

  5. #5
    Fosihas
    Гость
    Запрос = Новый Запрос("
    |ВЫБРАТЬ
    | ФизическиеЛица.Ссылка
    |ИЗ
    | Справочник.ФизическиеЛица КАК ФизическиеЛица
    |ГДЕ
    | (ФизическиеЛица.ИНН = "") ";
    Результат = Запрос.Выполнить().Выбрать();
    Пока Результат.Следующий() Цикл
    СпрОбъект = Результат.ПолучитьОбъект();
    СпрОбъект .ИНН = "Основной";
    СпрОбъект .Записать();
    Наименование = Результат.Наименование;
    КонецЦикла;

  6. #6
    Клерк
    Регистрация
    05.11.2006
    Сообщений
    4

    спасибо я уже сам допетрил

    СпрСотр=Справочники.Сотрудники.Выбрать();
    Пока СпрСотр.Следующий() Цикл
    СпрОб=СпрСотр.ПолучитьОбъект();
    if СпрОб.Наименование=Сотрудник.Наименование then
    СпрОб.ДатаУвольнения=ДатаУвольнения;
    СпрОб.Записать();
    Прервать;
    endif;
    КонецЦикла;

  7. #7
    Умный Клерк!
    Регистрация
    07.01.2004
    Адрес
    Владимир
    Сообщений
    13,623
    Это пять!
    1.Открыта новая радиостанция для юзеров под названием RТ FМ. По ней будут транслироваться чтения различных мануалов и ответы на часто задаваемые вопросы.
    2. "Помогая ленивым людям, ты помогаешь им сесть на свою шею" Сян-Цзы

Информация о теме

Пользователи, просматривающие эту тему

Эту тему просматривают: 1 (пользователей: 0 , гостей: 1)