отключение сортировки при lookup

[wojzeh]

Цитата:

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

единственное, что не смог победить - это при компиляции метода выскакивает окошко сообщений компилятора...

я сделал вот так:

...
    this.setCompilerWarningsOff();
    for (i = 1; i <= conlen(lookupItems); i++)
    {
            //override sort method
            methodsNode = controlNode.AOTfindChild('Methods');
            newMethod   = methodsNode.AOTadd('sort');
            newMethod.AOTsetSource(source, false);
            //compile the method
            newMethod.AOTcompile();
            controlNode = iterator.next();
    }
    this.setCompilerWarningsOn();
...

а отключал-включал не мудрствуя лукаво:

class SysTableLookupWithoutSort extends SysTableLookup
{
    SysCompilerTarget   target;
}

public void setCompilerWarningsOff()
{
    ;
    target = SysUserInfo::compilerTarget();
    SysUserInfo::compilerTarget(sysCompilerTarget::MessageWindow);
    SysCompilerOutput::setCompilerTarget(sysCompilerTarget::MessageWindow);
    SysCompilerOutput::updateParm();
}

public void setCompilerWarningsOn()
{
    ;
    SysUserInfo::compilerTarget(target);
    SysCompilerOutput::setCompilerTarget(target);
    SysCompilerOutput::updateParm();
}