Как получить из элемента enum-а код типа (enum-а)?

[Romb]

Подскажите. Приведу пример.
Надо получить из NoYesCombo::No, ID типа NoYesCombo (732).

Сложность в том, что мне неизвестно название типа. Т.е. я не могу воспользоваться enumnum(NoYesCombo). Обыскал AOT, не нашел ничего подходящего. Все методы сводятся к тому, что нужно знать название типа. typeof конечно честно возвращает Types::Enum, что не помогает. Сложилось стойкое ощущение, что задача решается просто, но ни на форуме, ни в доках не нашел решения...

P.S. Для классов, например есть classidget(Object), который возвращает ID типа экзамепляра класса (т.е. ID класса). Неужели тут enum-ы отдыхают?

[George Nordic]

Не совсем понял задачу, но советую Вам обратить внимание на класс DictEnum.

С Уважением,
Георгий

[Romb]

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

Бывают же заморочки с мозгом.

[dn]

Цитата:

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

Задача абсолютно некорректна.

А что если изменить формулировку?

 anytype	a; 
;
a = NoYesCombo::No;

Если мы посмотрим в дебагере значение переменной a, то получим на экране:
Name Value Type
a No NoYesCombo
Теперь наверное можно ставить вопрос как получить эту информацию в X++

[AndyD]

Заднепроходно, но могу предложить такой вариант

static void Job90(Args _args)
{
    EnumId  GetEnumId(AnyType enum)
    {
        ContainerClass  contClass;
        str             sEnum;
        EnumId          enumId = 0;
        ;
        if (typeOf(enum) != Types::Enum)
            return 0;

        contClass = New ContainerClass([enum]);
        sEnum = BinData::dataToString(contClass.toBlob());
        if (sEnum && strlen(sEnum) == 12)
        {
            if (hex2int(substr(sEnum, 1, 2)) == 0x07 && hex2int(substr(sEnum, 3, 2)) == 0x04)
            {
                enumId = (hex2int(substr(sEnum, 9, 2)) << 8) | hex2int(substr(sEnum, 7, 2));
            }
        }
        return enumId;
    }
    ;
    info(int2str(enumnum(NoYesCombo)));
    info(int2str(GetEnumId(NoYesCombo::No)));
}

[Romb]

Excellent! Работает!
Я был 100% уверен, что внутренний формат представления элемента enum-a - простое целое число, из которого конечно никак не получишь свойства элемента enum-a без указания самого enuma. Видимо ошибался.

Andy большое спасибо!
Один вопрос, где можно узнать/почитать о вариантах использования продемонстрированной мистической кухни (см. ниже):

PHP код:


if (hex2int(substr(sEnum, 1, 2)) == 0x07 && hex2int(substr(sEnum, 3, 2)) == 0x04)
{
    enumId = (hex2int(substr(sEnum, 9, 2)) << 8) | hex2int(substr(sEnum, 7, 2));
} 


2Dn. Да, спасибо. Именно это я и пытался сказать.

[AndyD]

Первый байт (первые два символа в строке) значение 0x07 - идентификатор контейнера. Второй байт - тип первого элемента контейнера (0x01 - целое число; 0x00 - строка; 0x02 - число с плаващей точкой; 0x04 - enum; 0x03 - дата; 0x07 - контейнер; есть еще несколько типов). Дальше идут данные, специфические для этого типа (размер может изменяться). Если элементов в контейнере несколько, то после данных предыдущего будет стоять байт с типом элемента и дальше опять данные. Последний байт контейнера равен 0xFF

Сам enum занимает 3 байта: 1-й - значение enum'а; 2-й и 3-й - ID enum'а (хранится в перевернутом виде - младший байт первым)

[Romb]

AndyD спасибо! Очень полезная инфа!

[Logger]

Цитата:

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

Заднепроходно, но могу предложить такой вариант

AndyD, а возможно таким способом определить dataareaID табличного буфера в контейнере ?

А то в Аксапте есть прикольный глюк. Если из контейнера достаешь буфер, то он всегда а dataareaid содержит код текущей компании.

Причем влияет даже на отладчик.
Т.е.
1. берем буфер.
2. Кладем в контейнер.
3. Переключаемся в другую компанию.
4. делаем conpeek - опаньки код компании текущий, а не исходный.
5. Если смотрим содержимое контейнера из под отладчика - то тоже самое - показывает не реальный а текущий код компании.

В 3-ке еще такой фигней страдал метод xRecord.data() - констрактил дубликат со значением dataareaid из текущей компании. В 2009-й его поправили - сохраняет исходное значение.

[Logger]

Т.е. если буфер в контейнер положили, то он как чёрную дыру провалился - нет возможности вытащить информацию о dataareaid никаким способом.

[Logger]

Кстати, для 2009-й джобик будет чуть чуть другим.
Оформил в виде метода для Global

// [url=http://axforum.info/forums/showthread.php?p=97771#post97771]Как получить из элемента enum-а код типа (enum-а)?[/url]
  // pkoz 27.02.2008
static EnumId GRD_GetEnumId(AnyType enum)
{
    ContainerClass  contClass;
    str             sEnum;
    EnumId          enumId = 0;
    ;
    if (typeOf(enum) != Types::Enum)
        return 0;

    contClass = New ContainerClass([enum]);
    sEnum = BinData::dataToString(contClass.toBlob());
//    if (sEnum && strlen(sEnum) == 12)
    if (sEnum && strlen(sEnum) == 14) //+переход на 2009-ю // pkoz 05.08.2011
    {
//        if (hex2int(substr(sEnum, 1, 2)) == 0x07 && hex2int(substr(sEnum, 3, 2)) == 0x04)
        if (hex2int(substr(sEnum, 1, 2)) == 0x07 && hex2int(substr(sEnum, 5, 2)) == 0x04) //+переход на 2009-ю // pkoz 05.08.2011
        {
//            enumId = (hex2int(substr(sEnum, 9, 2)) << 8) | hex2int(substr(sEnum, 7, 2));
            enumId = (hex2int(substr(sEnum, 11, 2)) << 8) | hex2int(substr(sEnum, 9, 2)); //+переход на 2009-ю // pkoz 05.08.2011
        }
    }
    return enumId;
}

[AndyD]

Цитата:

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

AndyD, а возможно таким способом определить dataareaID табличного буфера в контейнере ?

Угум.

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

Во вложении - варианты класса Container2Record для тройки и DAX2009

Класс поддерживает любые типы полей, в том числе контейнерные, содержащие другие контейнеры и BLOB-данные, а так же, для DAX2009, типы int64, guid и UtcDateTime.

При создании табличной переменной (метод Container2Record.record()) в нужной компании в DAX2009 используется changeCompany(). В трешке - метод company()

Так же, возможно получение идентификатора компании через метод Container2Record.DataAreaId() или через статический метод Container2Record:: DataAreaIdFromCon()

PS Подобный вопрос разбирался для получения данных в упакованном поле на MS SQL - Вопрос ConPeek

[mista]

DictEnum::value2id()