[Odin – Одинэсник]

Вот пример скрипта для бэкапа баз данных в PostgreSQL:

1С (Код)

sql -- Установите необходимые параметры DO $$ DECLARE db_name TEXT; backup_path TEXT := '/path/to/backup/'; backup_file TEXT; BEGIN -- Получаем список баз данных FOR db_name IN SELECT datname FROM pg_database WHERE datistemplate = false LOOP -- Формируем имя файла для бэкапа backup_file := backup_path || db_name || '_' || to_char(current_timestamp, 'YYYYMMDD_HH24MISS') || '.sql'; -- Выполняем бэкап EXECUTE format('pg_dump %I > %L', db_name, backup_file); END LOOP; END $$;

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

sql -- Установите необходимые параметры DO $$ DECLARE     db_name TEXT;     backup_path TEXT := '/path/to/backup/';     backup_file TEXT; BEGIN     -- Получаем список баз данных     FOR db_name IN SELECT datname FROM pg_database WHERE datistemplate = false LOOP         -- Формируем имя файла для бэкапа         backup_file := backup_path || db_name || '_' || to_char(current_timestamp, 'YYYYMMDD_HH24MISS') || '.sql';                  -- Выполняем бэкап         EXECUTE format('pg_dump %I > %L', db_name, backup_file);     END LOOP; END $$;

### Объяснение:
1. **Параметры**: Установите путь к папке, где будут храниться бэкапы.
2. **Цикл**: Скрипт проходит по всем базам данных, исключая шаблоны.
3. **Форматирование имени файла**: Имя файла включает имя базы и текущую дату/время.
4. **Выполнение бэкапа**: Используется команда pg_dump для создания бэкапа каждой базы.

Не забудьте заменить ’/path/to/backup/’ на актуальный путь на вашем сервере.

[Odin – Одинэсник]

Привет, Богдан!

Вот пример запроса в 1С к справочнику Номенклатура, который выбирает все наименования номенклатуры:

1С (Код)

1C &НаСервере Процедура ЗаполнитьНаСервере() НашЗапрос = Новый Запрос; НашЗапрос.Текст = "ВЫБРАТЬ | Номенклатура.Наименование КАК Наименование |ИЗ | Справочник.Номенклатура КАК Номенклатура"; Результат = НашЗапрос.Выполнить().Выбрать(); Пока Результат.Следующий() Цикл Сообщить(Результат.Наименование); КонецЦикла КонецПроцедуры &НаКлиенте Процедура Заполнить(Команда) ЗаполнитьНаСервере(); КонецПроцедуры

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21

1C &НаСервере Процедура ЗаполнитьНаСервере()     НашЗапрос = Новый Запрос;     НашЗапрос.Текст =     "ВЫБРАТЬ     |   Номенклатура.Наименование КАК Наименование     |ИЗ     |   Справочник.Номенклатура КАК Номенклатура";         Результат = НашЗапрос.Выполнить().Выбрать();          Пока Результат.Следующий() Цикл         Сообщить(Результат.Наименование);     КонецЦикла КонецПроцедуры   &НаКлиенте Процедура Заполнить(Команда)     ЗаполнитьНаСервере(); КонецПроцедуры

Этот код создает запрос, который выбирает все наименования из справочника Номенклатура и выводит их с помощью функции Сообщить.

Если у вас есть дополнительные вопросы или нужна помощь с чем-то еще, дайте знать!

[Автор]

Сообщения