v7: Цикл 🠗 (Волшебник 01.05.2017 20:19)
☑
0
amon_ra
01.05.17
✎
12:15
Здрасте. помогите разобраться с циклом. Надо что бы он повторялся определенное количество раз от выставленного значения месяц.
Месяц это реквизит диалога с типом число.
таб = создатьобъект("Таблица");
таб.исходнаятаблица("Сформировать");
ДатаДок = ТекущаяДата();
НазваниеОрганизации = константа.ЗаголовокДляСоглашения;
контрагент = контр.наименование;
паспорт = контр.паспортныеданные;
адресК = контр.адрес;
сумма = контр.суммадолга;
месяц = мес;
Таб.ВывестиСекцию("Шапка");
Датамесяца = ДатаДок + Добавитьмесяц(ДатаДок,1);
СуммаДолг = Сумма/Месяц;
пока СуммаДолг<сумма цикл
СуммаДолг = СуммаДолг+СуммаДолг;
Таб.ВывестиСекцию("Долг");
конеццикла;
1
vde69
01.05.17
✎
12:16
для сч=0 по месяц цикл
конеццикла
2
HawkEye
01.05.17
✎
13:09
(0)
для к = ВыставленноеЗначениеМесяца по (ВыставленноеЗначениеМесяца + ОпределенноеКоличествоРаз) Цикл
или
для к = 1 по ОпределенноеКоличествоРаз Цикл
3
Diman_Kr
01.05.17
✎
17:21
А что, группировка Месяц уже не актуальна?
4
Злопчинский
01.05.17
✎
19:51
Автор получить фишню ибо в переменной ДатаМесяца он складывает две даты Что будет если к 1 мая прибавить 1июня - я хз
5
ndv76
02.05.17
✎
07:09
СуммаДолг = СуммаДолг+СуммаДолг; Это же геометрическая прогрессия. У вас микрофинансовая организация?
СуммаМес = Сумма/Месяц;
СуммаДолг = 0;
пока СуммаДолг<=сумма цикл
СуммаДолг = СуммаДолг+СуммаМес;
Таб.ВывестиСекцию("Долг");
конеццикла;
6
ndv76
02.05.17
✎
07:18
(4)Число ('01.05.17') = 2457875
Число ('01.06.17') = 2457906
2457875+2457906 = 4915781
Дата(4915781) = 07.11.46
Надо просто удалить из кода "ДатаДок +"
AdBlock убивает бесплатный контент. 1Сергей