Имя: Пароль:
1C
1С v8
БП 3. Документ интерактивно проводится, программно - нет
0 егаис
 
07.07.15
17:03
Даже если включаю пользователю привелигированный режим. Появляется ошибка, что не удалось провести документ "Реализация товаров и услуг" и все. Причина не показывается (в любом клиенте). Интерактивно под тем же пользователем документ создается и проводится.
Документы создаются с обработки, в табличной части формируются данные для заполнения.
&НаСервере
Процедура СоздатьДокументыНаСервере()
    
    УстановитьПривилегированныйРежим(Истина);
    
    Для Каждого Строка Из Объект.Документы Цикл
        Если ЗначениеЗаполнено(Строка.Ссылка) Тогда  //есть документ, пропустим
            Продолжить;
        КонецЕсли;    
        
        Если Не Строка.Флаг Тогда
            Продолжить;
        КонецЕсли;
        
        ДокРеализация = Документы.РеализацияТоваровУслуг.СоздатьДокумент();
        ДокРеализация.ВидОперации = Перечисления.ВидыОперацийРеализацияТоваров.Услуги;
        ДокРеализация.Дата = ТекущаяДата();
        ДокРеализация.Организация = Объект.Организация;
        ДокРеализация.Контрагент = Строка.Контрагент;
        ДокРеализация.ДоговорКонтрагента = Строка.Договор;
        ДокРеализация.ВалютаДокумента = ОбщегоНазначенияБПВызовСервераПовтИсп.ПолучитьВалютуРегламентированногоУчета();
        ДокРеализация.ВыводМесяцаВТЧ = Истина;
        ДокРеализация.СчетУчетаРасчетовСКонтрагентом = ПланыСчетов.Хозрасчетный.РасчетыСПокупателями;
        ДокРеализация.СчетУчетаРасчетовПоАвансам = ПланыСчетов.Хозрасчетный.РасчетыПоАвансамПолученным;
        ДокРеализация.СпособЗачетаАвансов = Перечисления.СпособыЗачетаАвансов.Автоматически;
        
        НоваяСтрока = ДокРеализация.Услуги.Добавить();
        НоваяСтрока.Номенклатура = Строка.НашаУслуга;
        НоваяСтрока.Содержание = Строка.СодержаниеУслуги;
        НоваяСтрока.Количество = 1;
        НоваяСтрока.Цена = Строка.СуммаАкта;
        НоваяСтрока.Сумма = Строка.СуммаАкта;
        НоваяСтрока.СтавкаНДС = Перечисления.СтавкиНДС.БезНДС;
        НоваяСтрока.СчетДоходов = ПланыСчетов.Хозрасчетный.ВыручкаНеЕНВД;
        НоваяСтрока.СчетРасходов = ПланыСчетов.Хозрасчетный.СебестоимостьПродажНеЕНВД;
        НоваяСтрока.СчетУчетаНДСПоРеализации = ПланыСчетов.Хозрасчетный.Продажи_НДС;
        НоваяСтрока.Субконто = НоваяСтрока.Номенклатура.НоменклатурнаяГруппа;
        
        ДокРеализация.Записать(РежимЗаписиДокумента.Проведение);
        
        СчетФактура = Документы.СчетФактураВыданный.СоздатьДокументНаОсновании(ДокРеализация.Ссылка);
        
        Строка.Ссылка = ДокРеализация.Ссылка;
    КонецЦикла;    
    
    УстановитьПривилегированныйРежим(Ложь);
    
    
КонецПроцедуры
\\\\\\\\\\
Подозрения на отсутствие каких-то прав, но вот как, если интерактивно все вводится.
1 ВРедная
 
07.07.15
17:04
проводи в попытке, в исключении выводи ошибку на экран
2 егаис
 
08.07.15
16:17
Попытка
            ДокРеализация.Записать(РежимЗаписиДокумента.Проведение);
        Исключение
            ОбменДаннымиСервер.СообщитьОбОшибке(ИнформацияОбОшибке());
        КонецПопытки;    
/////
Ошибка "Несоответствие типов"

Работает только под полными правами. Гуру, кто создавал свои роли, куда купать?
3 егаис
 
08.07.15
16:20
врубил все флажки кроме "ПолныеПрава", сработало. Ковырять все роли - это схвитнуться! Может кто-то подскажет на какую роль обратить внимание?
4 егаис
 
08.07.15
16:39
хелпми
5 егаис
 
08.07.15
16:43
устанавливал пользователю группами роли по 5-10 ролей чтобы выявить "нужную" роль. Стало понятно, что проблема не в одной роли, а каком-то множестве ((( совсем не легче от этого.
Неужели никто роли не создавал? Можно еще каким-то образом инициализировать ошибку, более развернуто?
6 Господин ПЖ
 
08.07.15
16:46
в жр есть отдельные ошибки по доступу
7 егаис
 
08.07.15
16:47
(6) блин!! как я не догадался?! Спасибо, мил человек!
8 Лефмихалыч
 
08.07.15
16:48
может прав нет на установитьпривелегированныйрежим?..
9 zak555
 
08.07.15
16:49
СоздатьДокументыНаСервере

где находится ?
10 егаис
 
08.07.15
16:51
так вот она - ошибка!
нет прав на план обмена СнхронизацияДанныхЧерезУниверсальныйФормат
Спасибо!