Программная вставка кода

[Nikolaich]

добрый день всем. Может тема и обсуждалась, но мне не удалось найти через поиск.
Задача - как программно поменять код в объекте? Например, Запустив JOb, поменять 2-3 метода на конкретной существующей форме в Аксапте???

[lev]

Цитата:

Сообщение от Nikolaich

добрый день всем. Может тема и обсуждалась, но мне не удалось найти через поиск.
Задача - как программно поменять код в объекте? Например, Запустив JOb, поменять 2-3 метода на конкретной существующей форме в Аксапте???

Посмотрите в этой теме, возможно сможете сделать по аналогии и для форм...

З.Ы. Вопросик. а зачем такое понадобилось, если не секрет?

[pedrozzz]

Общая идея может быть такая:

static void testFormMethod(Args _args)
{
    TreeNodePath        path = @'\Forms\SalesTable\Data Sources\SalesTable\Methods\testMethod';
    
    TreeNode            treeNodeObj;
    MemberFunction      treeNodeMethod;
    str                 source;
    #AOT
    ;

    treeNodeMethod = TreeNode::findNode(path);

    if (treeNodeMethod)
    {
        source = SysUtil::unpackSource(treeNodeMethod.AOTgetSource());

        //-->
        //Производим манипуляции с исходным кодом
        //<--

        treeNodeMethod.AOTsetSource(source);
        treeNodeMethod.AOTcompile();
        treeNodeMethod.AOTsave();

        treeNodeObj = treeNodeMethod.AOTparent();

        while (treeNodeObj.AOTparent()
           &&  treeNodeObj.AOTparent().treeNodePath() != #FormsPath)
        {
            treeNodeObj = treeNodeObj.AOTparent();
        }
    
        treeNodeObj.AOTsave();
    }
}

[Nikolaich]

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

[Михаил Андреев]

"Мьсе знает толк в извращениях"
Если у них эти формы не обновлялись - то можно просто затереть их формы своими.
Если обновлялись - то есть штатная процедура сравнения.

ИМХО, лучше научиться правильной методике обновления (слияния), которая еще для первых версий готовилась Дамгаардами.
Зачем изобретать велосипед, особенно, если есть вероятность, что он не поедет?

P.S. Можно отправлять им только обновления с конкретного слоя. Но для формы это будет не особо актуально - она целиком на слое лежит, в отличие от классов.

[Nikolaich]

да все понятно - есть слои, переименования и прочие пути. просто хотел сделать с минимальными усилиями с их стороны

[Nikolaich]

Цитата:

Сообщение от pedrozzz

Общая идея может быть такая:

static void testFormMethod(Args _args)
{
    TreeNodePath        path = @'\Forms\SalesTable\Data Sources\SalesTable\Methods\testMethod';
    
    TreeNode            treeNodeObj;
    MemberFunction      treeNodeMethod;
    str                 source;
    #AOT
    ;

    treeNodeMethod = TreeNode::findNode(path);

    if (treeNodeMethod)
    {
        source = SysUtil::unpackSource(treeNodeMethod.AOTgetSource());

        //-->
        //Производим манипуляции с исходным кодом
        //<--

        treeNodeMethod.AOTsetSource(source);
        treeNodeMethod.AOTcompile();
        treeNodeMethod.AOTsave();
    }

    treeNodeObj = treeNodeMethod.AOTparent();

    while (treeNodeObj.AOTparent()
       &&  treeNodeObj.AOTparent().treeNodePath() != #FormsPath)
    {
        treeNodeObj = treeNodeObj.AOTparent();
    }
    
    treeNodeObj.AOTsave();
}

Класс ! Работает - спасибо, и , в общем-то быстро все делается!

[Raven Melancholic]

Цитата:

Сообщение от Nikolaich

Класс ! Работает - спасибо, и , в общем-то быстро все делается!

И на какой слой ложатся изменения?

[S.Kuskov]

Цитата:

Сообщение от Raven Melancholic

И на какой слой ложатся изменения?

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

[Nikolaich]

Цитата:

Сообщение от Raven Melancholic

И на какой слой ложатся изменения?

на тот, в рамках которого код и был запущен