Перенос участников между маркетинговыми списками

//<List.OnLoad>
var oMenuItemText = "Перенести в другой список";

var _loadarea = loadArea;
loadArea = function(sArea, sParams, sUrl, bIsvMode)
{
    _loadarea(sArea, sParams, sUrl, bIsvMode);

    if (sArea != "areaListMember") return;

    var oFrame = document.getElementById(sArea + "Frame");
    oFrame.onreadystatechange = function()
    {
        if (oFrame.readyState == "complete")
        {
            var odoc = oFrame.contentWindow.document;
            AddMenuItem(odoc);
        }
    }
}

var AddMenuItem = function(oDocument)
{
    var oId = '_MImoveListMember';

    var oAction = 'action="'; 
    // Вызов функции копирования в другой список
    oAction += "doAction('crmGrid', '4301', 'copylistmember');";
    // Вызов функции удаления из текущего списка
    oAction += "doActionEx('crmGrid', '4301', top.crmFormSubmit.crmFormSubmitId.value, 'delete', top.crmFormSubmit.crmFormSubmitObjectType.value, 'tab=areaListMember');";
    oAction += '"';

    var oMenuItemHtml = '<LI class="ms-crm-MenuItem-Label" id="' + oId + '" ' + oAction + '></LI>';
    var oMenu = oDocument.getElementById("mnuMoreActions");

    var oItem = oMenu.appendChild(oDocument.createElement(oMenuItemHtml));
    oItem.innerHTML = '<SPAN class="ms-crm-MenuItem-Label">' +
                    '<A class="ms-crm-MenuLink" onclick="return false;" href="javascript:onclick();" target="_self">' +
                        '<SPAN class="ms-crm-MenuItem-Icon"></SPAN>' +
                        '<SPAN class="ms-crm-MenuItem-Text">' +
                            oMenuItemText +
                        '</SPAN>' +
                    '</A>' +
                '</SPAN>';
}
//</List.OnLoad>