Имя: Пароль:
1C
1С v8
Редактирование проводок в закрытом периоде
0 егаис
 
17.08.17
10:05
Для документов понятно, Док.ОбменДанными.Загрузка = Истина
А если я правлю аналитику в РБ.Хозрасчетный, как разрешить изменять значения?
Ну вот код для примера

    Запрос = Новый Запрос;
    Запрос.Текст =
        "ВЫБРАТЬ РАЗЛИЧНЫЕ
        |    ХозрасчетныйОбороты.Регистратор,
        |    ХозрасчетныйОбороты.Период
        |ИЗ
        |    РегистрБухгалтерии.Хозрасчетный.Обороты(&ДатаНачала, &ДатаОкончания, Регистратор, Счет = &Счет) КАК ХозрасчетныйОбороты
        |
        |УПОРЯДОЧИТЬ ПО
        |    ХозрасчетныйОбороты.Период";
    
    Счет10 = ПланыСчетов.Хозрасчетный.Материалы;
    
    Запрос.УстановитьПараметр("ДатаНачала", Дата(2017,01,01));
    Запрос.УстановитьПараметр("ДатаОкончания", Дата(2017,08,20));
    Запрос.УстановитьПараметр("Счет", Счет10);
    
    ПустоеПодразделение = Справочники.ПодразделенияОрганизаций.ПустаяСсылка();
    
    РезультатЗапроса = Запрос.Выполнить();
    
    ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
    
    Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
        ПроводкиБУ = РегистрыБухгалтерии.Хозрасчетный.СоздатьНаборЗаписей();
        ПроводкиБУ.Отбор.Регистратор.Установить(ВыборкаДетальныеЗаписи.Регистратор);
        ПроводкиБУ.Прочитать();
        Для Каждого Проводка Из ПроводкиБУ Цикл
            Если Проводка.СчетДт = Счет10 Тогда
                //наши действия
            КонецЕсли;
        КонецЦикла;    
        ПроводкиБУ.Записать();
    КонецЦикла;
1 h-sp
 
17.08.17
10:09
(0) ну вы попробуйте. скорее всего нет запрета там.
2 Михаил Козлов
 
17.08.17
10:10
Если не ошибаюсь, проверка на период делается и для наборов записей регистров.
3 Вафель
 
17.08.17
10:11
РБ.Хозрасчетный.ОбменДанными.Загрузка = Истина
4 егаис
 
17.08.17
10:11
(1) есть проверка
5 егаис
 
17.08.17
10:12
(3)РегистрыБухгалтерии.Хозрасчетный.ОбменДанными.Загрузка = Истина;
6 егаис
 
17.08.17
10:12
{ВнешняяОбработка.ВнешняяОбработка1.Форма.Форма.Форма(29)}: Поле объекта не обнаружено (ОбменДанными)
    РегистрыБухгалтерии.Хозрасчетный.ОбменДанными.Загрузка = Истина;
7 егаис
 
17.08.17
10:13
а вот так сработало
ПроводкиБУ.ОбменДанными.Загрузка = Истина;

Спасибо, закрываем
8 vicof
 
17.08.17
10:15
Приятно поговорить с умным человеком