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

Реквизиты из документа записать в справочник

Автор Will, 13 июн 2011, 01:13

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

wolf3d

ойойой) совсем не так

вв=справочники.ТВОЙСПРАВОЧНИК.создатьЭлемент();
вв.фамилия = Фамилия;
вв.имя=имя;
...
вв.записать();

циклы тут совсем не нужны

Will


cska-fanat-kz

wolf3d конечно спасибо, но вариант со справочником - плохой (
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

Шурыгин Иван Сергеевич

исходя из задачи, предлагаю как основной вариант, вариант предложенный фанатом, создаем первым перечисление: состояние документа:
- черновик
- отправлено на проверку
- проверено и утверждено
далее регистр я думаю уже нет смысла делать. я так понял пользователи в разных отделах разные, так вот я предлагаю создать новую план видов характеристику настройка пользователя. значения булево. например УтверждаешьАнкеты. далее обойтись формой списка документа и формой документа собственно.

теперь объясняю как пользоваться:
при создании харатеристики лучше ее поместите сразу в какую нибудь группу... например другие настройки. далее у каждого пользователя в справочнике пользователей появится ваша доп харакрестика. значение дополнительной характеристики хранится в регистре сведений НастройкиПользователей.

после того, как вы зайдете под каждым пользователем который участвует в вашей задаче, и проставите им истина или ложь.

теперь идет в форму списка документов "Анкета". добавляем над формой реквизит ТипПоказываемыхДокументов. тип перечисление состояние документа. настраиваем на кнопку список выбора. далее такой код


Процедура ПриОткрытии()
ТекстЗапроса = "ВЫБРАТЬ Значение Из РегистрСведений.НастройкиПользователей Где Пользователь = &Пользователь И Настройка = &Настройка";
Запрос = Новый Запрос(ТекстЗапроса);
Запрос.УстановитьПараметр("Пользователь",глЗначениеПеременной("глТекущийПользователь"));
Запрос.УстановитьПараметр("Настройка",ПланыВидовХарактеристик.НастройкиПользоватей.УтверждаетАнкету);
СписокВозможныхСостояний = Новый СписокЗначений;
Выборка = Запрос.Выполнить.Выбрать();
Если Выборка.Следующий() Тогда
Если Выборка.Значение Тогда //проводит и утверждает
СписокВозможныхСостояний.Добавить(Перечисления.Состояния.ОтправленоНаПроверку);
СписокВозможныхСостояний.Добавить(Перечисления.Состояния.ПровереноИУтверждено);
Иначе //вводит
СписокВозможныхСостояний.Добавить(Перечисления.Состояния.Черновик);
СписокВозможныхСостояний.Добавить(Перечисления.Состояния.ОтправленоНаПроверку);
КонецЕсли;
Иначе //у пользователя вообще прав не указано!
Возврат;
КонецЕсли;

ЭлементыФормы.Состояния.СписокВыбора = СписокВозможныхСостояний;
ПриИзмененииСостояния(Неопределено);

//оставшийся код процедуры
КонецПроцедуры

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


в коде документа, что то похожее делать
===================================
жизнь надо прожить так, чтоб вверху посмотрели.
и сказали "А ну ка повтори"
===================================

cska-fanat-kz

Ну вы [Иван Сергеевич] блин даете! ((с)"Особенности национальной охоты")
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

Will

Шурыгин Иван Сергеевич, спасибо большое.
Это конечно правильнее и грамотнее, но как-то сложновато для понимания...  :xfbnsdfb:
Ладно, буду разбираться.
Спасибо, Вам )))

Шурыгин Иван Сергеевич

Цитата: cska-fanat-kz от 13 июн 2011, 16:58
Ну вы [Иван Сергеевич] блин даете! ((с)"Особенности национальной охоты")
такой код рекомендуют сами разработчики... особенно при разработке своих конфигураций)
===================================
жизнь надо прожить так, чтоб вверху посмотрели.
и сказали "А ну ка повтори"
===================================

cska-fanat-kz

Цитата: Шурыгин Иван Сергеевич от 15 июн 2011, 11:01
Цитата: cska-fanat-kz от 13 июн 2011, 16:58
Ну вы [Иван Сергеевич] блин даете! ((с)"Особенности национальной охоты")
такой код рекомендуют сами разработчики... особенно при разработке своих конфигураций)

Не спорю, но может быть начать с чего-нибудь по-проще?
Чтобы появилось "понимание".
А до вашего решения - в последствии доработать можно...

Просто ради простейшего контроля за состоянием громоздить
справочник "Пользователи", план видов характеристик... что у вас там еще?
Только потому что "так доктор прописал"?..
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

Шурыгин Иван Сергеевич

Цитата: cska-fanat-kz от 15 июн 2011, 12:10
Цитата: Шурыгин Иван Сергеевич от 15 июн 2011, 11:01
Цитата: cska-fanat-kz от 13 июн 2011, 16:58
Ну вы [Иван Сергеевич] блин даете! ((с)"Особенности национальной охоты")
такой код рекомендуют сами разработчики... особенно при разработке своих конфигураций)

Не спорю, но может быть начать с чего-нибудь по-проще?
Чтобы появилось "понимание".
А до вашего решения - в последствии доработать можно...

Просто ради простейшего контроля за состоянием громоздить
справочник "Пользователи", план видов характеристик... что у вас там еще?
Только потому что "так доктор прописал"?..

я обычно стараюсь действовать по поговорке "делать надо как можно лучше, плохо само получится":)
===================================
жизнь надо прожить так, чтоб вверху посмотрели.
и сказали "А ну ка повтори"
===================================

cska-fanat-kz

А еще есть "Все гениальное - просто" ;)

Похоже спор теряет конструктив(?) )
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

Теги:

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

Рейтинг@Mail.ru

Поиск