Всем известно, для большей гарантии восстановления важных данных, необходимо копировать архивы в несколько мест хранения. Отдельный диск может помочь в случае порчи основного, но в случае если устройство будет потеряно или украдено, он будет так же утрачен.

На сегодня облачные хранилища часто заменяют физические носители информации. Как правило, облачные хранилища предоставляют бесплатно от 2 до 15 ГБ дискового пространства, кому-то этого будет вполне достаточно.

ПО Effector Saver позволяет настроить периодичное резервное копирование информационной базы 1С в облако. И задать количество хранения файлов резервной копии, отдельно для каждого хранилища.

Таким образом, вы можете установить удобное время для бэкапа и управлять количеством копий базы данных.

Далее в статье рассмотрим как с помощью Effector Saver настроить бэкап информационной базы 1С:Предприятия в облако Яндекс.Диск.

На компьютере где производится настройка, должна быть установлена программа 1С:Предприятие и подключена необходимая база данных.

Скачиваем программу с оф. сайта Скачать Effector Saver

Запускаем файл инсталляции Мастера установки. На последнем этапе Мастера установки, соглашаемся с запуском программы и нажимаем «Завершить».

На панели инструментов нажимаем «Задачи» «Добавить задачу».

Выбираем тип новой задачи «Резервное копирование 1С:Предприятие 8», нажмите «Создать».

Во вкладке «Подключение к 1С» нажимаем «Выбрать базу 1С:Предприятия из списка и заполнить основные параметры».

В открывшемся окне «Выбор базы 1С:Предприятия» указываем необходимую базу и нажимаем «Выбрать».

Поля «Наименование:», «Исполняемый файл:», «Вариант базы:» и «Каталог базы:» автоматически заполнятся в соответствии с выбранной базой.

Необходимо только заполнить имя и пароль пользователя указанной базы, под которым будет запускаться резервное копирование средствами Конфигуратора 1С:Предприятия.

Если используете программную лицензию 1С, то установите флаг «Использовать программную лицензию 1С».

На вкладке «Отключение пользователей», устанавливаем флаг «Завершить работу пользователей 1С:Предприятия».

В Effector Saver доступно два варианта завершения работы пользователей:

- если у вас файловой база выберите «Вызвать штатное завершение работы пользователей»;

- если у вас клиент-серверная база выберите «Завершить сеансы на сервер 1С:Предприятие». Если в кластере 1С:Предприятия создан пользователь «администратор кластера», установите флажок «Кластер требует авторизации». Заполните поля: «Имя администратора кластера:» и «Пароль администратора кластера:». Если порт подключения к Агенту сервера отличный от стандартного, установите флажок «Используется нестандартный порт агента сервера». Заполните поле «Порт агента сервера:» (по умолчанию 1540).

На следующей вкладке «Хранилище архивов» указываем, где следует хранить создаваемые архивы.

Для добавления нового хранилища архива, нажимаем на кнопку «+». В открывшемся окне, нажимаем «Создать новое хранилище».

Из выпадающего списка, выберите, «Яндекс.Диск». Доступны и другие варианты: Локальная/сетевая папка, FTP/FTPS, WebDAV, Google Диск, Dropbox, OneDrive, Облако Mail.Ru.

Поле «Название:», оставим как есть. Нажимаем «Авторизация».

Откроется окно браузера, в котором необходимо ввести логин и пароль для доступа к Яндекс.Диску. Затем нажмите «Разрешить», после этого окно браузера автоматически закроется.

Далее укажем папку для хранения бэкапа базы 1С, нажимаем на кнопку с тремя точками и выбираем папку, (если папки нет, создайте ее).

Для управления количеством копий базы данных, устанавливаем флаг «Автоматически удалять устаревшие резервные копии», и заполняем параметр «Хранить количество копий», например 3. Нажимаем «ОК».

На следующей вкладке назначим расписание. В поле «Назначить задание:», выберите нужный интервал времении заполните параметр «Время начала:».

В верхней части окна настройки устанавливаем флажок «Выполнять задачу по расписанию» и нажимаем кнопку «Сохранить».

Резервное копирование информационной базы 1С на Яндекс.Диск будет осуществляться автоматически в соответствии с установленным расписанием.

Всем известно, для большей гарантии восстановления важных данных, необходимо копировать архивы в несколько мест хранения. Отдельный диск может помочь в случае порчи основного, но в случае если устройство будет потеряно или украдено, он будет так же утрачен.

На сегодня облачные хранилища часто заменяют физические носители информации. Как правило, облачные хранилища предоставляют бесплатно от 2 до 15 ГБ дискового пространства, кому-то этого будет вполне достаточно.

ПО Effector Saver позволяет настроить периодичное резервное копирование информационной базы 1С в облако. И задать количество хранения файлов резервной копии, отдельно для каждого хранилища.

Таким образом, вы можете установить удобное время для бэкапа и управлять количеством копий базы данных.

Далее в статье рассмотрим как с помощью Effector Saver настроить бэкап информационной базы 1С:Предприятия в облако Яндекс.Диск.

На компьютере где производится настройка, должна быть установлена программа 1С:Предприятие и подключена необходимая база данных.

Скачиваем программу с оф. сайта Скачать Effector Saver

Запускаем файл инсталляции Мастера установки. На последнем этапе Мастера установки, соглашаемся с запуском программы и нажимаем «Завершить».

На панели инструментов нажимаем «Задачи» & «Добавить задачу».

Выбираем тип новой задачи «Резервное копирование 1С:Предприятие 8», нажмите «Создать».

Во вкладке «Подключение к 1С» нажимаем «Выбрать базу 1С:Предприятия из списка и заполнить основные параметры».

В открывшемся окне «Выбор базы 1С:Предприятия» указываем необходимую базу и нажимаем «Выбрать».

Поля «Наименование:», «Исполняемый файл:», «Вариант базы:» и «Каталог базы:» автоматически заполнятся в соответствии с выбранной базой.

Необходимо только заполнить имя и пароль пользователя указанной базы, под которым будет запускаться резервное копирование средствами Конфигуратора 1С:Предприятия.

Если используете программную лицензию 1С, то установите флаг «Использовать программную лицензию 1С».

На вкладке «Отключение пользователей», устанавливаем флаг «Завершить работу пользователей 1С:Предприятия».

В Effector Saver доступно два варианта завершения работы пользователей:

- если у вас файловой база выберите «Вызвать штатное завершение работы пользователей»;

-  если у вас клиент-серверная база выберите «Завершить сеансы на сервер 1С:Предприятие». Если в кластере 1С:Предприятия создан пользователь «администратор кластера», установите флажок «Кластер требует авторизации». Заполните поля: «Имя администратора кластера:» и «Пароль администратора кластера:». Если порт подключения к Агенту сервера отличный от стандартного, установите флажок «Используется нестандартный порт агента сервера». Заполните поле «Порт агента сервера:» (по умолчанию 1540).

На следующей вкладке «Хранилище архивов» указываем, где следует хранить создаваемые архивы.

Для добавления нового хранилища архива, нажимаем на кнопку «+». В открывшемся окне, нажимаем «Создать новое хранилище».

Из выпадающего списка, выберите, «Яндекс.Диск». Доступны и другие варианты: Локальная/сетевая папка, FTP/FTPS, WebDAV, Google Диск, Dropbox, OneDrive, Облако Mail.Ru.

Поле «Название:», оставим как есть. Нажимаем «Авторизация».

Откроется окно браузера, в котором необходимо ввести логин и пароль для доступа к Яндекс.Диску. Затем нажмите «Разрешить», после этого окно браузера автоматически закроется.

Далее укажем папку для хранения бэкапа базы 1С, нажимаем на кнопку с тремя точками и выбираем папку, (если папки нет, создайте ее). 

Для управления количеством копий базы данных, устанавливаем флаг «Автоматически удалять устаревшие резервные копии», и заполняем параметр «Хранить количество копий», например 3. Нажимаем «ОК».

На следующей вкладке назначим расписание. В поле «Назначить задание:», выберите нужный интервал времени и заполните параметр «Время начала:».

В верхней части окна настройки устанавливаем флажок «Выполнять задачу по расписанию» и нажимаем кнопку «Сохранить». 

Резервное копирование информационной базы 1С на Яндекс.Диск будет осуществляться автоматически в соответствии с установленным расписанием.

Чтобы программно заполнить документ по кнопке, делаем примерно следующее:

1. на форму, в нашем случае документа, добавляем кнопку (Команда и у нее процедура СоздатьПеремещение(Команда))

2. в ее обработчике пишем код создания документа перемещение товаров и заполняем его

 &НаСервере

Функция СоздатьПеремещениеНаСервере(ДанныеФормы)

	ДанныеФормы.Дата=ТекущаяДата();

	// ДанныеФормы.Номер="1";

	ДанныеФормы.СкладОтправитель =  Справочники.Склады.НайтиПоНаименованию("Склад гарантийного обслуживания");

	ДанныеФормы.СкладПолучатель = Справочники.Склады.НайтиПоНаименованию("Склад гарантийных");

	

	новСП=Новый СписокЗначений;	н=0;

	Для Каждого стр из Объект.ДанныеПоГН Цикл 

		Если стр.ДанныеПроверки=Перечисления.СтатусПроверкиГарантии.зн0 тогда //!В документ перемещение только записи статус=зн0

		новСП.Добавить(Строка(стр.НомерЗаводской));  н=н+1;

		КонецЕсли;

	КонецЦикла;

	

	Если н>0 Тогда

	Запрос = Новый Запрос;

	Запрос.Текст = 

	"ВЫБРАТЬ

	|	РеализацияТоваровУслугСерии.Серия КАК Серия,

	|	РеализацияТоваровУслугСерии.Ссылка.Дата КАК ДатаОтгрузки,

	|	РеализацияТоваровУслугСерии.Ссылка.Контрагент КАК Контрагент,

	|	РеализацияТоваровУслугСерии.Ссылка КАК Возврат,

	|	РеализацияТоваровУслугСерии.Номенклатура,

	|	ПРЕДСТАВЛЕНИЕ(РеализацияТоваровУслугСерии.Серия) КАК СерияСТР

	|ИЗ

	|	Документ.ВозвратТоваровОтКлиента.Серии КАК РеализацияТоваровУслугСерии

	|ГДЕ

	|	РеализацияТоваровУслугСерии.Серия В

	|			(ВЫБРАТЬ

	|				СерииНоменклатуры.Ссылка КАК Ссылка

	|			ИЗ

	|				Справочник.СерииНоменклатуры КАК СерииНоменклатуры

	|			ГДЕ

	|				СерииНоменклатуры.Наименование В (&Наименование))

	|

	|УПОРЯДОЧИТЬ ПО

	|	Серия

	|АВТОУПОРЯДОЧИВАНИЕ"; 	

	Запрос.УстановитьПараметр("Наименование", новСП);	

	ТаблицаЗапроса = Запрос.Выполнить().Выгрузить();	

	Для каждого стр из новСП Цикл

		

			НайденнаяСтрока=ТаблицаЗапроса.Найти(стр.Значение,"СерияСТР");

			Если НайденнаяСтрока = Неопределено Тогда

				//нет такого

			Иначе

				нстр=ДанныеФормы.Товары.Добавить();

				нстр.Номенклатура = НайденнаяСтрока.Номенклатура;

				нстр.Серия=НайденнаяСтрока.Серия; 

				нстр.КоличествоУпаковок=1;

				нстр.Количество=1;

				нстр.СтатусУказанияСерий=2;

				нстр.СтатусУказанияСерийОтправитель=2;

				нстр.СтатусУказанияСерийПолучатель=2;

				

				нстр=ДанныеФормы.Серии.Добавить();

				нстр.Номенклатура = НайденнаяСтрока.Номенклатура;

				нстр.Серия=НайденнаяСтрока.Серия; 

				нстр.Количество=1;    

			КонецЕсли;	

	КонецЦикла;

	КонецЕсли;

	Возврат ДанныеФормы;

