Бух 7.7 520 релиз, Счет 76.5
14.01.2011
12:08
#22
Свертка базы это когда на начало (обычно) года все документы предыдущих периодов помечаются на удаление, а остатки формируются операциями на начало года.
14.01.2011
13:11
#25
А той обработкой можно "напортачить", т.к. там замену счета придется настраивать "по условию". Вообще она удобная, но требует аккуратности.
14.01.2011
13:20
#27
"Счет76_5=СчетПоКоду("76.5");
Счет776_5=СчетПоКоду("776.5");
Опер=СоздатьОбъект("Операция");
Опер.ВыбратьОперации();
Пока Опер.ПолучитьОперацию()=1 Цикл
ЕстьИзменения=0;
Опер.ВыбратьПроводки();
Пока Опер.ПолучитьПроводку()=1 Цикл
Если Опер.Дебет.Счет.ПринадлежитГруппе(Счет76_5)=1 Тогда
Опер.Дебет.Счет=Счет776_5;
ЕстьИзменения=1;
КонецЕсли;
Если Опер.Кредит.Счет.ПринадлежитГруппе(Счет76_5)=1 Тогда
Опер.Кредит.Счет=Счет776_5;
ЕстьИзменения=1;
КонецЕсли;
КонецЦикла;
Если ЕстьИзменения=1 Тогда
Опер.Записать();
КонецЕсли;
КонецЦикла;
если так подмену сделать в проводках, то ничего перепроводить не нужно будет, при Опер.Записать() система бухитоги сразу корректирует, поэтому их пересчитывать тоже будет не нужно. В отличие от регистров оперативного учета, бухгалтерские проводки допускают программную (да и ручную тоже, если разрешить) коррекцию результатов проведения документа"
Счет776_5=СчетПоКоду("776.5");
Опер=СоздатьОбъект("Операция");
Опер.ВыбратьОперации();
Пока Опер.ПолучитьОперацию()=1 Цикл
ЕстьИзменения=0;
Опер.ВыбратьПроводки();
Пока Опер.ПолучитьПроводку()=1 Цикл
Если Опер.Дебет.Счет.ПринадлежитГруппе(Счет76_5)=1 Тогда
Опер.Дебет.Счет=Счет776_5;
ЕстьИзменения=1;
КонецЕсли;
Если Опер.Кредит.Счет.ПринадлежитГруппе(Счет76_5)=1 Тогда
Опер.Кредит.Счет=Счет776_5;
ЕстьИзменения=1;
КонецЕсли;
КонецЦикла;
Если ЕстьИзменения=1 Тогда
Опер.Записать();
КонецЕсли;
КонецЦикла;
если так подмену сделать в проводках, то ничего перепроводить не нужно будет, при Опер.Записать() система бухитоги сразу корректирует, поэтому их пересчитывать тоже будет не нужно. В отличие от регистров оперативного учета, бухгалтерские проводки допускают программную (да и ручную тоже, если разрешить) коррекцию результатов проведения документа"
Читают тему
(гостей: 1)