Бухгалтерия предприятия 2.0 (клиент-серверный вариант работы)

При записи СписаниеСРасчетногоСчета штатно изменяется платежное поручение (ПП) (в нем ставится "признак" оплаченности)

Хочу при наличии такого признака в ПП запретить записывать ПП любым способом, кроме редактирования списания с расчетного счета.

Как сделать? Хочется какое-нибудь красивое решение.
Конфигурацию можно править.

Передавай в объект допсвойство и анализируй его перед записью, делов-то.

(1) Как в ПередЗаписью передать параметр?

ЭтотОбъект.ДополнительныеСвойства.Вставить("ИзСписания",Истина)

(3) Прекрасно, а каким образом мы поймем, что это доп. свойство установлено именно при проведении ПП, а не кем-то вручную. И что помешает пользователю самому создать такое свойство руками?

+ Доп свойства будут доступны для конкретного экземпляра объекта в процедуре.

При проведении Списания у объекта их установим, в процедуре ПередЗаписью() у ПП они будут доступны?

должно быть при проведении списания получается ПП(объект) и записывается. Если ему установить допсвойство то оно будет доступно все время существования объекта(и перед записью тоже)

Проверить наличие своййства можно так
Если ДополнительныеСвойства("ИзСписания",ИзСписания) И ИзСписания = Истина Тогда

(6) Время существования какого объекта? Объекта встроеного языка или объекта БД?

Объекта встроеного языка

(8) Каким образом объект встроенного языка перенесется из процедуры СписанияСРасчетногоСчета в процедуру ПП?

ЭтотОбъект.Записать()

(10)



После "объектПП_.Записать();" в списании управление передается в ПередЗаписью ПП.
грубая прикидка ниже.


*** Списание. МодульОбъекта

При проведении:

ссылка_ = ЭтотОбъект.ПлатежноеПоручение;
объектПП_ = ссылка_.ПолучитьОбъект();

//объектПП_  - это тот самый объект встроенного языка.

объектПП_.ДополнительныеСвойства.Вставить("ИзСписания",Истина)
объектПП_.Записать();



*** ПП. МодульОбъекта

ПередЗаписью

ДополнительныеСвойства("ИзСписания",ИзСписания) - ?

//Здесь будут видны доп. свойства????

да, будет видно и в модуле объекта и в подписках

(6) тут ошибочка
правильно
ДополнительныеСвойства.Свойство("ИзСписания",ИзСписания)

т.е. дополнительные свойства это структура которая прилеплена к объекту

pervakovanton

Спасибо, что открыл глаза на дополнительные свойства.
Раньше их не использовал.