0
Zhuravlik
22.04.12
✎
23:02
|
Подскажите пожалуйста, что не нравится?
ВыбратьСтроки();
Пока ПолучитьСтроку() = 1 Цикл
Рег = Регистр.ПолучитьАтрибут(ИдентификаторРегистра);
Рег.УстановитьАтрибут(Метаданные.Регистр(ИдентификаторРегистра).Измерение(1).Идентификатор, ОсновноеИзмерение);
Рег.УстановитьАтрибут(Метаданные.Регистр(ИдентификаторРегистра).Измерение(2).Идентификатор, ДополнительноеИзмерение);
Рег.Сумма = Сумма;
Если ИдентификаторРегистра <> "СтатьиДоходовИРасходов" Тогда
Рег.Количество = Количество;
КонецЕсли;
Если флСписаниеПриход = 1 Тогда
Рег.ДвижениеПриходВыполнить();
ИначеЕсли флСписаниеПриход = 2 Тогда
Рег.ДвижениеРасходВыполнить();
КонецЕсли;
КонецЦикла;
|
|