КонецФункции





&НаКлиенте

Процедура СоздатьПеремещение(Команда)

	Форма=ПолучитьФорму("Документ.ПеремещениеТоваров.ФормаОбъекта"); 

	ДанныеФормы=Форма.Объект;

	ДанныеФормы=СоздатьПеремещениеНаСервере(ДанныеФормы);

	КопироватьДанныеФормы(ДанныеФормы,Форма.Объект);

	Форма.Открыть();

КонецПроцедуры

   

Effector saver - это специализированная программа для автоматического резервного копирования 1С:Предприятия.Программа позволяет создавать резервные копии баз данных 1С:Предприятия, баз Microsoft SQL или PostgreSQL серверов, пользовательских папок и файлов.Сохранять же резервные копии можно на внешние, сетевые и локальные диски, FTP сервер.Effector saver вмещает большое количество расширенных функций, которые значительно упрощают резервное копирование: планирование и автоматический запуск задач, удобное заполнение настроек и тестирование баз 1С, автоотключение пользователей 1С:Предприятия 8.

Наша цель - создание ежедневных архивов. На компьютере где производится настройка, должна быть установлена программа 1С:Предприятие и подключена необходимая база данных.Скачаем программу с официального сайта https://efsaver.ru/download.htmlЗапускаем файл инсталляции Мастера установки.

На последнем этапе Мастера установки, соглашаемся с запуском программы и нажимаем "Завершить".

Настроим параметры автозапуска "Агента". Для этого в Панели инструментов выбераем "Сервис" & "Параметры программы" & "Параметры запуска".

Выбираем "Запускать агент как приложение" (выбор зависит от установки программы на рабочую станцию или на сервер).  

Нажимаем кнопку "Запустить агента" - "Сохранить".

Создаем задачу резервного копирования

Выбираем "Задачи" - "Добавить задачу".

Выбираем чем архивироватьПоле "Наименование" оставим по умолчанию, оно автоматически изменится на имя выбранной базы 1С.

Из выпадающего списка "Вид задачи" выбираем "Архивирование средствами 1С:Предприятие 8".

Указываем базу для архивацииВ закладке "Подключение" нажимаем "Выбрать и заполнить". В открывшемся окне "Выбор базы 1С:Предприятия" указываем нужную нам базу и нажимаем "Выбрать".

Поля "Исполняемый файл", "Вариант базы" и "Каталог базы" автоматически заполнятся значениями в соответствии с выбранной базой или же их можно заполнить вручную.

Заполняем имя и пароль пользователя выбранной базы, под которым будет запускаться резервное копирование средствами конфигуратора 1С:Предприятия.У этого пользователя в базе должны быть соответствующие права. Обратите внимание, имя задачи автоматически изменилось на имя выбранной базы.

Если для защиты 1С используется USB ключ, то не нужно устанавливать флаг "Использовать программную лицензию 1С".

Указываем место размещения архивированной базыПереходим на вкладку "Настройка архивов". Указываем каталог для хранения архивов: нажимаем на кнопку с тремя точками в конце поля "Каталог архивов" и выбераем в диалоговом окне каталог, или, если потребуется, создайте новый каталог с помощью кнопки "Создать папку".

В параметре "Количество одновременно хранимых архивов" установим 10. Effector saver будет удалять более старые резервные копии данной задачи, как только их количество превысит 10 штук.

Выбираем когда производить архивированиеЧтобы установить время выполнения задачи, переходим на вкладку "Расписание".

В нашем примере резервное копирование производится на рабочей станции, поэтому выбираем в поле "Назначить задание", пункт "Ежедневно после загрузки системы".

Если необходимо чтобы между стартом программы и архивированием прошла небольшая пауза, установите "Время задержки" в формате "чч:мм".

В поле "Время начала" установите произвольное время в формате "чч:мм" в тот период, когда последний пользователь прекращает работу с базой и до момента начала работы первого пользователя. Например ночь, 01:00.

Активация и сохранение настройки задачиУстанавливаем флаг "Выполнять задачу" в верхней части окна настройки.

Проверка работы задачиПосле выбора и настройки всех параметров резервного копирования, приступаем непосредственно к проведению самого копирования.

Удостоверьтесь, что пользователи вышли из базы 1С:Предприятия.

В главном окне "Менеджера" кликнув мышкой делаем активной строку со своей задачей.

Всё, готово. Резервная копия успешно создана.

Просмотр результатов работы задачиПосле завершения процесса резервного копирования во вкладке "Журнал" мы увидим дату и результат выполнения задачи по созданию бэкапа.

Для подробного просмотра результата выполнения задачи, выберите в меню "Журнал" - "Открыть запись", или сделайте двойной клик мышкой по записи выполнения задачи.

Во вкладке "Файлы" можно просмотреть список файлов бэкапа, которые были созданы в результате выполнения задачи.

Таким вот образом, за считанные минуты, можно создать автоматическую задачу резервного копирования 1С:Предприятия, и тем самым обезопасить себя от потери важных данных. С резервными копиями, сбой жесткого диска или непреднамеренное удаление пройдет менее болезненно.

На одном проекте потребовалось получать координаты выделенной области на яндекс карте, после долгих изучений получилось следующее:

Вид Формы: На карте выделяете объект, нажимаете кнопку Получить координаты выделенной области и заполняется таблица координат

Код инициализации карты и обработчик кнопки получения координат:

 Процедура ИнициализироватьКарту()

	

	ПутьКФайлу = КаталогВременныхФайлов()+"yamaps.html";

	Ф = новый Файл(ПутьКФайлу);

	Если Ф.Существует() Тогда

		УдалитьФайлы(ПутьКФайлу);

	КонецЕсли; 

	

	Т = новый ТекстовыйДокумент;

	ТД = ЭтотОбъект.ПолучитьМакет("МакетЯндекс");

	Т.УстановитьТекст(ТД.ПолучитьТекст());

	Т.Записать(ПутьКФайлу);

		

	ЭлементыФормы.Эксплорер.Перейти(ПутьКФайлу);

КонецПроцедуры





Процедура ВыполнитьСкрипт(Команда) Экспорт 

	ЭлементыФормы.Эксплорер.document.getElementById("WebClientOperation").value = Команда;

	ЭлементыФормы.Эксплорер.document.getElementById("WebClient").click();

КонецПроцедуры





Процедура ПриОткрытии()

	ИнициализироватьКарту();

КонецПроцедуры





Процедура ПолучитьКоординатыНажатие(Элемент)

	ВыполнитьСкрипт("GetGEO();");

	ТекКоординаты=ЭлементыФормы.Эксплорер.document.getElementById("geometry").innerText;

	ТекКоординаты=СтрЗаменить(ТекКоординаты,"Координаты: [","");

	МассивСтроки = ОбщегоНазначения.РазложитьСтрокуВМассивПодстрок(ТекКоординаты, "], [ ");

	Точки.Очистить();

	Для Каждого стр из МассивСтроки Цикл 

		Текстр=СтрЗаменить(стр,"[","");

		Текстр=СтрЗаменить(Текстр,"]","");

		Текстр=СокрЛП(Текстр);

		нСтрок=Точки.Добавить();

		симвЗапятой=Найти(Текстр,","); 

		нСтрок.Широта=Лев(Текстр,симвЗапятой-1);

		нСтрок.Долгота=Сред(Текстр,симвЗапятой+2,СтрДлина(Текстр));

	КонецЦикла;	

	//Сообщить(ТекКоординаты);

КонецПроцедуры   

Макет

 <!DOCTYPE html">

<html xmlns="http://www.w3.org/1999/xhtml">

