Есть мысль сделать динамическую подмену классов "Документ","Документ.ХХХ","Справочник","Справочник.ХХХ".
Цель - контроль программного изменения объектов.
Перед загрузкой 1С++ формируется файл "defcls.prm" след.содержания:

Класс Документ=Документ.txt:Document {};
Класс Документ.ПоступлениеТоваров=Документ.txt:Document.ПоступлениеТоваров {};
... и т.д. для всех объектов метаданных
 

Создание и подмена происходит на отлично.
Есть один момент-"ТипЗначенияСтр()" возвращает имя класса (напр. "Документ.ПоступлениеТоваров" а не "Документ").
Есть ли возможность обойти это?
И вообще - есть какие-нибудь подводные камни?

Интересный вариант.
Всегда думал, что 1-м способом подменить нельзя, но как-то даже не проверял.
А сами уже созданные документы нормально открываются, проводятся и т.д.? В обычных журналах документов все видно?
Форма нового документа через ОткрытьФорму() открывается?
и т.д.?

Ща сделаю небольшую конфу - покажу

Гонял это дело в копии рабочей - появился баг:

Переопределились классы (с новой процедурой "Записать", где идет запись журнала):
"Справочник.Номенклатура"
"Справочник.sys_ЖурналРегистрацииРеквизиты"

Есть класс "КонтрольИзменений" в котором идет анализ справочника "sys_ЖурналРегистрацииРеквизиты"

В простом цикле перебора справочника "Номенклатура" и их записью 1С падает без лишних слов...
Если не переопределять "Справочник.sys_ЖурналРегистрацииРеквизиты" - все ОК

Прикрепил вариант конфы стаким багом

Не слишком универсальное решение получается

Тут все очень не просто

Chieftain писал(а) 04. Апреля 2007 :: 05:31:

Функция _ПолучитьКод()
Возврат "МоеИмяТипаКласса";

Deb писал(а) 04. Апреля 2007 :: 08:02:

Не понял. Это разве для ТипЗначенияСтр()?

Всегда думал, что _ПолучитьКод() используется для получения строкового представления. То есть для Строка().

artbear писал(а) 04. Апреля 2007 :: 08:06:

УПС

Chieftain писал(а) 03. Апреля 2007 :: 08:26:

Пока можно использовать подобное решение.

artbear писал(а) 13. Апреля 2007 :: 03:35:


Попробуй объясни клиенту, что ему во все конфы надо добавить процедуру...
и библиотеку надо использовать именно эту а не родную

artbear писал(а) 13. Апреля 2007 :: 12:15:


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

Значит ждем от тебя решения этого вопроса в будующем...

artbear писал(а) 13. Апреля 2007 :: 12:15:


А не возникало мыслей по поводу перехвата стандартных методов объектов "Регистр" - ДвижениеВыполнить,ДвижениеПриходВыпонить и т.п. в контексте документа?
Было бы очень неплохо иметь возможность корректировать созданные движения перед выполнением движения

Метод ТипЗначенияСтр нельзя переопределить ни в глобальнике, ни в любом другом модуле.
Синтакс-контроль ругается.

походу окончательная идея эта загнулась?

Внедрил в демо «Базовая Типовая конфигуpация» (7.70.545) и запустил «Проведение документов» — отвалилось:

ПериодическийРеквизит = СоздатьОбъект("Периодический");
ПериодическийРеквизит.ИспользоватьОбъект("ОбъектМодернизирован", ОсновноеСредство);
{Документ.НачислениеАмортизации.Модуль Документа(30)}: ОбъектМодернизирован не является константой или периодическим параметром!

Отключил подмену для Справочник.ОсновныеСредства и перепроведение успешно завершилось.

Подскажите, движения в этом направлении или иные работоспособные методы контроля программного изменения объектов существуют?

[quote author=xxc link=1175586636/30#30 date=1346244178]
ПериодическийРеквизит = СоздатьОбъект("Периодический");
ПериодическийРеквизит.ИспользоватьОбъект("ОбъектМодернизирован", ОсновноеСредство);
{Документ.НачислениеАмортизации.Модуль Документа(30)}: ОбъектМодернизирован не является константой или периодическим параметром!
[/quote]

Необходимо также создать свой КОП-наследник от "Периодический",
в котором переопределить метод "ИспользоватьОбъект()"
примерно так:

[code]//#class Периодический = Периодический.ert : Periodic {};
[/code]
и метод класса :

[code]процедура ИспользоватьОбъект(сРеквизит,ОбСпрСчет="") Экспорт
   если ТипЗначения(ОбСпрСчет)=100 тогда
       попытка
           ИспользоватьОбъект(сРеквизит,ОбСпрСчет.ТекущийЭлемент())
       исключение
           ИспользоватьОбъект(сРеквизит,ОбСпрСчет.ТекущийСчет())
       конецПопытки
       возврат;
   конецЕсли;
  ;
конецпроцедуры
[/code]

И ВООБЩЕ ИДЕЯ, ПОКАЗАННАЯ ЗДЕСЬ

должна быть распространена [u]НА ВСЕ[/u] нативные объекты 1С
у которых есть методы в качестве параметров которых
могут быть (случайно или преднамеренно) переданы
вместо нативных агрегатных объектов 1С их "КОП-заменители".....

Пример: если переопределили "Справочник"
то не забываем переопределить
(кроме Периодический.ИспользоватьОбъект())
например, это:

[b]БухгалтерскиеИтоги.ИспользоватьРазделительУчета(Объект)
БухгалтерскиеИтоги.ИспользоватьСубконто(...)
БухгалтерскиеИтоги.ИспользоватьКорСубконто(...)
[/b]
а также - смотрите другие объекты 1С и их методы....

В этом случае гарантированно всё будет работать.

Остается одна загвоздка: вызов глобальных процедур/функций [u](+их англ.синонимы)[/u]
[color=#ff0000]ТипЗначенияСтр()[/color]
[color=#ff0000]ОткрытьФорму()[/color]
[color=#ff0000]ОткрытьФормуМодально()[/color]
[color=#ff0000]наверняка есть другие, нужно смотреть...[/color]
для которых в качестве параметра
может быть также передан вместо документа/справочника
их "КОП-заменитель"....

Для ТипЗначенияСтр() предложено "поправить ресурс 106"
о котором говорилось выше...... Как быть с остальными?

ПРЕДЛАГАЮ УНИВЕРСАЛЬНОЕ РЕШЕНИЕ ДЛЯ ПЕРЕХВАТА ВЫЗОВОВ ГЛОБАЛЬНЫХ ПРОЦЕДУР/ФУНКЦИЙ
здесь [url]http://www.1cpp.ru/forum/YaBB.pl?num=1375173463[/url]