Показать сообщение отдельно
Старый 17.09.2004, 10:51   #4  
mazzy is offline
mazzy
Участник
Аватар для mazzy
Лучший по профессии 2015
Лучший по профессии 2014
Лучший по профессии AXAWARD 2013
Лучший по профессии 2011
Лучший по профессии 2009
 
29,472 / 4494 (208) ++++++++++
Регистрация: 29.11.2001
Адрес: Москва
Записей в блоге: 10
Re: Меню пользователя !?
К сожалению, стандартных средств для копирования пользовательского меню между пользователями и приложениями нет.

Цитата:
Изначально опубликовано ShadowFromXZone
Если в тестовой базе создать меню пользователя...
вомпрос как можно это настроенное меню импортнуть... в реальную базу... или есть другой путью
Смотрите, как Аксапта получает список меню
Форма SysUserSetup, метод buildStartupMenuCombo
PHP код:
#AOT
void buildStartupMenuCombo()
{
    
UtilIdElements  utilIdElements;
    
Name            name;
    
userId          userId;
    
TreeNode        treeNode1;
    
Menu          object;

    
startupMenuCombo.add("@SYS26756");

    
userId currentUserId;
    while 
select recordTypename from utilIdElements
        where 
(utilIdElements.recordType    == UtilElementType::UserMenu)
        &&    (
utilIdElements.name          >= userId)
        &&    (
utilIdElements.name          <= userId '|')
    {

        
name subStr(utilIdElements.name,
                     
strFind(utilIdElements.name,
                             
'_',
                             
1,
                             
255)+1
                     
,255);

        
startupMenuCombo.add(name);
        
menus[startupMenuCombo.items()] = name;
    }

    
treeNode1 TreeNode::findNode(#MenusPath);
    
object treeNode1.AOTfirstChild();
    while(object)
    {
        
startupMenuCombo.add(object.label() ? object.label() : object.treeNodeName());
        
menus[startupMenuCombo.items()] = object.treeNodeName();
        
object object.AOTnextSibling();
    }

Разберитесь с записями в UtilIdElements.
Вам придется написать экспорт и импорт этих записей, поскольку записи из UtilIDElements не экспортируются штатными средствами.