<head>

    <meta http-equiv="Content-Type" content="text/html; charset=utf-8"/>

    <meta http-equiv="X-UA-Compatible" content="IE=9"/>

    <style type="text/css">

	  html { height: 100% }

	  body { height: 100%; margin: 0px; padding: 0px }

	  #map { height: 100% }

	</style>

    <script src="https://api-maps.yandex.ru/2.1/?lang=ru_RU"  type="text/javascript"></script>

	<script src="http://yandex.st/jquery/1.6.4/jquery.min.js" type="text/javascript"></script>	

    <script type="text/javascript">

	var index = 1;

	var MyMap, route;

	var clusterer;

	var PointArray = [];

	var noclick = false;

	

	ymaps.ready(init);

	function init(){  

		myMap = new ymaps.Map ("map", {

			center: [55.75, 37.62],

			zoom: 10

		}),

        polygon = new ymaps.GeoObject({

        geometry: {

            type: "Polygon",

            coordinates: []

        }

  	  });

		myMap.behaviors.enable('scrollZoom');

		myMap.behaviors.disable('dblClickZoom');

			

		myMap.events.add('click', function (e) {

			if (!noclick) {

			//	addMarker(e.get('coords')); 				

			}else{

				noclick = false;

			}

		});

		

		myMap.events.add('drag end', function (e) {

			noclick = true;			

			document.getElementById('CoordX').value = "0";

			document.getElementById('CoordY').value = "0";

		});

		

		// создадим кластеризатор и запретим приближать карту при клике на кластеры

		//clusterer = new ymaps.Clusterer({clusterDisableClickZoom: true, synchAdd: true});

		//myMap.geoObjects.add(clusterer);

		

	myMap.geoObjects.add(polygon);

    polygon.editor.startDrawing();

	$('input').attr('disabled', false);

 

            // Обработка нажатия на любую кнопку.

            $('input').click(

                function () {

                    // Отключаем кнопки, чтобы на карту нельзя было

                    // добавить более одного редактируемого объекта (чтобы в них не запутаться).

                    $('input').attr('disabled', true);

					GetGEO();

                });

	}

	

	function addMarker(coordPosition){

		myPlacemark = new ymaps.Placemark(coordPosition, {

			// Свойства

			// Текст метки

			iconContent: 'Точка'+index

		}, {

			// Опции

			// Иконка метки будет растягиваться под ее контент

			preset: 'islands#blueStretchyIcon'

		});

		myMap.geoObjects.add(myPlacemark);

		

		document.getElementById('CoordX').value = coordPosition[0].toPrecision(15);

		document.getElementById('CoordY').value = coordPosition[1].toPrecision(15);

		index++;

	}

		

	function calcRoute(options){

		ymaps.route(options, {

	        // Опции маршрутизатора

	        mapStateAutoApply: true, // автоматически позиционировать карту

	        avoidTrafficJams: false   // Учитывать пробки

	    }).then(

		    function (router) {

		    route = router;

		        myMap.geoObjects.add(route);

		        

		        //заполняем и сохраняем инфо про маршрут

		        document.getElementById('RouteInfo').value = "Длина маршрута - " + route.getHumanLength() + ". Время - " + route.getHumanJamsTime();

		        

		        //генерация события для перехвата в 1С

		        var evt = document.createEventObject();

  				document.body.fireEvent('ondatasetcomplete', evt);

		    },

		    function (error) {

		        alert("Возникла ошибка: " + error.message);

	    });

	}

	

	function calcLine(options){

		var poly = new ymaps.Polyline(options, {

				hintContent: "Маршрут",

				balloonContent: "Маршрут экспедитора",

				balloonContentHeader: "",

				balloonContentBody: "",

				balloonContentFooter: ""

			}, {

				cursor: "pointer",

				draggable: false,

				hasBalloon: true,

				hasHint: true,

				interactiveZIndex: false,

				opacity: 1,

				openBalloonOnClick: true,

				openEmptyBalloon: false,

				openEmptyHint: false,

				openHintOnHover: true,

				strokeColor: '#E33926',

				strokeOpacity: 0.8,

				strokeStyle: '',

				strokeWidth: 5,

				syncOverlayInit: false,

				visible: true

			});

			myMap.geoObjects.add(poly);	

			myMap.setBounds(poly.geometry.getBounds());

	}

	

	function Reset(){

		// Удаляем все геообъекты на карте

		myMap.geoObjects.removeAll();   		   		

		PointArray = [];

		index = 1;

	}

	

	function ChangeCityMSK(){

		myMap.panTo([55.75, 37.62], {

            flying: 1

        });

	}

	function ChangeCitySPB(){

		myMap.panTo([59.938531, 30.313497], {

            flying: 1

        });

	}

	function ChangeCityKRAS(){

		myMap.panTo([45.04, 38.97], {

            flying: 1

        });

	}

	function ChangePlace(k,d){

		myMap.panTo([k, d], {

            flying: 1

        });

	}





	

	function FindAdres(Adres){

		Reset();

		var myGeocoder = ymaps.geocode(Adres);

		myGeocoder.then(

			function (res){

			var firstGeoObject = res.geoObjects.get(0);

			if(firstGeoObject != null){

				myMap.panTo(

					// Координаты нового центра карты

					firstGeoObject.geometry.getCoordinates(), {

						/* Опции перемещения:

						   разрешить уменьшать и затем увеличивать зум

						   карты при перемещении между точками 

						*/

						flying: true

					}

				);

				

				myPlacemark = new ymaps.Placemark(firstGeoObject.geometry.getCoordinates(), {

					// Свойства

					// Текст метки

					iconContent: Adres

				}, {

					// Опции

					// Иконка метки будет растягиваться под ее контент

					preset: 'islands#blueStretchyIcon'

				});

				myMap.geoObjects.add(myPlacemark);

			}else{

				alert("Ничего не найдено");}

			}

		);

	}

		

	function ReverseSearchAdres(CoordX, CoordY, Adres){

		Reset();

		

		var CoordPosition = [CoordX, CoordY];

		myMap.panTo(

		    // Координаты нового центра карты

		    CoordPosition, {

		        /* Опции перемещения:

		           разрешить уменьшать и затем увеличивать зум

		           карты при перемещении между точками 

		        */

		        flying: true

		    }

		);

		

		myPlacemark = new ymaps.Placemark(CoordPosition, {

			// Свойства

			// Текст метки

			iconContent: Adres

		}, {

			// Опции

			// Иконка метки будет растягиваться под ее контент

			preset: 'islands#blueStretchyIcon'

		});

		myMap.geoObjects.add(myPlacemark);

	}

	

	function addToPointArrayM(CoordX, CoordY, TextC, Text){

	var CoordPosition = [CoordX, CoordY];

	myPlacemark = new ymaps.Placemark(CoordPosition, {

			// Свойства

			// Текст метки

			iconContent: Text

		}, {

			// Опции

			// Иконка метки будет растягиваться под ее контент

			preset: TextC

		});

		myMap.geoObjects.add(myPlacemark);

	}

	

	function addToPointArrayPointOne(CoordX, CoordY, ID, Text){

		var point = new ymaps.GeoObject({

		    geometry: {type: "Point", coordinates: [CoordX, CoordY>,

		    properties: {

		        clusterCaption: ID,

		        iconContent: ID, 

		        hintContent: ID,  

		        balloonContent: Text, 

		        balloonContentBody: Text

		    }

			});

		myMap.geoObjects.add(point);

	}





	function addToPointArray(CoordX, CoordY, ID, Text){

		var point = new ymaps.GeoObject({

		    geometry: {type: "Point", coordinates: [CoordX, CoordY>,

		    properties: {

		        clusterCaption: ID,

		        iconContent: ID, 

		        hintContent: ID,  

		        balloonContent: Text, 

		        balloonContentBody: Text

		    }

			});

		PointArray.push(point);

	}

	

	function drawCluster(){

		clusterer.add(PointArray);

		myMap.geoObjects.add(clusterer);

	}	

	

	function createPolygon(ArrayPoint, Name, color) {

		// Создаем многоугольник

        myPolygon = new ymaps.Polygon([

            // Координаты вершин внешней границы многоугольника.

            ArrayPoint

        ], {

            //Свойства

            hintContent: Name

        }, {

            // Опции.

            // Цвет заливки (зеленый)

            fillColor: color,

            // Цвет границ (синий)

            strokeColor: '#0000FF',

            // Прозрачность (полупрозрачная заливка)

            opacity: 0.6,

            // Ширина линии

            strokeWidth: 5,

            // Стиль линии

            strokeStyle: 'shortdash'

        });

            

        myMap.geoObjects.add(myPolygon);

    }	

    

    function WebClientClick() {

    	//очистка перед кликом координат, иначе после клика в упр. формах идет считывание координат

    	document.getElementById('CoordX').value = "0";

		document.getElementById('CoordY').value = "0";

    	

    	var WebClientOperation = document.getElementById("WebClientOperation").value;

		//alert(WebClientOperation);

		switch (WebClientOperation) {

        	case "0":   // ничего не делаем

        	   var a = 1; 

        	default:   // запускаем функцию

        	    eval(WebClientOperation);

        }

        document.getElementById('WebClientOperation').value = "0";

	} 

	

function GetGEO(){

polygon.editor.stopEditing(); 

printGeometry(polygon.geometry.getCoordinates());

}

// Выводит массив координат геообъекта в <div id="geometry">

function printGeometry (coords) {

$('#geometry').html('Координаты: ' + stringify(coords));





function stringify (coords) {

	var res = '';

	if ($.isArray(coords)) {

		res = '[ ';

		for (var i = 0, l = coords.length; i < l; i++) {

			if (i > 0) {

				res += ', ';

			}

			res += stringify(coords[i]);

		}

		res += ' ]';

	} else if (typeof coords == 'number') {

		res = coords.toPrecision(6);

	} else if (coords.toString) {

		res = coords.toString();

	}





	return res;

}

}   		

    </script>

</head>





<body>

<div id="geometry"/></div>

<div id="map" style="width:100%; height:100%"></div>

    <input type="hidden" id="CoordX" name="CoordX" value="0"></input>

    <input type="hidden" id="CoordY" name="CoordY" value="0"></input>

    <input type="hidden" id="RouteInfo" name="RouteInfo" value=""></input>

    <input type="hidden" id="WebClientOperation" name="WebClientOperation" value="0"></input>

    <input type="hidden" id="WebClient" name="WebClient" onclick="WebClientClick();"></input>

    <!-- <input type="button" value="Завершить редактирование" id="stopEditPolyline"/> -->

</body>

</html>   

Заказали виртуальный сервер на FastVPS, купили мини сервер 1С и пришло время установки.

В сети нашлась хорошая статья, где все по порядку:

Итак, устанавливаем минимальный CentOS, настраиваем имена хостов, DNSы и сетевые подключения и приступаем собственно к установке серверных компонентов.

1. Установка Postgre SQL server

Обновление от 03-ноя-2016: в последних версиях CentOS (у меня сегодня был 7.2.1511) отсутствует поддержка libtermcap (и как-то "иначе" реализована libreadline), из-за чего сборки с сайта 1С не устанавливаются - решил поставить сборку от Postgres Professionals https://postgrespro.ru/products/1c_build - вроде работает, но о стабильности и производительности пока судить рано. Так что у кого проблемы с libtermcap.so.2() и/ли libreadline.so.5() при установке PostgreSQL с патчами 1С, можете попробовать этот альтернативный вариант.

Для установки использовался рекомендованный (адаптированный) 1С дистрибутив, для чего потребуется скачать его из раздела поддержки пользователей сайта 1С. В моём случае это был "Дистрибутив СУБД PostgreSQL для Linux x86 (64-bit) одним архивом (RPM)", который я сохранил в /root/temp. Распаковываем архив:

[root@vm-sql01 temp]# tar -vxf postgresql-9.2.1-1.1C_x86_64_rpm.tar.gz

postgresql92-9.2.1-1.1C.x86_64.rpm

postgresql92-libs-9.2.1-1.1C.x86_64.rpm

postgresql92-server-9.2.1-1.1C.x86_64.rpm

postgresql92-contrib-9.2.1-1.1C.x86_64.rpm

[root@vm-sql01 temp]#

Устанавливаем в следующей последовательности:

yum install postgresql92-libs-9.2.1-1.1C.x86_64.rpm

yum install postgresql92-9.2.1-1.1C.x86_64.rpm

yum install postgresql92-server-9.2.1-1.1C.x86_64.rpm

yum install postgresql92-contrib-9.2.1-1.1C.x86_64.rpm

Все недостающие зависимости (пакеты) будут установлены в процессе установки этих rpm, хотя на сайте 1С рекомендуют предварительно установить пакеты readline, libtermcap, krb5-libs и openssl, но в моём случае они либо уже были установлены, либо не были обнаружены в репозиториях.

2. Первый запуск Postgre SQL server

В отличии от сценариев установки большинства знакомых мне sql-серверов, postgres требует предварительной инициализации перед запуском, для чего существует два пути - первый, правильный:

[root@vm-sql01 pgsql]# su postgres -c '/usr/pgsql-9.2/bin/initdb -D /var/lib/pgsql/9.2/data --locale=ru_RU.UTF-8'

Файлы, относящиеся к этой СУБД, будут принадлежать пользователю "postgres".

От его имени также будет запускаться процесс сервера.

Кластер баз данных будет инициализирован с локалью "ru_RU.UTF-8".

Кодировка БД по умолчанию, выбранная в соответствии с настройками: "UTF8".

Выбрана конфигурация текстового поиска по умолчанию "russian".

исправление прав для существующего каталога /var/lib/pgsql/9.2/data... ок

создание подкаталогов... ок

выбирается значение max_connections... 100

выбирается значение shared_buffers... 32MB

создание конфигурационных файлов... ок

создание базы template1 в /var/lib/pgsql/9.2/data/base/1... ок

инициализация pg_authid... ок

инициализация зависимостей... ок

создание системных представлений... ок

загрузка описаний системных объектов... ок

создание правил сортировки... ок

создание преобразований... ок

создание словарей... ок

установка прав для встроенных объектов... ок

создание информационной схемы... ок

загрузка серверного языка PL/pgSQL... ок

очистка базы данных template1... ок

копирование template1 в template0... ок

копирование template1 в postgres... ок

ВНИМАНИЕ: используется проверка подлинности "trust" для локальных подключений.

Другой метод можно выбрать, отредактировав pg_hba.conf или используя ключи -A,

--auth-local или --auth-host при следующем выполнении initdb.

Готово. Теперь вы можете запустить сервер баз данных:

/usr/pgsql-9.2/bin/postgres -D /var/lib/pgsql/9.2/data

или

/usr/pgsql-9.2/bin/pg_ctl -D /var/lib/pgsql/9.2/data -l logfile start

-bash-4.1$

Или тот же вывод на английском языке:

[root@vm-sql01 ~]# su postgres -c '/usr/pgsql-9.2/bin/initdb -D /var/lib/pgsql/9.2/data --locale=ru_RU.UTF-8'

could not change directory to "/root"

The files belonging to this database system will be owned by user "postgres".

This user must also own the server process.

The database cluster will be initialized with locale "ru_RU.UTF-8".

The default database encoding has accordingly been set to "UTF8".

The default text search configuration will be set to "russian".

fixing permissions on existing directory /var/lib/pgsql/9.2/data ... ok

creating subdirectories ... ok

selecting default max_connections ... 100

selecting default shared_buffers ... 32MB

creating configuration files ... ok

creating template1 database in /var/lib/pgsql/9.2/data/base/1 ... ok

initializing pg_authid ... ok

initializing dependencies ... ok

creating system views ... ok

loading system objects' descriptions ... ok

creating collations ... ok

creating conversions ... ok

creating dictionaries ... ok

setting privileges on built-in objects ... ok

creating information schema ... ok

loading PL/pgSQL server-side language ... ok

vacuuming database template1 ... ok

copying template1 to template0 ... ok

copying template1 to postgres ... ok

WARNING: enabling "trust" authentication for local connections

You can change this by editing pg_hba.conf or using the option -A, or

--auth-local and --auth-host, the next time you run initdb.

Success. You can now start the database server using:

/usr/pgsql-9.2/bin/postgres -D /var/lib/pgsql/9.2/data

or

/usr/pgsql-9.2/bin/pg_ctl -D /var/lib/pgsql/9.2/data -l logfile start

[root@vm-sql01 ~]#

Или второй, более простой, но не всегда дающий необходимый результат (зависит от региональных настроек сервера, но у меня иногда приводивший к установке базы данных без поддержки необходимого collation ru_RU.UTF-8):

[root@vm-sql01 pgsql]# service postgresql-9.2 initdb

Инициализируется база данных: [ OK ]

[root@vm-sql01 pgsql]#

В результате была создана структура базы данных (с настройками) в /var/lib/pgsql/9.2/data. Хочу обратить особое внимание на конструкцию --locale=ru_RU.UTF-8, которую необходимо указать при инициализации, иначе сервер может быть инициализирован с неверным набором языковых параметров, что в конечном итоге приведёт к сообщениям

Ошибка установки или изменения национальных настроек информационной базы

Порядок сортировки не поддерживается базой данных

по причине:

Порядок сортировки не поддерживается базой данных

при установке информационной базы. Теперь можно настраивать автоматический запуск sql-сервера и, собственно, запускать его:

[root@vm-sql01 temp]# chkconfig postgresql-9.2 on

[root@vm-sql01 temp]# service postgresql-9.2 start

Запускается служба postgresql-9.2: [ OK ]

[root@vm-sql01 temp]#

Всё. Для локальных подключений сервер настроен. В моём случае сервер 1С и сервер SQL находятся на разных машинах, поэтому потребуется настроить и удалённые подключения с авторизацией.

В случае каких-то проблем, читаем содержимое файлов:

/var/lib/pgsql/9.2/pgstartup.log

/var/lib/pgsql/9.2/data/postgresql-*.log

Для повышения быстродействия документация PostgreSQL рекомендует как минимум унести журнал /var/lib/pgsql/9.2/data/pg_xlog на отдельный физический том и создать симлинк на него в исходном месте; из личных наблюдений - надо ещё и значительно увеличить размер используемой памяти... но необъятное не охватить, поэтому за статьями по оптимизации работы PostgreSQL для 1С предлагаю обращаться в поисковые системы, а оттуда - на профильные форумы.

3. Настройка пользователей (ролей) Postgre SQL server

Для управления PostgreSQL на начальном этапе потребуется сменить текущего пользователя на postgres и создать нового пользователя из командной строки:

[root@vm-sql01 temp]# su - postgres

-bash-4.1$ cd /usr/pgsql-9.2/bin

-bash-4.1$ createuser --interactive -P

Введите имя новой роли:server1c

Введите пароль для новой роли:

Повторите его:

Должна ли новая роль иметь полномочия суперпользователя? (y - да/n - нет) n

Новая роль должна иметь право создавать базы данных? (y - да/n - нет) y

Новая роль должна иметь право создавать другие роли? (y - да/n - нет) n

-bash-4.1$ exit

logout

[root@vm-sql01 temp]#

В принципе, для обслуживания полезно иметь пользователя с правами суперпользователя - создавать его можно тем же путём.

Теперь осталось разрешить удалённое подключение с авторизацией - для этого в файле /var/lib/pgsql/9.2/data/pg_hba.conf потребуется заменить значение ident на md5 в строке "host all all 0.0.0.0/0 md5" и перезапустить сервис.

Не следует забывать и про настройки iptables - для работы Postgre SQL необходимо открыть как минимум порт tcp 5432, хотя привычнее (да и проще) объявить сетевой интерфейс "внутренним" (разрешить все подключения на интерфейсе).

Для управления сервером потребуется pgAdmin, который можно установить из репозиториев используемого для административных целей линукса, либо скачать с сайта проекта.

4. Установка компонентов сервера 1С

Внимание!!! Для избежания проблем с зависимостями, желательно, чтобы разрядность сервера 1С совпадала с разрядностью используемого дистрибутива Linux! Иначе (если ставим 32-битный 1С на 64-битный Linux), при входе в базу, можно получить сообщение типа "Ошибка загрузки библиотеки libWand.so по причине:Библиотека не обнаружена. Часть функций будет недоступна." и клиенты не будут запускаться (хотя конфигуратор - будет). В принципе, я с этой проблемой справился на CentOS 7 (которой не выпускают больше в 32-битном исполнении) - просто поставил не только 'ImageMagick', но и 'ImageMagick.i686' (yum install ImageMagick.i686) - всё заработало (хоть и притянуло за собой гору зависимостей).

Первый шаг установки сервера 1С мало отличается от аналогичного этапа с SQL-сервером - распаковать скачанный дистрибутив сервера командой tar -vxf rpm64.tar.gz. В итоге получим файлы:

1C_Enterprise83-common-8.3.3-715.x86_64.rpm - основные файлы 1С (включая русский и английский интерфейсы)

1C_Enterprise83-common-nls-8.3.3-715.x86_64.rpm - дополнительные языковые модули

1C_Enterprise83-server-8.3.3-715.x86_64.rpm - сервер 1С

1C_Enterprise83-server-nls-8.3.3-715.x86_64.rpm - дополнительные языковые модули

1C_Enterprise83-ws-8.3.3-715.x86_64.rpm - компоненты вэб-сервера 1С

1C_Enterprise83-ws-nls-8.3.3-715.x86_64.rpm - дополнительные языковые модули

1C_Enterprise83-crs-8.3.3-715.i386.rpm - хранилище конфигураций (только в 32-битном комплекте)

Устанавливаем нужные пакеты командами:

yum install 1C_Enterprise83-common-8.3.3-715.x86_64.rpm

yum install 1C_Enterprise83-server-8.3.3-715.x86_64.rpm

Настраиваем автоматический запуск демона и стартуем его:

[root@vh-1c83 temp]# chkconfig srv1cv83 on

[root@vh-1c83 temp]# service srv1cv83 start

Starting 1C:Enterprise 8.3 server: Error: service failed to start!

FAILED

[root@vh-1c83 temp]# service srv1cv83 start

Starting 1C:Enterprise 8.3 server: OK

[root@vh-1c83 temp]#

Хочу обратить внимание - если сразу после установки сервис (как в приведённом примере) не стартовал, а при второй попытке старта он запустился, скорее всего не настроен DNS - об этом чуть ниже. Если верить информации с многочисленных форумов, то наш сервер уже готов обслуживать до 12 клиентов. Для работы большего числа пользователей, необходимо установить лицензию сервера - либо в виде USB HASP и драйвера, либо в виде электронной лицензии. Про установку аппаратных ключей я уже писал, а установка программных лицензий достаточно проста: запускаем конфигуратор (с клиентской машины; кластер уже должен быть настроен и должна быть информационная база), вызываем "Сервис" - "Получение лицензии", вводим номер комплекта (с коробки или "Регистрационный номер" с карточки из конверта "Пинкоды программной лицензии") и пин-код (с той самой карточки из конверта), ставим галочку "Установка на сервер", вводим имя сервера в соответствующем поле, нажимаем "Далее", говорим, что это - "Первый запуск", заполняем форму "Владелец лицензии" (к стати, я не понял что писать в полях "Фамилия", "Имя", "Отчество" - то ли ответственного за эксплуатацию, то ли генерального директора - оставил поля пустыми, и оно получило лицензию, не ругнувшись), "Далее", "Автоматически" - профит! в /var/1C/licenses на сервере появился файлик XXXXXXXXXXXXXX.lic и серверу "стало хорошо" (если это была многопользовательская лицензия, то клиентам тоже "станет хорошо", т.к. они будут получать лицензии на сервере).

Для работы с графическими объектами и экспорта в xls, могут потребоваться дополнительные пакеты: ImageMagick, freetype (входит в зависимости ImageMagick), libgsf (входит в зависимости ImageMagick), corefonts (отсутствует в репозитариях CentOS - см. раздел 6); для "ТАКСИ" и "Управляемого приложения" они необходимы, для классического толстого клиента вроде бы не особо нужны, но 1С всё равно ругается на их отсутствие, хоть и работает.

По умолчанию сервер 1С слушает порт tcp 1541(1540) и для соединений использует диапазон портов 1560-1691.

5. Настройка экземпляра (кластера) сервера 1С

Информации о наличии оснастки управления сервером 1С для Linux мне не попадалось, так что для управления сервером будем использовать традиционную оснастку mmc для Windows "Администрирование серверов 1С:Предприятия", которую следует поставить из дистрибутива технологической платформы для Windows.

В этом месте на тестовом сервере возникли трудности - кластер по умолчанию отсутствовал, а при попытке создания нового кластера, ragent аварийно завершал работу с сообщением Sep 3 21:29:04 vh-1c83 kernel: ragent[1879]: segfault at 8 ip 00007f56473c9fd4 sp 00007f563b7b14a0 error 4 in rserver.so[7f56472db000+70e000]... странно, но если верить форумам, на CentOS у многих сервер 1С 8.3 ставится некорректно - не создаётся начальная конфигурация, включающая "Кластер по умолчанию". Краткий анализ ситуации выявил, что настройки кластера по умолчанию не были сгенерированы полностью и не попали в /home/usr1cv8/.1cv8/1C/1cv8/.

При попытке подложить файлы с рабочего сервера на неудачный, сервис 1С не запускается абсолютно без каких-либо диагностических сообщений - подобное поведение я видел при проблемах (неверных контекстах) SELinux, но в данном случае никаких отказов в audit.log не обнаружилось.

В результате детального изучения проблемы с применением strace удалось выяснить, что агент сервера при запуске ищет настройки по пути ~/.1cv8/1C/1cv8/ (в домашнем каталоге запустившего пользователя) и если не находит, пытается создать настройки кластера по умолчанию, для чего ему нужно имя хоста (выяснено экспериментально), и если верить "Руководству администратора", нужен корректно работающий DNS; экспериментально же был установлен факт, что сначала ragent читает файл /etc/hosts, затем обращается к DNS-серверу, а затем вызывает uname и снова лезет в hosts и к DNS и если не находит сопоставления, аварийно завершается. Итак, для нормального запуска потребуется полноценная и правильно настроенная сетевая инфраструктура, ну а в отсутствии работающего DNS достаточно дописать строчку в /etc/hosts и привести его примерно к такому виду:

127.0.0.1 localhost

192.168.122.227 vh-1c83.test.lan vh-1c83

::1 localhost localhost.localdomain localhost6 localhost6.localdomain6

За дальнейшими инструкциями пока отсылаю к своей статье про 8.2 - принципиальных отличий пока нет. Единственное замечание - при создании новой информационной базы, если указывать пользователя подключения к базе данных не с правами суперпользователя (а с набором прав из пункта 3), информационная база не создавалась, а в /var/lib/pgsql/9.2/data/pg_log/postgresql-Xxx.log наблюдались сообщения:

ОШИБКА: нет прав для изменения параметра "lc_messages"

ОПЕРАТОР: SET lc_messages to 'en_US.UTF-8';

ОШИБКА: нет доступа к языку c

ОПЕРАТОР: CREATE OR REPLACE FUNCTION plpgsql_call_handler() RETURNS language_handler AS '$libdir/plpgsql' LANGUAGE C

ОШИБКА: нет прав для изменения параметра "lc_messages"

ОПЕРАТОР: SET lc_messages to 'en_US.UTF-8';

ОШИБКА: ошибка синтаксиса (примерное положение: "application") в символе 24

ОПЕРАТОР: lock table pg_class in application share mode

ПРЕДУПРЕЖДЕНИЕ: нет незавершённой транзакции

ОШИБКА: тип "mvarchar" не существует в символе 31

ОПЕРАТОР: create table Config (FileName mvarchar(128) not null, Creation timestamp not null, Modified timestamp not null, Attributes int not null, DataSize int8 not null, BinaryData bytea not null, PartNo int not null, PRIMARY KEY (FileName, PartNo))

ОШИБКА: нет прав для изменения параметра "lc_messages"

ОПЕРАТОР: SET lc_messages to 'en_US.UTF-8';

ОШИБКА: нет доступа к языку c

ОПЕРАТОР: CREATE OR REPLACE FUNCTION plpgsql_call_handler() RETURNS language_handler AS '$libdir/plpgsql' LANGUAGE C

После подключения с учётными данными суперпользователя БД, сообщения изменились на англоязычные и проблемы исчезли. Судя по всему, если на сервере установлен язык по умолчанию en_US, данного казуса не случится, но это - не проверенная информация, а лишь предположение, сделанное по прочтении чужой статьи про 8.1 и праздных раздумий =)

Ещё одна странность - если создать пустую SQL базу не из шаблона1 (см. официальную документацию по 1С), и попытаться ей указать на этапе создания ИБ, то всё равно получим сообщение "ОШИБКА: тип "mvarchar" не существует (символ 31)"/"ERROR: type "mvarchar" does not exist at character 31", но мне так и не удалось создать из требуемого шаблона БД - валились разные ошибки, но если пользователя sql, от которого создаётся ИБ временно повысить до суперпользователя с правом создания БД, и указать создание базы данных в случае её отсутствия, то всё получается в лучшем виде, так что на этапе первичной настройки, видимо, придётся повышать пользователя до супер...

Что порадовало - теперь в 1С можно работать непосредственно из Linux, что актуально для компаний, использующих его как основную ОС в корпоративной сети (я сейчас работаю как раз в такой компании); из неожиданностей - что при установке клиента 1С, он заявляет о зависимости от сервера и требует его установки, но потом ставится, прописывает значки запуска в "Офис" - "Финансы" и работает довольно сносно (по ощущениям - чуть менее комфортно, чем 8.2 под Windows, но заметно приятнее, чем тот же 8.2 через WINE от Ethersoft).

6. Установка недостающих зависимостей

При запуске клиента к настроенному по данной инструкции серверу, появится сообщение "На сервере отсутствуют шрифты из состава Microsoft Core Fonts. Внешний вид приложения может отличаться от ожидаемого. Процедура установки описана в справочной системе..." - данное сообщение появляется достаточно редко (периодичность не выявил, но появляется точно не единожды, но и не при каждом запуске), и на работе особо не сказывается, но "для красоты" я решил пройтись по всей цепочке и поставить рекомендуемые пакеты. Всё, кроме "corefonts" поставилось из репозиториев (хотя в той самой "справочной системе" безбожно перепутаны регистры в названиях пакетов, из-за чего их идентификация оказалась весьма развлекательна), ну а шрифты я решил пересобрать (в соответствии с рекомендациями из "справочной системы") и результат прикрепляю к статье - msttcorefonts-2.5-1.noarch.rpm, заодно и сами шрифты (уже переименованные в нижний регистр, как происходит при сборке rpm рекомендованным скриптом) - msttcorefonts.tar.gz - содержимое этого архива рекомендуют распаковать в /home/usr1cv8/.fonts (не забыв сменить владельца как на папку, так и на файлы!), если нет возможности установить предложенный .rpm

Кроме "ImageMagick" и шрифтов, для возможности сохранения в табличные файлы (кроме xls - его я пока не заставил формироваться, хотя xlsx формируется), на клиенте должны быть установлены пакеты "libMagickWand5", "libgomp1", "liblcms2-2" и "libbz2-1" - на ряде машин они отсутствовали. При чём той же разрядности, что и сервер 1С (см. п. 4).

7. Настройка аппаратного hasp для виртуализированного сервера 1С (работающего на виртуальной машине KVM)

Не планировал описывать эту процедуру, но раз уж столкнулся с такой ситуацией, опишу... Итак, на этот раз я использовал драйвер от "Alladin Knowledge Systems USB HASP", предоставляемый компанией Sentinel - мне попались две версии:

2878061 сен 11 2012 aksusbd-2.0-1.i386.rpm - с сайта aladdin-rd.ru

3009880 авг 6 16:35 aksusbd-2.2-1.i386.rpm - с сайта safenet-inc.com

Можно воспользоваться драйвером эзерсофт - окончательный выбор следует делать из опыта практической эксплуатации.

Наиболее правильная (на мой взгляд) последовательность действий:

а) убедиться, что на хост-машине драйвер HASP не установлен;

б) установить выбранный драйвер USB HASP4 на виртуальном сервере;

в) выяснить список подключенных USB-устройств к хост-машине

