|
Перенос комментария контрагента в документ |
☑ |
0
vienya
14.06.24
✎
11:05
|
В БП необходимо текст комментария контрагента автоматически переносить в комментарий кассового документа по данному контрагенту.
Через расширение в модуле формы документа ПКО создал процедуру При начале редактирования()
Объект.Комментарий =
И вот тут не знаю как обратиться к полю Справочники.Контрагенты.Комментарий
|
|
1
vde69
14.06.24
✎
11:13
|
НА СЕРВЕРЕ
Объект.Комментарий = Объект.Контрагент.Комментарий
|
|
2
Мультук
14.06.24
✎
11:17
|
(0)
1) "ПриИзменении" нужно брать событие - "ПриИзменении" !
2) Открываем в конфигураторе ПКО и видим в его реквизитах реквизит "Контрагент".
Думаем - угу, это "жжж не просто так" (с)
Пишем
Объект.Комментарий = Объект.Контрагент.Комментарий;
Радуемся.
Но зря. Ибо 1С говорит нельзя так "Контрагент.Комментарий" {нехорошое слово}, делать "НаКлиенте"
Пишем функцию
&НаСервереБезКонтекста
Функция ПолучитьКомментарийКонтрагента(Контрагент)
Возврат ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Контрагент, "Комментарий");
КонецФункции
А в обработчике "ПриИзменении"
Объект.Комментарий = ПолучитьКомментарийКонтрагента(Объект.Контрагент);
Всё.
|
|
3
Мультук
14.06.24
✎
11:23
|
(1)
Ну зачем так-то? Ну вот зачем?
НА СЕРВЕРЕ -- очень весело, когда так делают в форме заказа с 500 строками например.
Многие "неофиты" до сих пор от всей души не понимают разницу с "НаСервереБезКонтекста"
Объект.Контрагент.Комментарий -- а вместо "контрагент" другой "тяжелый" объект.
А мальчик уже привык через точку и ему лень думать головой.
P.S.
А потом, вы, я и другие начинаем с этим кодом жить, ругаться матом и прочее.
P.P.S.
А потом вы ищите "хороших" "резиновых" ребят. А где же их взять?
|
|
4
Kongo2019
14.06.24
✎
11:31
|
(3) Это будет потом.
|
|
5
vienya
14.06.24
✎
11:43
|
(1) Спасибо
(2) Спасибо за разъяснение по событию. Ваши посты давно уже можно сформировать отдельным учебником. Подкупает авторская подача материала.
|
|
6
vienya
14.06.24
✎
15:32
|
Получилось даже так:
&НаСервереБезКонтекста
Функция
ПолучитьКомментарийКонтрагента(Контрагент)
Контрагент.Комментарий;//безБСП
КонецФункции
&НаКлиенте
Процедура
ПриИзменении
Объект.Комментарий = ПолучитьКомментарийКонтрагента(Объект.Контрагент);
|
|
7
Мультук
14.06.24
✎
15:35
|
(6)
Это не может работать
Вот это может
&НаСервереБезКонтекста
Функция ПолучитьКомментарийКонтрагента(Контрагент)
ВОЗВРАТ Контрагент.Комментарий;//безБСП -- ОЧЕНЬ ЗРЯ!
КонецФункции
|
|
8
Chameleon1980
15.06.24
✎
09:34
|
А мне интересно стало вот это:
А потом вы ищите "хороших" "резиновых" ребят.
что значит?
|
|
9
Мультук
15.06.24
✎
10:21
|
|
|
10
Chameleon1980
15.06.24
✎
10:26
|
(9) спасибо
|
|
Глупец, лишенный способности посмеяться над собой вместе с другими, не сможет долго выносить программирование. Фредерик Брукс-младший