Вход | Регистрация

1С:Предприятие ::

Метки: 

v8: БП РегистрСведений.ВерсииПодсистем при записи документа

Я
   perkos
 
27.12.12 - 09:03
Ошибка записи/проведения документа Приходный кассовый ордер  от 30.08.2012 23:59:59 [{Форма.Форма.Форма(114)}: Ошибка при вызове метода контекста (Записать): Ошибка при выполнении обработчика - 'ПередЗаписью': {ОбщийМодуль.ОбновлениеИнформационнойБазы.Модуль(414)}: Ошибка при вызове метода контекста (Выполнить): Недостаточно прав для работы с таблицей "РегистрСведений.ВерсииПодсистем"]

добавляю админскую роль пользователю только у нее есть доступ к этому регистру и запись проходит.... вацап? причем здесь обновлениеИБ и этот регистр???

&НаСервереБезКонтекста
Процедура СоздатьДок(ВидДок,Организация,Подотчетник,ДатаДок,СуммаДок,Лимиты)

    ДанныеФизЛица  = ОбщегоНазначенияБПВызовСервера.ДанныеФизЛица(Организация, Подотчетник, ДатаДок, Ложь);
    
    Если ВидДок = "РКО" Тогда
        НовДок = Документы.РасходныйКассовыйОрдер.СоздатьДокумент();
        НовДок.ВидОперации = Перечисления.ВидыОперацийРКО.ВыдачаПодотчетномуЛицу;
        СуммаСл = СлЧисло(1,СуммаДок,Лимиты.ЛимитОт,Лимиты.ЛимитДо);
        НовДок.Выдать = ДанныеФизЛица.Представление;
        НовДок.ПоДокументу = ДанныеФизЛица.ПредставлениеДокумента;
    ИначеЕсли ВидДок = "ПКО" Тогда
        НовДок = Документы.ПриходныйКассовыйОрдер.СоздатьДокумент();
        НовДок.ВидОперации = Перечисления.ВидыОперацийПКО.ВозвратОтПодотчетногоЛица;
        СуммаСл = СлЧисло(2,СуммаДок,Лимиты.ЛимитОт,Лимиты.ЛимитДо);
        НовДок.ПринятоОт = ДанныеФизЛица.Представление;
    КонецЕсли;
    
    вал = Справочники.Валюты;
    вал1 = вал.НайтиПоКоду("643");
    НовДок.ВалютаДокумента = вал1;
    НовДок.СчетКасса = ПланыСчетов.Хозрасчетный.КассаОрганизации;
    НовДок.Организация = Организация;
    НовДок.Дата = ДатаДок;
    НовДок.Контрагент = Подотчетник;
    НовДок.СуммаДокумента = СуммаСл;
    НовДок.Комментарий = "* автокорректировка кассы";
    НовДок.Основание = "* автокорректировка кассы";
    НовДок.Ответственный = Пользователи.ТекущийПользователь();
    Попытка
        
        НовДок.Записать(РежимЗаписиДокумента.Проведение);
        Сообщить("Создан документ: "+НовДок);
    
    Исключение
        Сообщить("Ошибка записи/проведения документа "+НовДок+" ["+ОписаниеОшибки()+"]");
        
    КонецПопытки;

КонецПроцедуры// СоздатьДок()
 
 


Список тем форума
Рекламное место пустует Рекламное место пустует
ВНИМАНИЕ! Если вы потеряли окно ввода сообщения, нажмите Ctrl-F5 или Ctrl-R или кнопку "Обновить" в браузере.
Тема не обновлялась длительное время, и была помечена как архивная. Добавление сообщений невозможно.
Но вы можете создать новую ветку и вам обязательно ответят!
Каждый час на Волшебном форуме бывает более 2000 человек.
Рекламное место пустует