[root@vh01 files]# ls -R /dev/bus/usb

/dev/bus/usb:

001

002

003

004

/dev/bus/usb/001:

001

002

/dev/bus/usb/002:

001

/dev/bus/usb/003:

001

/dev/bus/usb/004:

001

[root@vh01 files]#

г) подключить USB-HASP к хост-машине и выяснить адрес ключа:

[root@vh01 files]# ls -R /dev/bus/usb

/dev/bus/usb:

001

002

003

004

/dev/bus/usb/001:

001

002

/dev/bus/usb/002:

001

/dev/bus/usb/003:

001

/dev/bus/usb/004:

001

002 <==== это наш ключ - раньше его не было

[root@vh01 files]#

д) используя любой из способов (я использовал Virtual Manager на удалённой машине) добавить "USB Host Device" с найденным адресом (в моём примере - 004:002) к виртуальной машине 1С - может потребоваться выключение и включение машины (я добавлял устройство на выключенную машину).

Собственно, всё - на CentOS 6.4 x64/i686 всё работает (были багрепорты про CentOS 6.0/6.1, но вроде всё починили). Если при запуске виртуалки выдаётся сообщение о занятости устройства, скорее всего подцепился драйвер на хост-машине (так писали на паре форумов, хотя мне эту ситуацию воспроизвести не получилось - даже с установленным драйвером на сервере устройство мапилось корректно). Естественно, если переставить ключ в другой порт USB, придётся перенацеливать и виртуальную машину!

