Имя: Пароль:
1C
1C 7.7
v7: Запись в справочник
0 work92
 
21.07.16
16:20
Есть справочник материалы нужно разделить цену на 10 000 и записать обратно цену (но цена остается старая).

Процедура Выполнить()
МатСпр=создатьОбъект("Справочник.Материалы");
МатСпр.ВыбратьЭлементы();
Пока МатСпр.ПолучитьЭлемент()=1 Цикл  
ЦенаМТ=Число(МатСпр.Цена);
Сообщить("=1= "+ ЦенаМТ);
Цена=Окр(ЦенаМТ/10000,2);
Сообщить("код"+МатСпр.Код+" "+Цена);
МатСпр.Записать();
КонецЦикла;
КонецПроцедуры
1 Господин ПЖ
 
21.07.16
16:20
это сложно
2 Господин ПЖ
 
21.07.16
16:21
а цена наверное в периодике валяется
3 work92
 
21.07.16
16:23
Цена не периодическая
4 Ёпрст
 
21.07.16
16:23
(0) ну п..ц
МатСпр.Цена = МатСпр.Цена/10000;
МатСпр.Записать();
5 Ёпрст
 
21.07.16
16:25
если периодика, то, так, например:


МатСпр=создатьОбъект("Справочник.Материалы");
МатСпр.ИспользоватьДату(ТекущаяДата());
МатСпр.ВыбратьЭлементы();
Пока МатСпр.ПолучитьЭлемент()=1 Цикл
       МатСпр.Цена = МатСпр.Цена/10000;
       МатСпр.Записать();  
КонецЦикла;
6 Ёпрст
 
21.07.16
16:26
А вообще, вам, белоруссам, проще было бы свернуть базу и начать с новой базы, с вашей то деноминацией.
7 linoblack
 
21.07.16
22:34
(0) так Вы же в справочник ничего и не вносите, потому и не меняется. вы в переменные заносите и переменные выводите на экран. перед словом "Цена=" не хватает "МатСпр."