Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как добавить определенное количество записей в таблицу. / 12 сообщений из 12, страница 1 из 1
02.12.2019, 18:45
    #39897229
wladimirrr
wladimirrr
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как добавить определенное количество записей в таблицу.
Приветствую всех! Уважаемые знатоки, помогите написать процедуру или функцию для следующей задачи.
Исходные данные:
1. Период (может принимать значение Месяц или Неделя).
2. КоличествоПлатежей (число).
3. ПерваяДата (дата).
4. Сумма (число).
Надо добавить в таблицу "График", имеющей поля "Дата" и "Сумма" количество записей равное КоличествоПлатежей. В поле "Дата" записать в первую запись значение-ПерваяДата, а в последующие, если значение Период равно Месяц - предыдущая дата + 30 дней, если Неделя - предыдущая дата + 7 дней.
В поле "Сумма" вписать значение Сумма.
Сам я такую функцию не осилю.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
02.12.2019, 19:53
    #39897284
Akina
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как добавить определенное количество записей в таблицу.
Вот что тут можно не осилить? Поделить сумму на количество платежей сложно? или, может, прибавлять к первой дате по одному периоду, пока нужное число платежей не наберётся - сложно?

По-моему, единственная твоя сложность - это не получается заставить себя самостоятельно написать сию, весьма, надо сказать, несложную, процедуру. Пусть даже и поначалу с ошибками.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
02.12.2019, 20:17
    #39897294
wladimirrr
wladimirrr
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как добавить определенное количество записей в таблицу.
Akina
Вот что тут можно не осилить? Поделить сумму на количество платежей сложно? или, может, прибавлять к первой дате по одному периоду, пока нужное число платежей не наберётся - сложно?

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

Сложность для меня - написать цикл с подсчетом нужного количества записей. К сожалению, мало опыта в написании.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
02.12.2019, 21:18
    #39897316
Akina
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как добавить определенное количество записей в таблицу.
wladimirrr
написать цикл с подсчетом нужного количества записей.

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


С преобразованиями типов разберёшься сам, надеюсь...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
02.12.2019, 21:58
    #39897325
wladimirrr
wladimirrr
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как добавить определенное количество записей в таблицу.
Akina
wladimirrr
написать цикл с подсчетом нужного количества записей.

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


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

Спасибо! То, что надо!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.12.2019, 20:30
    #39898310
wladimirrr
wladimirrr
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как добавить определенное количество записей в таблицу.
Akina

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



Задача усложнилась. ОчереднаяДата должна быть тем-же числом следующего месяца. Например, ПерваяДата 03.12.19, ОчереднаяДаты д.б. 03.01.20, 03.02.20 и т.д. по Количеству платежей.
Как это можно задать в процедуре? Помогайте, пожалуйста!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.12.2019, 20:42
    #39898313
Akina
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как добавить определенное количество записей в таблицу.
Блин, прибавляй МЕСЯЦЫ.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.12.2019, 22:23
    #39898324
wladimirrr
wladimirrr
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как добавить определенное количество записей в таблицу.
Akina
Блин, прибавляй МЕСЯЦЫ.

Блин, как их прибавлять?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.12.2019, 22:34
    #39898331
alecko
alecko
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как добавить определенное количество записей в таблицу.
DateAdd, DateSerial => F1
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.12.2019, 22:58
    #39898336
wladimirrr
wladimirrr
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как добавить определенное количество записей в таблицу.
alecko
DateAdd, DateSerial => F1

Спасибо за подсказку, буду пробовать.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.12.2019, 03:36
    #39898361
sdku
sdku
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как добавить определенное количество записей в таблицу.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.12.2019, 22:33
    #39899308
wladimirrr
wladimirrr
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как добавить определенное количество записей в таблицу.
sdku,
Спасибо большое!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как добавить определенное количество записей в таблицу. / 12 сообщений из 12, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]