И напоследок, коротко о том "что где лежит":

/etc/sysconfig/srv1cv83 - файл конфигурации сервера 1С

/home/usr1cv8/.1cv8/1C/1cv8/1cv8wsrv.lst - файл, в котором хранятся основные свойства сервера - например, учётные данные администратора сервера, зарегистрированые кластеры и т.п.

/home/usr1cv8/.1cv8/1C/1cv8/reg_1541/1CV8Clst.lst - файл, в котором хранятся свойства кластера по умолчанию

/opt/1C/v8.3/x86_64/ - (вместо "x86_64" может быть "i386" - в зависимости от архитектуры системы) исполняемые файлы и сопутствующие ресурсы сервера (и клиента) 1С

/var/1C/licenses - здесь лежат файлы электронных ключей лицензий

8. Настройка локального репозитория 1С для удобства обновления платформы 

В процессе эксплуатации 1С нередко приходится обновлять платформу. Если всё установлено по приведённой выше инструкции, это вызывает определённые неудобства - надо останавливать сервис, удалять старые пакеты, ставить новые... не знаю - мне это ещё в винде надоело смертельно. Linux предлагает очень удобный механизм пакетного обновления из локального репозитория - всё, что нужно - это выбрать место, где будут лежать обновки: для одиночного сервера, к которому все ходят только через web-интерфейс, это может быть /root/repo (всё равно обновление под рутом идёт), ну а в общем случае - хоть /var/www/1c-repo - главное, чтобы все, кому он нужен, его видели. Далее надо установить пакет 'createrepo' (yum install createrepo) - за собой он притащит немало зависимостей, но не смертельно. Теперь командой 'createrepo /root/repo' (где "/root/repo" - выбранный путь хранения репозитория) создаём его "описание" и можно пользоваться.

Затем создаём файл описания нашего репозитория и помещаем его в каталог описаний репозиториев (для CentOS это /etc/yum.repos.d). Пример конфига локального файлового репозитария:

[root@1c yum.repos.d]# cat local-1c.repo

[local-1c]

name=1C Enterprise

#baseurl=http://inhost.firm.lan/repo

baseurl=file:///root/repo

gpgcheck=0

enabled=1

По-моему, разъяснять что за что отвечает, особого смысла нет. Единственное, что важно - сразу yum его может не увидеть - в этой ситуации поможет очистка его кэшей (yum clean all).

Всё. Теперь если надо обновиться, то помещаем новые файлы дистрибутива 1С рядом со старыми, повторяем 'createrepo /root/repo' вызываем 'yum update' - и всё - платформа пошла обновляться! Естественно, за сохранностью и защищённостью своего репозитория надо следить, так как GPG у нас выключен, и это всё же дыра в безопасности, хоть и не особо толстая...

В данном примере хочу привести несколько универсальных функций по выгрузке таблицы значений в файл и дальнейшего чтения из файла:

Порядок программных действий при выгрузке в файл выглядит так:

• Подготавливаем таблицу значений (выгружаем из табличной части, выбираем колонки);
• Конвертируем таблицу значений в табличный документ;
• Сохраняем табличный документ в MXL.

При загрузке таблицы порядок действий такой:

• Читаем из файла табличный документ;
• Конвертируем табличный документ в таблицу значений;
• Используем эту таблицу значений в своих целях (загружаем в табличную часть).

Соответственно файл для хранения данных таблицы имеет расширение *.mxl.

Основные функции для реализации поставленной задачи следующие:

ПреобразоватьТДвТЗ – Функция преобразования табличного документа в таблицу значений.

ПреобразоватьТЗвТД – Функция обратного преобразования таблицы значений в табличный документ.

ПрочитатьТЗИзMXL – Читает из файла данные, определяет колонки таблицы и преобразует эти данные в таблицу значений.

ЗаписатьТЗВMXL – Преобразует таблицу значений в табличный документ и записывает его в файл.

 // Преобразовать табличный документ в таблицу значений.

//

// Параметры:

//	ТабДок - <ТабличныйДокумент> - Исходный табличный документ;

//	СтруктураКолонок - <Структура>, <ТаблицаЗначений> - Структура колонок;

//	НачалоСтрока - <Число> - Строка начала области;

//	НачалоСтолбец - <Число> - Столбец начала области;

//	КонецСтрока - <Число> - Строка конца области;

//	КонецСтолбец - <Число> - Столбец конца области.

//	

// Возвращаемое значение:

//	<ТаблицаЗначений> - Полученная таблица значений.

//

Функция ПреобразоватьТДвТЗ(ТабДок, СтруктураКолонок, Знач НачалоСтрока = Неопределено, Знач НачалоСтолбец = Неопределено, Знач КонецСтрока = Неопределено, Знач КонецСтолбец = Неопределено) Экспорт

 

	// Определение габаритов таблицы

	Если НачалоСтрока = Неопределено И НачалоСтолбец = Неопределено Тогда

		НачалоСтрока = 1;

		НачалоСтолбец = 1;

	КонецЕсли;

 

	Если НачалоСтрока = Неопределено Тогда

		НачалоСтрока = 1;

		Пока НЕ ТабДок.Область(НачалоСтрока, НачалоСтолбец).СодержитЗначение 

		 И НачалоСтрока < ТабДок.ВысотаТаблицы 

		Цикл

			НачалоСтрока = НачалоСтрока + 1;

		КонецЦикла;

	ИначеЕсли НачалоСтолбец = Неопределено Тогда

		НачалоСтолбец = 1;

		Пока НЕ ТабДок.Область(НачалоСтрока, НачалоСтолбец).СодержитЗначение 

		 И НачалоСтолбец < ТабДок.ШиринаТаблицы

		Цикл

			НачалоСтолбец = НачалоСтолбец + 1;

		КонецЦикла;

	КонецЕсли;

 

	КонецСтрока = ?(КонецСтрока = Неопределено, ТабДок.ВысотаТаблицы, КонецСтрока);

	КонецСтолбец = ?(КонецСтолбец = Неопределено, ТабДок.ШиринаТаблицы, КонецСтолбец);

 

	// Преобразование

	ЭтоТаблица = (ТипЗнч(СтруктураКолонок) = Тип("ТаблицаЗначений"));

	ТабЗначений = ПолучитьТаблицуВывода(СтруктураКолонок);

 

	Для ИндексСтроки = НачалоСтрока По КонецСтрока Цикл

		СтрокаТЗ = ТабЗначений.Добавить();

 

		ИндексКолонки = НачалоСтолбец;

		Для Каждого Колонка Из СтруктураКолонок Цикл

			НаименованиеКолонки = ?(ЭтоТаблица, Колонка.Наименование, Колонка.Ключ);

			пИндексКолонки = ?(ЭтоТаблица, Колонка.СтолбецОтчёт, ИндексКолонки);

 

			Если ТабДок.Область(ИндексСтроки, пИндексКолонки).СодержитЗначение Тогда

				СтрокаТЗ[НаименованиеКолонки] = ТабДок.Область(ИндексСтроки, пИндексКолонки).Значение;

			Иначе

				СтрокаТЗ[НаименованиеКолонки] = ТабДок.Область(ИндексСтроки, пИндексКолонки).Текст;

			КонецЕсли;

 

			ИндексКолонки = ИндексКолонки + 1;

		КонецЦикла;

	КонецЦикла;

 

	Возврат ТабЗначений;

