Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / Microsoft Access Новый топик    Ответить
 Как добавить определенное количество записей в таблицу.  [new]
wladimirrr
Member

Откуда: Калужская обл.
Сообщений: 323
Приветствую всех! Уважаемые знатоки, помогите написать процедуру или функцию для следующей задачи.
Исходные данные:
1. Период (может принимать значение Месяц или Неделя).
2. КоличествоПлатежей (число).
3. ПерваяДата (дата).
4. Сумма (число).
Надо добавить в таблицу "График", имеющей поля "Дата" и "Сумма" количество записей равное КоличествоПлатежей. В поле "Дата" записать в первую запись значение-ПерваяДата, а в последующие, если значение Период равно Месяц - предыдущая дата + 30 дней, если Неделя - предыдущая дата + 7 дней.
В поле "Сумма" вписать значение Сумма.
Сам я такую функцию не осилю.
2 дек 19, 18:45    [22030628]     Ответить | Цитировать Сообщить модератору
 Re: Как добавить определенное количество записей в таблицу.  [new]
Akina
Member

Откуда: Зеленоград, Москва, Россия
Сообщений: 19707
Вот что тут можно не осилить? Поделить сумму на количество платежей сложно? или, может, прибавлять к первой дате по одному периоду, пока нужное число платежей не наберётся - сложно?

По-моему, единственная твоя сложность - это не получается заставить себя самостоятельно написать сию, весьма, надо сказать, несложную, процедуру. Пусть даже и поначалу с ошибками.
2 дек 19, 19:53    [22030708]     Ответить | Цитировать Сообщить модератору
 Re: Как добавить определенное количество записей в таблицу.  [new]
wladimirrr
Member

Откуда: Калужская обл.
Сообщений: 323
Akina
Вот что тут можно не осилить? Поделить сумму на количество платежей сложно? или, может, прибавлять к первой дате по одному периоду, пока нужное число платежей не наберётся - сложно?

По-моему, единственная твоя сложность - это не получается заставить себя самостоятельно написать сию, весьма, надо сказать, несложную, процедуру. Пусть даже и поначалу с ошибками.

Сложность для меня - написать цикл с подсчетом нужного количества записей. К сожалению, мало опыта в написании.
2 дек 19, 20:17    [22030726]     Ответить | Цитировать Сообщить модератору
 Re: Как добавить определенное количество записей в таблицу.  [new]
Akina
Member

Откуда: Зеленоград, Москва, Россия
Сообщений: 19707
wladimirrr
написать цикл с подсчетом нужного количества записей.

Платёж = Сумма / КоличествоПлатежей 
For i = 0 To КоличествоПлатежей - 1
    ОчереднаяДата = ПерваяДата + i * Период 
    DoCMD.RunSQL "INSERT INTO таблица (Дата, Сумма) VALUES ('" & ОчереднаяДата & "', " & Платёж & ")"
Next

С преобразованиями типов разберёшься сам, надеюсь...
2 дек 19, 21:18    [22030765]     Ответить | Цитировать Сообщить модератору
 Re: Как добавить определенное количество записей в таблицу.  [new]
wladimirrr
Member

Откуда: Калужская обл.
Сообщений: 323
Akina
wladimirrr
написать цикл с подсчетом нужного количества записей.

Платёж = Сумма / КоличествоПлатежей 
For i = 0 To КоличествоПлатежей - 1
    ОчереднаяДата = ПерваяДата + i * Период 
    DoCMD.RunSQL "INSERT INTO таблица (Дата, Сумма) VALUES ('" & ОчереднаяДата & "', " & Платёж & ")"
Next

С преобразованиями типов разберёшься сам, надеюсь...

Спасибо! То, что надо!
2 дек 19, 21:58    [22030781]     Ответить | Цитировать Сообщить модератору
 Re: Как добавить определенное количество записей в таблицу.  [new]
wladimirrr
Member

Откуда: Калужская обл.
Сообщений: 323
Akina

Платёж = Сумма / КоличествоПлатежей 
For i = 0 To КоличествоПлатежей - 1
    ОчереднаяДата = ПерваяДата + i * Период 
    DoCMD.RunSQL "INSERT INTO таблица (Дата, Сумма) VALUES ('" & ОчереднаяДата & "', " & Платёж & ")"
Next


Задача усложнилась. ОчереднаяДата должна быть тем-же числом следующего месяца. Например, ПерваяДата 03.12.19, ОчереднаяДаты д.б. 03.01.20, 03.02.20 и т.д. по Количеству платежей.
Как это можно задать в процедуре? Помогайте, пожалуйста!
4 дек 19, 20:30    [22032526]     Ответить | Цитировать Сообщить модератору
 Re: Как добавить определенное количество записей в таблицу.  [new]
Akina
Member

Откуда: Зеленоград, Москва, Россия
Сообщений: 19707
Блин, прибавляй МЕСЯЦЫ.
4 дек 19, 20:42    [22032532]     Ответить | Цитировать Сообщить модератору
 Re: Как добавить определенное количество записей в таблицу.  [new]
wladimirrr
Member

Откуда: Калужская обл.
Сообщений: 323
Akina
Блин, прибавляй МЕСЯЦЫ.

Блин, как их прибавлять?
4 дек 19, 22:23    [22032586]     Ответить | Цитировать Сообщить модератору
 Re: Как добавить определенное количество записей в таблицу.  [new]
alecko
Member

Откуда: Башкирия
Сообщений: 577
DateAdd, DateSerial => F1
4 дек 19, 22:34    [22032595]     Ответить | Цитировать Сообщить модератору
 Re: Как добавить определенное количество записей в таблицу.  [new]
wladimirrr
Member

Откуда: Калужская обл.
Сообщений: 323
alecko
DateAdd, DateSerial => F1

Спасибо за подсказку, буду пробовать.
4 дек 19, 22:58    [22032603]     Ответить | Цитировать Сообщить модератору
 Re: Как добавить определенное количество записей в таблицу.  [new]
sdku
Member

Откуда: Краснодар
Сообщений: 6380


К сообщению приложен файл (tmp.rar - 18Kb) cкачать
5 дек 19, 03:36    [22032672]     Ответить | Цитировать Сообщить модератору
 Re: Как добавить определенное количество записей в таблицу.  [new]
wladimirrr
Member

Откуда: Калужская обл.
Сообщений: 323
sdku,
Спасибо большое!
6 дек 19, 22:33    [22034632]     Ответить | Цитировать Сообщить модератору
Все форумы / Microsoft Access Ответить