К списку форумов К списку тем
Регистрация    Правила    Главная форума    Поиск   
Имя: Пароль:
Рекомендовать в новости

Генерация произвольных дат.

0 - 02.07.2023 - 00:01
Добрый день!

Для решения экзаменационной задачи необходимо заполнить произвольными датами дни рождения:

В ДЕМО-базу где имеется Справочник "Контактные лица" Запросом выбираю в таблицу данные контактных лиц и их дату рождения, затем надо заполнить их произвольными датами (рождения). Не могу сообразить как сделать генерацию дат рождений контактных лиц и записать эти даты в базу. Кто-нибудь решал подобную задачу? Подскажите алгоритм.



1 - 02.07.2023 - 03:18
Пока решил задачу так:
1. Сделал запрос к данным:

__________________________________________________ _______

ВЫБРАТЬ КонтактныеЛица.Ссылка, КонтактныеЛица.Наименование, КонтактныеЛица.ДатаРождения
ИЗ Справочник.КонтактныеЛица КАК КонтактныеЛица
__________________________________________________ _______

2. Обработку результата сделал так:

__________________________________________________ _______


НоваяДата = Дата('20010101');

ВыборкаДетальныеЗаписи = мРезультатЗапроса.Выбрать();

Сч = ВыборкаДетальныеЗаписи.Количество();

Пока ВыборкаДетальныеЗаписи.Следующий() Цикл

ГСЧ = Новый ГенераторСлучайныхЧисел(2001);

СлучайноеЧисло = ГСЧ.СлучайноеЧисло(1, 10100000);

Сч = Сч + СлучайноеЧисло;

Объект = ВыборкаДетальныеЗаписи.Ссылка.ПолучитьОбъект();

Объект.ДатаРождения = Дата(НоваяДата + СлучайноеЧисло + Сч );

Объект.ОбменДанными.Загрузка = Истина;

Объект.Записать();

КонецЦикла;
_____________________________________
кое-что интересное подчерпнул тут: https://infostart.ru/1c/articles/57305/

Отредактировано taras12; 02.07.2023 в 03:20. Причина: исправил ошибки
Гость
2 - 04.09.2023 - 16:35
Зачем обращаться к базе, если все равно используете ГСЧ ?
С помощью ГСЧ и генерите ДД, ММ, ГГГГ.
диапазоны должны быть валидными, хотя для ДР наверное нет разницы :)


К списку вопросов






Copyright ©, Все права защищены