КонецФункции;



// Преобразовать таблицу значений в табличный документ.

//

// Параметры:

//	ТабЗначений - <ТаблицаЗначений> - Исходная таблица значений;

//	ТабДок - <ТабличныйДокумент> - Полученный табличный документ. Если параметр не задан, 

//	 то документ создаётся заново и возвращается функцией;

//	НачалоСтрока - <Число> - Строка начала области;

//	НачалоСтолбец - <Число> - Столбец начала области;

//	ВыводитьЗаголовки - <Булево> - Определяет выводить ли имена колонок или нет.

//	

// Возвращаемое значение:

//	<ТабличныйДокумент> - Полученный табличный документ (возвращает параметр "ТабДок").

//

Функция ПреобразоватьТЗвТД(ТабЗначений, ТабДок = Неопределено, Знач НачалоСтрока = Неопределено, Знач НачалоСтолбец = Неопределено, ВыводитьЗаголовки = Ложь) Экспорт

 

	Если ТабДок = Неопределено Тогда

		ТабДок = Новый ТабличныйДокумент;

	КонецЕсли;

 

	// Определение габаритов таблицы

	НачалоСтрока = ?(НачалоСтрока = Неопределено, 1, НачалоСтрока);

	НачалоСтолбец = ?(НачалоСтолбец = Неопределено, 1, НачалоСтолбец);

 

	// Преобразование

	ИндексСтроки = НачалоСтрока;

	Если ВыводитьЗаголовки Тогда

		ИндексКолонки = НачалоСтолбец;

		Для Каждого Колонка Из ТабЗначений.Колонки Цикл

			ТабДок.Область(ИндексСтроки, ИндексКолонки).Текст = ?(ПустаяСтрока(Колонка.Заголовок), Колонка.Имя, Колонка.Заголовок);

			ИндексКолонки = ИндексКолонки + 1;

		КонецЦикла;

		ИндексСтроки = ИндексСтроки + 1;

	КонецЕсли;

 

	Для Каждого Элемент Из ТабЗначений Цикл

		ИндексКолонки = НачалоСтолбец;

		Для Каждого Колонка Из ТабЗначений.Колонки Цикл

			ТабДок.Область(ИндексСтроки, ИндексКолонки).СодержитЗначение = Истина;

			ТабДок.Область(ИндексСтроки, ИндексКолонки).ТипЗначения = Новый ОписаниеТипов(Колонка.ТипЗначения);

			ТабДок.Область(ИндексСтроки, ИндексКолонки).Значение = Элемент[Колонка.Имя];

			ИндексКолонки = ИндексКолонки + 1;

		КонецЦикла;

		ИндексСтроки = ИндексСтроки + 1;

	КонецЦикла;

 

	Возврат ТабДок;

КонецФункции;



// Читает табличный документ из файла MXL и преобразует его в таблицу значений.

//

// Параметры:

//	ИмяФайла - <Строка> - Путь к файлу MXL;

//	СтруктураКолонок - <Структура>, <ТаблицаЗначений> - Структура колонок. Если этот параметр

//		не задан, то структура колонок формируется из самого табличного документа;

//	ЕстьЗаголовок - <Булево> - Есть ли первая строка с заголовками или нет.

//	

// Возвращаемое значение:

//	<ТаблицаЗначений> - Полученная таблица значений.

//

Функция ПрочитатьТЗИзMXL(ИмяФайла, СтруктураКолонок = Неопределено, ЕстьЗаголовок = Истина) Экспорт

 

	ТабДок = Новый ТабличныйДокумент;

	ТабДок.Прочитать(ИмяФайла);

 

	Если СтруктураКолонок = Неопределено И ЕстьЗаголовок Тогда

		СтруктураКолонок = Новый Структура;

		Для ИндексКолонки = 1 По ТабДок.ШиринаТаблицы Цикл

			Обл1 = ТабДок.Область(1, ИндексКолонки);

			Обл2 = ТабДок.Область(2, ИндексКолонки);

			ИмяКолонки = СокрЛП(Обл1.Текст);

			ИмяКолонки = ?(Найти(ИмяКолонки, " ") > 0, СтрЗаменить(ТРег(ИмяКолонки), " ", ""), ИмяКолонки);

			СтруктураКолонок.Вставить(ИмяКолонки, ?(Обл2.СодержитЗначение, Обл2.ТипЗначения, Новый ОписаниеТипов));

		КонецЦикла;

	ИначеЕсли СтруктураКолонок = Неопределено И НЕ ЕстьЗаголовок Тогда

		СтруктураКолонок = Новый Структура;

		Для ИндексКолонки = 1 По ТабДок.ШиринаТаблицы Цикл

			Обл2 = ТабДок.Область(1, ИндексКолонки);

			ИмяКолонки = "К" + Формат(ИндексКолонки, "ЧДЦ=0; ЧН=0; ЧГ=0");

			СтруктураКолонок.Вставить(ИмяКолонки, ?(Обл2.СодержитЗначение, Обл2.ТипЗначения, Новый ОписаниеТипов));

		КонецЦикла;

	КонецЕсли;

 

    Таблица = ПреобразоватьТДвТЗ(ТабДок, СтруктураКолонок, ?(ЕстьЗаголовок, 2, 1), 1);

 

	Возврат Таблица;

КонецФункции;



// Сохраняет таблицу значений в файле в виде табличного документа.

//

// Параметры:

//	ИмяФайла - <Строка> - Путь к файлу MXL;

//	ТабЗначений - <ТаблицаЗначений> - Сохраняемая таблица значений;

//	ЕстьЗаголовок - <Булево> - Есть ли первая строка с заголовками или нет.

//

Процедура ЗаписатьТЗВMXL(ИмяФайла, ТабЗначений, ЕстьЗаголовок = Истина) Экспорт

 

	ТабДок = ПреобразоватьТЗвТД(ТабЗначений, Неопределено, 1, 1, ЕстьЗаголовок);

	ТабДок.Записать(ИмяФайла, ТипФайлаТабличногоДокумента.MXL);

 

КонецПроцедуры;   

Еще небольшой набор функций для вывода таблицы значений в табличный документ. После формирования табличного документа, - сохраняем его в файл mxl.

Табличный документ можно сохранить a файлы следующих типов:

• ANSITXT - Текстовый документ
• DOCX - документ MS Word
• HTML
• HTML3
• HTML4
• HTML5
• MXL
• MXL7
• ODS - Файл Open Office
• PDF - файл Acrobat Readr
• TXT - Текстовый документ
• XLS - файл Excel
• XLS95 - файл Excel95
• XLS97 - файл Excel97
• XLSX - файл Excel2010

 // Получаем таблицу значения из файла. 

Функция ЗагрузитьТЗизФайла(ИмяФайла)    

    Путь = КаталогВременныхФайлов() + ИмяФайла; 

    Текст = Новый ЧтениеТекста(Путь, КодировкаТекста.UTF8); 

    стрТЗ = Текст.Прочитать(); 

    Текст.Закрыть(); 

    // получим таблицу значений из строки

    ТЗ = ЗначениеИзСтрокиВнутр(стрТЗ);    

    Возврат ТЗ;    

КонецФункции    



// Заполнить ячейки в строке  значениями 

//

Функция ЗаписьТЗ2ТабДок(записьТЗ,НомерСтроки,ТабличныйДокумент)

    НомерКолонки = 1;

    Символ160 = Символ(160);    

    // цикл по колонкам таблицы

    // РезультатЗапроса.Колонки.Количество()    // - количество колонок

    Для каждого полеТЗ из ЗаписьТЗ цикл 

        // значения ячейки в Excel

        типПоляТЗ = ТипЗнч(полеТЗ);

        если типПоляТЗ = Тип("Число") тогда             

            полеТЗ=Строка(полеТЗ); 

            полеТЗ=СтрЗаменить(полеТЗ,Символ160,"");

            полеТЗ=СтрЗаменить(полеТЗ,",",".");

        иначеесли типПоляТЗ = Тип("Строка") тогда      

        иначе        

            полеТЗ = строка(полеТЗ);

        КонецЕсли;    

        имяОбласти = "R" + номерСтроки + "C" + НомерКолонки;

        имяОбласти = СтрЗаменить(имяОбласти,Символ(160),"");         

        Ячейка = ТабличныйДокумент.Область(имяОбласти);

        Ячейка.Текст = полеТЗ;

        НомерКолонки = НомерКолонки + 1;

    КонецЦикла;            

КонецФункции



// Заполнить наименованиями колонок таблицу

Функция НаимКолонок2Mxl(ТаблицаЗначений,ТабличныйДокумент)

    // массКолонки = новый массив();

    номерСтроки=1;

    номКолонки=1; 

    ТабличныйДокумент = новый ТабличныйДокумент;

    // цикл по коллекции колонок

    Для НомКол=0 по ТаблицаЗначений.Колонки.Количество() - 1 Цикл

        //Сообщить(Колонка.Имя + "(" + Колонка.ТипЗначения + ")" );            

        имяКолонки=ТаблицаЗначений.Колонки[НомКол].Имя;

        //ТабличныйДокумент.Область(

        имяОбласти = "R" + номерСтроки + "C" + номКолонки;

        имяОбласти = СтрЗаменить(имяОбласти,Символ(160),"");         

        Ячейка = ТабличныйДокумент.Область(имяОбласти);

        //значениеЯчейки = СтрЗаменить(имяОбласти,Символ(160),"");         

        Ячейка.Текст = имяКолонки;

        // на основе текущего шрифта сделаем Жирный

        ЖирныйШрифт = ?(ЖирныйШрифт = Неопределено,Новый Шрифт(Ячейка.Шрифт,,,Истина),ЖирныйШрифт);         

        Ячейка.Шрифт = ЖирныйШрифт;

        номКолонки = номКолонки + 1;        

    КонецЦикла;

КонецФункции





// Заполнить построчно табличный документ

Функция Таблица2Mxl(ТаблицаЗначений,ТабличныйДокумент)

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

    НомСтр=1; // заполняем данными начиная со 2-й строки    

    // цикл по строкам таблицы

    Для каждого записьТЗ из ТаблицаЗначений Цикл

        НомСтр = НомСтр + 1;

        // цикл по колонкам таблицы        

        ЗаписьТЗ2ТабДок(записьТЗ,НомСтр,ТабличныйДокумент);         

    КонецЦикла;    

КонецФункции



// Таблица значений в табличный документ

