Можно ли передать в макрос значение из переменной?

[propeller]

int k = 1;

#localMacro.Macro
...
#endMacro

Можно ли передать в макрос значение переменной k, то есть не "k" а "1"?

если делать так
#macro(k)
то передаваемое значение = "k"

[lev]

Цитата:

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

int k = 1;

#localMacro.Macro
...
#endMacro

Можно ли передать в макрос значение переменной k, то есть не "k" а "1"?

если делать так
#macro(k)
то передаваемое значение = "k"

посмотрите для примера макрос InventDimJoin.
думаю по аналогии можно что то придумать.

[lev]

навял пример, вроде работает

ItemId      itemId = 'Моя номенклатура';
    InventTable inventTable;

    #localmacro.SelectInvTable
        select %1
            where %1.ItemId == %2
    #endmacro

    #selectInvTable(inventTable, itemId);

    info(inventTable.ItemName);

[Gustav]

До кучи: Можно ли в SELECT использовать критерия вида "10..20"

[S.Kuskov]

Цитата:

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

Можно ли передать в макрос значение переменной k, то есть не "k" а "1"?

Имя переменной - можно, значение - НЕЛЬЗЯ. Но то это и называется МАКРО подстановка. Если вам необходимо динамически конструировать выполняемый код, то попробуйте поискать в сторону
str to X++

Упс. не посмотрел, что та тема тоже ваша . Может поделитесь, что вы такое делаете, может найдётся вариант попроще

[propeller]

Немного изменилась задача: не просто передать параметр, а передать так чтобы можно было его значение сравнить при помощи синтаксиса макроса (#IF.ARG() или что то подобное)

Вот этот job не выдает сообщение.
Но если вызвать так: #cycle(AccountNum,1) то info() jотрабатывает.
Может быть пользуюсь не правильным условием?

static void Job1(Args _args)
{
    CustTable CustTable;
    AccountNum AccountNum = "Клиент1";
    int int1 = 1;
    ;
    #localMacro.cycle
    #DEFINE.ARG(%2)
    while select *
    from CustTable
    where CustTable.AccountNum == %1
    {
        #IF.ARG(1)
        info (CustTable.AccountNum);
        #ENDIF
    }
    #UNDEF.ARG
    #endMacro
    #cycle(AccountNum,int1)
}

[S.Kuskov]

Цитата:

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

Может быть пользуюсь не правильным условием?

Дело не в условии. Дело в том, что абсолютно все макроподстановки выполняются на этапе компиляции (где, как вы сами понимаете значение переменных ещё не определено). Хотите runtime - используйте подпрограммы.

Цитата:

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

передать так чтобы можно было его значение сравнить при помощи синтаксиса макроса (#IF.ARG() или что то подобное)

А с чем связано это ограничение? почему не простое

if ((%2) == 1)

[Bober]

Цитата:

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

Может быть пользуюсь не правильным условием?

может быть вы пользуетесь неправильной постановкой задачи? какова исходная цель работы? не с технической точки зрения, а с функциональной, пользовательской ?

Налицо также непонимание вами что такое "макроподстановка". Это не процедура и не метод класса. Это подстановка части кода при компиляции.

[S.Kuskov]

А какая у вас версия? Если тройка, то может вот в этом дело Что такое #if.never ?

Цитата:

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

Хотелось бы отметить, что в тройке (по крайней мере до SP2 включительно) при использовании "сокращенного" варианта в конструкциях #macro, #localmacro, #globalmacro не будут доступны параметры %1, %2, ...

[propeller]

Цитата:

Сообщение от S.Kuskov

Дело не в условии. Дело в том, что абсолютно все макроподстановки выполняются на этапе компиляции (где, как вы сами понимаете значение переменных ещё не определено).

Дело именно в условии, потому что параметр AccountNum передал ИМЕННО значение а не кусок кода.
Второй же параметр попадая в условие #IF.ARG(1)
Сравнил как кусок кода, а не как значение параметра.

Зачем? вопрос чисто теоретический, понятно, что я могу сделать и по-другому но просто интересно.
Версия Ax 4.0 sp2

[S.Kuskov]

Цитата:

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

Сравнил как кусок кода, а не как значение параметра.

Именно, и никак иначе. Именно это и назывется макроподстановкой

[Gustav]

Цитата:

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

Дело именно в условии, потому что параметр AccountNum передал ИМЕННО значение а не кусок кода.

Не-а. Именно КУСОК КОДА - грубо говоря, фрагмент текста программы вида "AccountNum".
Измените тип переменной AccountNum и посмотрите, что получится:

    str AccountNum = "Клиент1";
    // AccountNum AccountNum = "Клиент1";

Имеем сообщение компилятора: "Контейнерные и текстовые поля не могут быть использованы в выражении WHERE."

Еще иллюстрация. Верните всё обратно, после чего внесите такие изменения:

    AccountNum AccountNum = "Клиент1";
    ..................    
    while select *
    from CustTable
    // where CustTable.AccountNum == %1
    where CustTable.AccountNum %1
    ..................    
    //#cycle(AccountNum,int1)
    #cycle(== AccountNum,int1)
}

Всё компилируется и работает.

[Владимир Максимов]

Цитата:

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

Не-а. Именно КУСОК КОДА - грубо говоря, фрагмент текста программы вида "AccountNum".
Измените тип переменной AccountNum и посмотрите, что получится:

    str AccountNum = "Клиент1";
    // AccountNum AccountNum = "Клиент1";

Имеем сообщение компилятора: "Контейнерные и текстовые поля не могут быть использованы в выражении WHERE."

Это старая фича, которая вполне адекватно описана в сообщении об ошибке. И макросы тут совершенно не при чем. Ошибка будет и в тексте программы без макроса. Проблем в том, что не указана размерность символьного переменной.

Для исправления ошибки досточно всего-лишь явно задать размерность символьной переменной

    str 10 AccountNum = "Клиент1";

[S.Kuskov]

Цитата:

Сообщение от Владимир Максимов

И макросы тут совершенно не при чем

Ключевым моментом здесь является, не какая-то конкретная ошибка, а тот факт что ошибка вообще возникла на этапе компиляции. Тем самым ещё раз подтверждая, что макросы заменяются их значениями именно во время компиляции!