Курсы валют на разные даты в одном запросе. Делаем свой нестандартный срез последних.

Опубликовал Матти Нюкянен (Nykyanen) в раздел Программирование - Практика программирования

Курсы валют на разные даты в одном запросе. Делаем свой нестандартный срез последних.
Часто возникает потребность в этом, например, отложенное формирование проводок (или построение отчета) в валюте регламентировано учета (обычно «руб») для документов (или других данных) введенным в у.е. (например USD или EUR).

Курсы валют на разные даты в одном запросе. Делаем свой нестандартный срез последних.

Часто возникает потребность в этом, например, отложенное формирование проводок (или построение отчета) в валюте регламентировано учета (обычно «руб») для документов (или других данных) введенным в у.е. (например USD или EUR).

Во вложении готовый пример, обработка.

Пример запроса с комментариями:

            // Исходные данные передаем в запрос

                        "ВЫБРАТЬ

                        |           ИсходныеДанные.Регистратор,

                        |           ИсходныеДанные.Дата,

                        |           ИсходныеДанные.Валюта,

                        |           ИсходныеДанные.Сумма

                        |ПОМЕСТИТЬ ИсходныеДанные

                        |ИЗ

                        |           &ИсходныеДанные КАК ИсходныеДанные

                        |;

                        |

            // Выбираем для каких валют на какие даты надо получить курсы валют

                        |////////////////////////////////////////////////////////////////////////////////

                        |ВЫБРАТЬ РАЗЛИЧНЫЕ

                        |           ИсходныеДанные.Дата,

                        |           ИсходныеДанные.Валюта

                        |ПОМЕСТИТЬ ДатаВалюта

                        |ИЗ

                        |           ИсходныеДанные КАК ИсходныеДанные

                        |;

                        |

            // Выбираем ближайшую дату для курса валют

                        |////////////////////////////////////////////////////////////////////////////////

                        |ВЫБРАТЬ

                        |           ДатаВалюта.Дата,

                        |           ДатаВалюта.Валюта,

                        |           МАКСИМУМ(КурсыВалют.Период) КАК Период

                        |ПОМЕСТИТЬ ДатаКурса

                        |ИЗ

                        |           ДатаВалюта КАК ДатаВалюта

                        |                       ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют КАК КурсыВалют

                        |                       ПО ДатаВалюта.Валюта = КурсыВалют.Валюта

                        |                                  И ДатаВалюта.Дата >= КурсыВалют.Период

                        |

                        |СГРУППИРОВАТЬ ПО

                        |           ДатаВалюта.Дата,

                        |           ДатаВалюта.Валюта

                        |;

                        |

            // Получаем курсы валют на все даты, которые нужны

                        |////////////////////////////////////////////////////////////////////////////////

                        |ВЫБРАТЬ

                        |           ДатаКурса.Дата,

                        |           ДатаКурса.Валюта,

                        |           ДатаКурса.Период,

                        |           КурсыВалют.Курс,

                        |           КурсыВалют.Кратность

                        |ПОМЕСТИТЬ КурсыВалютСрез

                        |ИЗ

                        |           ДатаКурса КАК ДатаКурса

                        |                       ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют КАК КурсыВалют

                        |                       ПО ДатаКурса.Валюта = КурсыВалют.Валюта

                        |                                  И ДатаКурса.Период = КурсыВалют.Период

                        |;

                        |

            // Объединяем исходные данные с курсами валют

                        |////////////////////////////////////////////////////////////////////////////////

                        |ВЫБРАТЬ

                        |           ИсходныеДанные.Регистратор,

                        |           ИсходныеДанные.Дата,

                        |           ИсходныеДанные.Валюта,

                        |           ИсходныеДанные.Сумма,

                        |           КурсыВалютСрез.Период,

                        |           КурсыВалютСрез.Курс,

                        |           КурсыВалютСрез.Кратность,

                        |           ИсходныеДанные.Сумма * КурсыВалютСрез.Курс / КурсыВалютСрез.Кратность КАК Итог

                        |ИЗ

                        |           ИсходныеДанные КАК ИсходныеДанные

                        |                       ВНУТРЕННЕЕ СОЕДИНЕНИЕ КурсыВалютСрез КАК КурсыВалютСрез

                        |                       ПО ИсходныеДанные.Валюта = КурсыВалютСрез.Валюта

                        |                                  И ИсходныеДанные.Дата = КурсыВалютСрез.Дата";

 

Есть вопросы по запросам пишите, постараюсь ответить.

Скачать файлы

Наименование Файл Версия Размер
Обработка - КурсыВалютНаРазныеДаты.epf
.epf 8,76Kb
25.06.12
40
.epf 8,76Kb 40 Скачать

См. также

Комментарии
0. Матти Нюкянен (Nykyanen) 208 25.06.12 12:05 Сейчас в теме
Курсы валют на разные даты в одном запросе. Делаем свой нестандартный срез последних.
Часто возникает потребность в этом, например, отложенное формирование проводок (или построение отчета) в валюте регламентировано учета (обычно «руб») для документов (или других данных) введенным в у.е. (например USD или EUR).


Перейти к публикации

1. Сергей Ожерельев (Поручик) 3516 25.06.12 15:20 Сейчас в теме
Впечатление дикого дежа-вю. Где я это мог видеть? Впрочем, сейчас набежит местная илита местный бомонд грабить корованы, раскритикует или похвалит.
2. Матти Нюкянен (Nykyanen) 208 25.06.12 15:38 Сейчас в теме
(1) Поручик, не исключенно, что подобное мог реализовать кто угодно.
Поиск не дал результатов, решил разместить своё.

Примерно так же я решал задачу по РЕПО при сдаче Спеца 1С по Платформе.
3. Александр Крынецкий (echo77) 698 27.06.12 17:30 Сейчас в теме
(0) То что вы описали - это не есть "Срез последних на каждую дату в запросе"? Если поиском посмотреть - на этом же сайте есть предложенные решения на СКД и в запросе. Вещь полезная.

Оформите публикацию(запрос) нормально
4. Матти Нюкянен (Nykyanen) 208 28.06.12 10:12 Сейчас в теме
(3) echo77, запрос оформил.
Решение на СКД не нашел, интересно было посмотреть как решили эту проблему там, вдруг что-то интернесное.
5. Александр Крынецкий (echo77) 698 29.06.12 10:35 Сейчас в теме
6. Матти Нюкянен (Nykyanen) 208 29.06.12 12:37 Сейчас в теме
(5) echo77, да там аналогичная задача.
Только там, остатки на каждый день * цены номенклатуры на дату остатка.
А у меня документы суммы в УЕ * Курс да дату документа.

Будет новичкам для примера.
7. Сергей (Sergeevich) 15 11.11.14 20:54 Сейчас в теме
Статья оказалась очень полезной, спасибо.
8. and balu (baluba) 11 08.12.14 11:38 Сейчас в теме
10. Кирилл Смирнов (smikirill-110686) 05.02.17 16:02 Сейчас в теме
А если курса валюты нет на дату документа? тогда в колонке курс пусто?
11. Galiya89 Gapurova (user685936_Galiya_hamzina) 05.02.17 16:44 Сейчас в теме
Да там получается пусто