Функция ТаблицаЗначений2Mxl(ТаблицаЗначений,ФайлMxl)

    ТабличныйДокумент = новый ТабличныйДокумент;

    // вывести колонки

    НаимКолонок2Mxl(ТаблицаЗначений,ТабличныйДокумент);

    // вывести содержимое таблицы    

    Таблица2Mxl(ТаблицаЗначений,ТабличныйДокумент);

    ТабличныйДокумент.Записать(ФайлMxl,ТипФайлаТабличногоДокумента.MXL);

    ТабличныйДокумент.Показать(ФайлMxl,ФайлMxl);

    Возврат 0;

КонецФункции





Функция    Тест_ВыгрузитьТЗвMxl();

    файл_мТЗИсходныеДанные = "мТЗИсходныеДанные.dat";        

    ТЗ = ЗагрузитьТЗизФайла(файл_мТЗИсходныеДанные);    

    ФайлMxl = КаталогВременныхФайлов() + СтрЗаменить(файл_мТЗИсходныеДанные,".dat",".mxl");  

    ТаблицаЗначений2Mxl(ТЗ,ФайлMxl);

КонецФункции



Тест_ВыгрузитьТЗвMxl();   

Пример выгруженной таблицы значений в файл:

Разработка любой конфигурации потребует использования регистров сведений! Чтобы упростить запись и чтение данных в регистре сведений, Вы можете использовать универсальные функции:

 // Добавляет одну запись в регистр сведений по переданным значениям структуры

//

// Параметры:

//  СтруктураЗаписи - Структура - структура, по значениям которой необходимо создать набор записей и заполнить этот набор

//  ИмяРегистра     - Строка - имя регистра сведений, в который необходимо добавить запись

// 

Процедура ДобавитьЗаписьВРегистрСведений(СтруктураЗаписи, Знач ИмяРегистра, Загрузка = Ложь) Экспорт

	

	НаборЗаписей = СоздатьНаборЗаписейРегистраСведений(СтруктураЗаписи, ИмяРегистра);

	

	// добавляем только одну запись в новый набор записей

	НоваяЗапись = НаборЗаписей.Добавить();

	

	// заполняем значения свойств записи из переданной структуры

	ЗаполнитьЗначенияСвойств(НоваяЗапись, СтруктураЗаписи);

	

	НаборЗаписей.ОбменДанными.Загрузка = Загрузка;

	

	// записываем набор записей

	НаборЗаписей.Записать();

	

КонецПроцедуры





// Обновляет запись в регистр сведений по переданным значениям структуры

//

// Параметры:

//  СтруктураЗаписи - Структура - структура, по значениям которой необходимо создать менеджер записи и обновить запись

//  ИмяРегистра     - Строка - имя регистра сведений, в котором необходимо обновить запись

// 

Процедура ОбновитьЗаписьВРегистрСведений(СтруктураЗаписи, Знач ИмяРегистра) Экспорт

	

	МетаданныеРегистра = Метаданные.РегистрыСведений[ИмяРегистра];

	

	// создаем менеджер записи регистра

	МенеджерЗаписи = РегистрыСведений[ИмяРегистра].СоздатьМенеджерЗаписи();

	

	// устанавливаем отбор по измерениям регистра

	Для Каждого Измерение ИЗ МетаданныеРегистра.Измерения Цикл

		

		// если задано значение в структуре, то отбор устанавливаем

		Если СтруктураЗаписи.Свойство(Измерение.Имя) Тогда

			

			МенеджерЗаписи[Измерение.Имя] = СтруктураЗаписи[Измерение.Имя];

			

		КонецЕсли;

		

	КонецЦикла;

	

	// считываем запись из базы данных

	МенеджерЗаписи.Прочитать();

	

	// заполняем значения свойств записи из переданной структуры

	ЗаполнитьЗначенияСвойств(МенеджерЗаписи, СтруктураЗаписи);

	

	// записываем менеджер записи

	МенеджерЗаписи.Записать();

	

КонецПроцедуры





// Удаляет набор записей в регистре по переданным значениям структуры

//

// Параметры:

//  СтруктураЗаписи - Структура - структура, по значениям которой необходимо удалить набор записей

//  ИмяРегистра     - Строка - имя регистра сведений, в котором необходимо удалить набор записей

// 

Процедура УдалитьНаборЗаписейВРегистреСведений(СтруктураЗаписи, ИмяРегистра, Загрузка = Ложь) Экспорт

	

	НаборЗаписей = СоздатьНаборЗаписейРегистраСведений(СтруктураЗаписи, ИмяРегистра);

	

	НаборЗаписей.ОбменДанными.Загрузка = Загрузка;

	

	// записываем набор записей

	НаборЗаписей.Записать();

	

КонецПроцедуры



// Создает набор записей регистра сведений по переданным значениям структуры. Добавляет одну запись в набор

//

// Параметры:

//  СтруктураЗаписи - Структура - структура по значениям которой необходимо создать набор записей и заполнить этот набор

//  ИмяРегистра     - Строка - имя регистра сведений

// 

Функция СоздатьНаборЗаписейРегистраСведений(СтруктураЗаписи, ИмяРегистра) Экспорт

	

	МетаданныеРегистра = Метаданные.РегистрыСведений[ИмяРегистра];

	

	// создаем набор записей регистра

	НаборЗаписей = РегистрыСведений[ИмяРегистра].СоздатьНаборЗаписей();

	

	// устанавливаем отбор по измерениям регистра

	Для Каждого Измерение ИЗ МетаданныеРегистра.Измерения Цикл

		

		// если задано значение в структуре, то отбор устанавливаем

		Если СтруктураЗаписи.Свойство(Измерение.Имя) Тогда

			

			НаборЗаписей.Отбор[Измерение.Имя].Установить(СтруктураЗаписи[Измерение.Имя]);

			

		КонецЕсли;

		

	КонецЦикла;

	

	Возврат НаборЗаписей;

КонецФункции

   

Поступил ко мне запрос: Можно ли сделать, чтобы автоматически считало Компенсацию питания в зависимости от количества отработанных дней по табелю?

Компенсация питания

Стоимость питания, полученного работником от работодателя или оплаченного работодателем за работника, является доходом сотрудника и облагается НДФЛ (Письмо Минфина России от 31.03.2011 N 03-03-06/4/26).

В соответствии с п. 2 ст. 211 Налогового кодекса РФ, стоимость полученного питания признается доходом работника в натуральной форме. Налогом на доходы физических лиц будут облагаться следующие выплаты:

стоимость продуктов питания, которые работодатель передал работнику, в том случае если работодатель самостоятельно закупает такие продукты и передает их своим работникам.

стоимость услуг специализированных организаций, если работодатель заключил договор на оказание услуг общественного питания своим работникам. Стоимость данных услуг по предоставлению питания должна включать НДС, в соответствии с п. 1 ст. 211 Налогового Кодекса РФ.

Создадим новое основное начисление.

Откроем меню «Расчет зарплаты по организациям» далее выбираем «Настройка расчета зарплаты» документ «Основные начисления организаций».

Нажмем на кнопку «Добавить» и заполним поля документа:

1. поле «Последовательность расчета» - выбираем «Первичное начисление».
2. поле «Способ расчета» - необходимо указать каким образом будет производиться данное начисление в программе, для этого настроим формулу расчета и выберем значение «Произвольная формула расчета», далее нажимаем «Редактировать формулу расчета».

Оплату питания сотрудников организации будем производить пропорционально отработанным дням, поэтому в формуле расчета необходимо указать «Стоимость обеда * время в днях».

Необходимо добавить новый показатель «Стоимость обеда» он будет имеет следующие значения:

• вид показателя – денежный.
• назначение показателя – для всей компании (организации) или для подразделения
• порядок ввода показателя – периодически.

Перейдем на закладку «Время».

Установим флажок в поле «Дополнительное начисление за уже оплаченное время».

В реквизите «Вид времени по классификатору использования рабочего времени» установим значение из классификатора – «Явка».

Перейдем на закладку «Использование».

Все значения в данной закладке оставляем по умолчанию и ничего не меняем.

Перейдем на закладку «Бухучет и ЕНВД».

Галку - является натуральным доходом

В данной закладке необходимо указать способ отражения начисления в регламентированном учете.

В том случае, если оплата стоимости питания предусмотрена системой оплаты труда организации, то необходимо выставить значение – «По данным о сотруднике и его плановых начислениях».

В том случае, если оплата питания не предусмотрена трудовым или коллективным договором, то расходы по начислению не могут быть приняты для целей налогового учета. Данные расходы необходимо учитывать по статье затрат с установленным видом расходов НУ «Не учитываемые в целях налогообложения».

Перейдем на закладку «Налоги».

В первом реквизите «НДФЛ» установим значение «Облагается, код дохода» выберем из всплывающего списка код дохода «4800».

Далее переходим к реквизиту «Налог на прибыль, вид расхода по ст.255 НК РФ» в данном поле необходимо установить флажок из двух вариантов:

ставим флажок в поле «Учитывать в расходах на оплату труда по:» - в том случае, если оплата стоимости питания предусмотрена системой оплаты труда организации, из списка выставляем «пп.25, ст.255 НК РФ».

в том случае, если оплата питания не предусмотрена трудовым или коллективным договором, то расходы по начислению не могут быть приняты для целей налогового учета устанавливаем флажок в первом поле «Не включается в расходы на оплату труда».

Перейдем на закладку «Взносы».

Перейдем к реквизиту «Страховые взносы в ПФР, ФСС и ФОМС» выставим в поле «Вид дохода» выбираем из всплывающего списка «Доходы, целиком облагаемые страховыми взносами».

Далее в поле «ФСС, страхование от несчастных случаев (до 2011 года)» устанавливаем флажок в поле «Облагается».

Следующее поле в данной закладке «ЕСН (до 2010г.)» выбираем вид дохода «Облагается ЕСН, взносами в ПФР целиком».

Перейдем на закладку «Прочее».

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

Установка сумму показателей

Далее перейдем в меню «Расчет зарплаты по организациям» выберем подменю «Показатели расчета заработной платы».

Перейдем на закладку «Постоянные».

Пример установки значения для определенного подразделения:

Если нужно в целом по компании, то Выберем «Данные по организации» для все организации в целом и в правой колонке таблицы введем дату и сумму размера оплаты питания сотрудников.

Вводим плановое начисление

Если оплату стоимости питания необходимо начислять сотрудникам ежемесячно в течение определенного периода времени, т.е. в плановом порядке, то в программу необходимо ввести новый документ «Ввод постоянного начисления или удержания организаций».

Для создания документа необходимо перейти в меню на панели инструментов «Расчет зарплаты по организациям» далее выбираем «Плановые начисления» документ «Ввод постоянного начисления или удержания организаций».

Нажмем «Добавить».

поле «Номер» выставляем дату формирования операции в программе.

поле «Действие» выставим значение «Внести или изменить начисление».

поле «Вид расчета» выставим из справочника «Основные начисления организации» новое начисление, добавленное в шаге №1 – «Компенсация питания».

поле «Период» выставляем период с которого применяется данное начисление.

Заполняем табличную часть «Сотрудники и показатели для расчета».

В данном поле выставляем сотрудников которым производится оплата питания, из справочника «Сотрудники».

Записываем документ и проводим в программе.

Теперь данное начисление будет автоматически рассчитываться при Начислении ЗП

Каждый расчетчик сталкивается с начислением планового аванса, но как правильно это оформить в ЗУП 2.5 знает не каждый.

Ниже небольшая инструкция по начислению планового аванса в ЗУП:

В ЗУПе разработаны два способа расчета аванса:

- Аванс фиксированной суммой;

- Аванс за первую половину месяца пропорционально отработанным 

Настройки для расчета

Откройте Сервис - Параметры учета и установите настройки значений для Вашей организации:

Аванс фиксированной суммой

Необходимо в списке справочника «Сотрудники организаций» в поле «Аванс» указать сумму, которая будет являться фиксированным авансом для каждого из сотрудников.

После этого как вы заполните все фиксированные суммы по сотрудникам, чтобы выплатить аванс. Открываем документ «Зарплата к выплате».

