Тема: Оприходование учётных/расчётных документов
Доброго дня!
Для упрощения работы пользователя в складском учёте создаём/проводим массово документы (5-6 документов уже чувствительно) следующим образом:
BdocToID = theApp.Inventory.BalanceDocuments.AddBalanceDocument2( ... )
Set BdocTo = theApp.Inventory.SingleBalanceDocFromID(BdocToID)
Set BdocToSpec = BdocTo.p_BalanceDocumentSpecification.AsIDispatch
If Not BdocToSpec Is Nothing Then
BdocToSpec.CreateNew
BdocToSpec.p_NMK_ID.Value = DB_Consts.NMK_BLANK_ID
BdocToSpec.p_QUANTITY.Value = NMK_QUAN
BdocToSpec.p_BALANCENMKCARD_ID.Value = BcardFromID
BdocToSpec.SaveChanges
BdocToSpec.CancelChanges
end if
BdocTo.Refresh
[b]BdocTo.ActionList.ActionByName("AcceptAction").Execute[/b]
Dim checkBDocTo :: checkBDocTo = BdocTo.ShowModal("Проверьте, что документ списания заготовок был оприходован!")
Set BdocTo = Nothing
Set BdocToSpec = NothingЕсли скрипт запускает пользователь с правами администратора - всё приходуется автоматически. Если же обычный пользователь, имеющий возможность оприходовать документ через стандартный интерфейс "руками", документ не приходуется. Получается в рамках закрытия операции контролёром пользователю приходится просматриваться и закрывать по 6 документов, пусть и выведенных с помощью showModal.
Какие права должны быть разданы пользователю, чтобы AcceptAction работал через API? Может, есть какой-то иной способ оприходования документа?