«Расчет зарплаты - Касса и Банк - Зарплата к выплате организаций» 

Создаем новый документ

Указываем в нем месяц начисления (аванс за какой месяц выплачивается), способ выплаты (через кассу или через банк). Самое главное поле это поле «Выплачивать». В нем надо обязательно выбрать вариант «Плановый аванс». После этого нажимаем кнопку «Заполнить» и табличная часть документа будет заполнена сотрудниками, по которым мы указали размер аванса в справочнике «Сотрудники организаций».

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

Аванс за первую половину месяца пропорционально отработанным 

Когда нужно выплатить аванс за половину месяца пропорционально отработанному времени то для этого в программе 1С Зарплата и Управление Персоналом есть специальный функционал - Документ «Начисление зарплаты» и конечно «Зарплата к выплате».

Открываем документ «Начисление зарплаты». В нем необходимо указать месяц начисления и в поле «Режим начисления» обязательно выбрать «Первая половина текущего месяца». После этого по кнопке «Заполнить» получить в табличной части перечень сотрудников с их начислениями

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

НДФЛ

Проведение документа «Начисление зарплаты» с режимом начисления «Первая половина текущего месяца» на самом деле не делает никаких начислений, а лишь осуществляет расчет сумм аванса. Поэтому, когда мы в конце месяца будем пользоваться этим документом для расчета зарплаты, то он снова будет считать всех сотрудников с первого числа месяца, а не с середины.

После расчета аванса в документе «Начисление зарплаты» необходимо его провести и обратиться к документу «Зарплата к выплате». В нем указываем месяц начисления и в поле «выплачивать» выбираем «Аванс по расчету за первую половину месяца». Жмем кнопку «заполнить». В результате табличная часть будет заполнена сотрудниками, для которых рассчитан аванс за половину месяца за вычетом НДФЛ.

Как и в первом случае после проведения документа «Зарплата к выплате», сформируется задолженность сотрудника перед организацией.

Часто задаваемые Вопросы по начислению аванса:

Необходимо чтобы в аванс начислялось 40% от суммы месячного оклада, Как начислить?

В списке сотрудников  или в регистре сведений Авансы сотрудникам организаций (меню Расчет зарплаты по организациям - Касса и банк - Авансы сотрудникам организаций) указываете сумму планового аванса 40 от зп вашего сотрудника. 

Далее формируете документ "Зарплата к выплате" операция "плановый Аванс" 

Как рассчитать НДФЛ с аванса?

Уточните, плз, что должно выплачиваться за первую половину месяца: собственно аванс или зарплата за 1 половину месяца?

1.Если аванс, но это НЕ НАЧИСЛЕНИЕ! Это-ВЫПЛАТА!

Сразу создаем документ Зарплата к выплате, заполняем его из фиксированной суммы аванса, заданной в регистре сведений Авансы сотрудникам.

НДФЛ НЕ ПЛАТИМ!

Да, неудобно фиксированной суммой.

Можно, да, заполнить эти фиксированные суммы какой-нибудь обработкой.

Или заполнять обработкой не регистр сведений Авансы сотрудникам, а сам документ Зарплата к выплате.

2.Если это зп за 1 половину месяца, то она, действительно, расчитывается док.Начисление зп за 1 половину месяца, берется и уплачивается НДФЛ и т.п. Но начисляем не аванс как таковой, а часть оклада, тарифа, надбавок за часть месяца.

Это должно быть прописано в официальных документах организации, а не "как удобно расчетчику"

И,-подчеркну.-аванс это НЕ начисление. Начисляются-оклад, тариф, надбавки.

Мы НЕ назначаем такое начисление-аванс.И формулу его создать стандарными средствами НЕ можем.

Подскажите пожалуйста, пытаюсь людям начислить аванс, выбрала "плановый аванс" 50% от з/п, проставила у каждого сотрудника. Затем делаю "выплата", выбираю "банк", так как хочу на карты перечислить, и тут у меня отображается только один сотрудник...в чем подвох? хотя если выбрать "через кассу" отображаются все..Лицевые счета по всем заполнены.

В программе вы можете "плановый аванс" задать как вид выбираемой операции в док-те "Зарплата к выплате" . Тогда в ведомость автоматически подставятся суммы, проставленные каждому сотруднику. Причем, те сотрудники, которым вы не назначали плановый аванс, в такую ведомость не попадут.

Далее, если способ выплаты вы выбираете "через кассу", то такой вариант ведомости предоставляет впоследствии лишь возможность "ввести на основании" РКО (кассовый документ). Так реализовано в Зарплате и Управлении Персоналом 8, ред. 2.5.

А если вы выбираете способ выплаты - "через банк" , то справа открывается поле для контрагента- банка, в который вы передаете ведомость на списание суммы с вашего р/счета на карточные зарплатные счета ваших сотрудников по Зарплатному проекту.

В таком случае можно провести перечисление по банку обычного планового аванса.

Но если у вас установлен упрощенный вариант учета взаиморасчетов с сотрудниками, то у вас не получится ни платежное поручение ввести (как документ), ни в выписке банка что-либо оформить в конфигурации.

Кроме того, есть ещё вариант для того, чтобы некий аванс попал в ведомость для перечисления с банковского счета (или по расходом кассе). Для этого нужно производить отдельный расчет (док-том Начисление з/пл) за первую половину месяца. Такой расчет должен учитывать фактические невыходы (табель учета раб.времени), то есть выплата не просто плановой суммой, а в меньшей сумме, если первая половина месяца отработана сотрудником не полностью.

Кризис дело неприятное... и многие пытаясь сэкономить хоть как-нибудь, и устанавливают на Windows PostgreSQL вместо MS SQL.

Хотя если по Вашей компании небольшие обороты, то лучше поставить MS SQL Server 2014 Express, т.к. по опыту PostgreSQL хорошо работает на Linux, на Windows при настройках по умолчанию PostgreSQL работает медленнее MS SQL Server 2014 Express.

Устанавливаем PostgreSQL 9.2.4-1

Скачиваем официальные пакет с сайта 1С (users.v8.1c.ru) и запускаем установку

Отмечаем объекты к установке, если они не отмечены

Устанавливаем "как сервис". Для работы этого сервиса потребуется специальный пользователь. Указываем учетную запись, домен (если имеется) и пароль.

Если пользователь postgres не заведен в системе, то установщик спросит создать пользователя? - жмем да

Перейдем к следующему шагу и укажем Инициализировать кластер БД, порт 5432 и Кодировку UTF8

Если кластер серверов 1С и PostgreSQLна разных машинах, то ставим галочку «Поддерживать подсоединения с любых IP, а не только с localhost». 

Далее - Может возникнуть ошибка «Secondary Logon». Тогда идем в «Администрирование» – «Службы». Стартуем службу «Вторичный вход в систему» или «Secondary Logon»

Далее отметьте галкой необходимые модули, можно установить все, но для 1С они не нужны, я устанавливаю только Adminpack

Если процесс установки завершается без проблем, то вам повезло

Чаще бывают проблемы, решение простое и элегантное (бубен можно оставить):

1. Создать/Изменить учетную запись postgres, включить её в группу Администраторы

2. Выйти из системы и войти в неё под учетной записью postgres

3. Запустить установку PostgreSQL

После установки через меню "Пуск" - "Все программы" запускаем утилиту администрирования «pgAdmin III».

Подключаемся к серверу. Там вводим пароль для пользователя «postgres». Если подключиться удалось, попробуем создать новую базу средствами самой 1С.

Запускаем клиентскую часть 1С. Жмем кнопку "Добавить", ставим галочку "Сервер предприятия 1С". Далее заполняем следующее: сервер базы данных (IP или DNS имя того сервера, куда ставили PostgreSQL) - если тот же, что и кластер 1С, то указываем 127.0.0.1. Имя базы данных: [любое_имя]. Пользователь: "postgres" Пароль: [ваш_пароль_postgres]. Далее.

Проверяем, что база 1С создается успешно.

Часто при разработке необходимо вывести данные в печатную форму, ниже шаблон вывода в табличный документ

Пример процедуры Вывода на печать

 Процедура Печать(ТабДок) Экспорт



//создание нового  табличного   документа 

ТабДок = Новый ТабличныйДокумент; 



//получение макета для печати расходной накладной

Макет = Документы.РасходнаяНакладная.ПолучитьМакет("Основной");



//получим область "Заголовок" как новый  табличный   документ  (!)

Область = Макет.ПолучитьОбласть("Заголовок"); 



//укажем параметры области

Область.Параметры.НомерДокумента = Номер;

Область.Параметры.От = Дата;

Область.Параметры.Кому = Контрагент;



//выведем заполненную область "Заголовок"  в   табличный   документ 

ТабДок.Вывести(Область);



//выведем область "Шапка"  в   табличный   документ 

ТабДок.Вывести(Макет.ПолучитьОбласть("Шапка"));



//получение области "Строка"

//обратите внимание, что это можно сделать до цикла по строкам

Область = Макет.ПолучитьОбласть("Строка");



// вывод  строк  документа  в печатную форму

Для Каждого СтрСостава Из Состав Цикл 

          //заполнение параметров области из строки  табличной  части 

     Область.Параметры.Заполнить(СтрСостава);



     // вывод  сформированной области  в   табличный   документ 

     ТабДок.Вывести(Область);



КонецЦикла;



// вывод  области "Подвал"

Область = Макет.ПолучитьОбласть("Подвал");

Область.Параметры.ИтогоКоличество = Состав.Итог("Количество");

Область.Параметры.ИтогоСумма = Состав.Итог("Сумма");

ТабДок.Вывести(Область);



//установим параметры отображения  табличного   документа 

ТабДок.ТолькоПросмотр = Истина;

ТабДок.ОтображатьЗаголовки = Истина;

ТабДок.ОтображатьСетку = Ложь;



//покажем  табличный   документ  на экране 

ТабДок.Показать();



КонецПроцедуры<br>   

Пример функции формирующей печатную форму Счета по Ссылке на документ:

 Функция СформироватьПечатнуюФорму(СсылкаНаДокумент, ОбъектыПечати)



ТабличныйДокумент = Новый ТабличныйДокумент;

ТабличныйДокумент.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_СчетНаОплату";



МакетОбработки = ПолучитьМакет("Счет");



//заполняем шапку

ОбластьШапка = МакетОбработки.ПолучитьОбласть("Шапка");

ОбластьШапка.Параметры.НомерДокумента = СсылкаНаДокумент.Номер;

ОбластьШапка.Параметры.ДатаДокумента = СсылкаНаДокумент.Дата;

ОбластьШапка.Параметры.НазваниеОрганизации = СсылкаНаДокумент.Организация.Наименование;

//выводим шапку в табличный документ

ТабличныйДокумент.Вывести(ОбластьШапка);



//заполняем строки ТЧ

ОбластьСтроки = МакетОбработки.ПолучитьОбласть("СтрокаТЧ");



// Перебор строк документа

Для Каждого ТекущаяСтрока Из СсылкаНаДокумент.Товары Цикл

ЗаполнитьЗначенияСвойств(ОбластьСтроки.Параметры, ТекущаяСтрока);

ТабличныйДокумент.Вывести(ОбластьСтроки);

КонецЦикла;



//заполняем подвал

ОбластьПодвал = МакетОбработки.ПолучитьОбласть("Подвал");

ОбластьПодвал.Параметры.КоличествоИтог = СсылкаНаДокумент.Товары.Итог("Количество");

ОбластьПодвал.Параметры.СуммаИтог = СсылкаНаДокумент.Товары.Итог("Сумма");

ОбластьПодвал.Параметры.ИмяОтветственного = СсылкаНаДокумент.Менеджер.Наименование;

//выводим подвал в табличный документ

ТабличныйДокумент.Вывести(ОбластьПодвал);



// Установим настройки выводимого документа

ТабличныйДокумент.АвтоМасштаб = Истина;



Возврат ТабличныйДокумент;

КонецФункции