Регламент для обновления базы данных

28.04.17

Интеграция - Обмен между базами 1C

Обработка для выполнения обновления узла. Работает как регламентное задание.

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

Наименование Файл Версия Размер
Обновление конфигурации
.epf 8,98Kb
3
.epf 8,98Kb 3 Скачать

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

Далее нужно настроить расписание.

Принцип работы:

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

Если нужно обновить - тогда всех выкинет из БД и запланирует задание на обновление конфигурации. Если обновление прошло удачно, тогда отключит выполнение задания.

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

Функция ЗавершитьСеансы()
	Результат = Истина;
	
	Блокировка = Новый БлокировкаСеансов;
	Блокировка.Установлена = Истина;
	Блокировка.Начало = ТекущаяДатаСеанса();
	Блокировка.КодРазрешения = "КодРазрешения";
	Блокировка.Сообщение = "Выполняется обновление. Сохраните данные и закройте 1С";
	УстановитьБлокировкуСеансов(Блокировка);
	
	Возврат Результат;
	
КонецФункции

Процедура ОбновлениеБД()
	//Пропишем пароль пользователя
	ПарольАдмина = Константы.Сударь_Администратор.Получить();
	Результат = "";
	
	Админ = Справочники.Пользователи.НайтиПоНаименованию("Администратор");
	Если ЗначениеЗаполнено(Админ.ИдентификаторПользователяИБ) Тогда
		ЗначХран = ПользователиИнформационнойБазы.НайтиПоУникальномуИдентификатору(Админ.ИдентификаторПользователяИБ);
		ЗначХран.Пароль	= ПарольАдмина;
		Попытка
			ЗначХран.Записать();
		Исключение
			Результат = "Не удалось записать пользователя.";
		Конецпопытки;
		
	КонецЕсли;
	
	//Запишем батник для обновления
	Если Результат = "" Тогда
		СтрокаСоединения = СтрокаСоединенияИнформационнойБазы();
		Если лев(СтрокаСоединения,4) = "Srvr" Тогда  
			Сервак = Лев(СтрокаСоединения,Найти(СтрокаСоединения,";Ref="));
			НачалоИБ = Найти(СтрокаСоединения,";Ref=")+5;
			НужноВзять = СтрДлина(СтрокаСоединения)- НачалоИБ;
			База   = Прав(СтрокаСоединения,НужноВзять);
			Сервак = СтрЗаменить(Сервак, "Srvr=", "");
			Сервак = СтрЗаменить(Сервак, ";", "");
			База = СтрЗаменить(База, ";", "");
			СтрокаСоединения = Сервак+"\"+База;
			СтрокаСоединения = СтрЗаменить(СтрокаСоединения, """", "");
			КаталогПрограммы = КаталогПрограммы();
			ИмяФайлаПрограммы = КаталогПрограммы + "\1cv8.exe";                       
			
			КоманднаяСтрокаОбновления = "echo off
			|cls
			|"""+ИмяФайлаПрограммы+""" CONFIG /S"""+СтрокаСоединения+""" /N""Администратор"" /P"""+ПарольАдмина+""" /DisableStartupMessages /UpdateDBCfg /UC""КодРазрешения""
			|"""+ИмяФайлаПрограммы+""" ENTERPRISE /S"""+СтрокаСоединения+""" /N""Администратор"" /P"""+ПарольАдмина+""" /DisableStartupMessages /C""РазрешитьРаботуПользователей"" /UC""КодРазрешения""";   		
		Иначе
			
			СтрокаСоединения = СтрЗаменить(СтрокаСоединения, "File=", "");
			СтрокаСоединения = СтрЗаменить(СтрокаСоединения, ";", "");
			КаталогПрограммы = КаталогПрограммы();
			ИмяФайлаПрограммы = КаталогПрограммы + "\1cv8.exe";                       
			
			КоманднаяСтрокаОбновления = "echo off
			|cls
			|"""+ИмяФайлаПрограммы+""" CONFIG /F"+СтрокаСоединения+" /N""Администратор"" /P"""+ПарольАдмина+""" /DisableStartupMessages /UpdateDBCfg /UC""КодРазрешения""
			|"""+ИмяФайлаПрограммы+""" ENTERPRISE /F"+СтрокаСоединения+" /N""Администратор"" /P"""+ПарольАдмина+""" /DisableStartupMessages /C""РазрешитьРаботуПользователей"" /UC""КодРазрешения""";   		
		КонецЕсли;
		
		ИмяФайлаСкрипта = "C:\run1С.bat";
		Ф = Новый ТекстовыйДокумент();
		Ф.УстановитьТекст(КоманднаяСтрокаОбновления);
		Ф.Записать(ИмяФайлаСкрипта, КодировкаТекста.OEM);
		Результат = "Выполнено";
	КонецЕсли;
	
	//Запишем схему для создания задания
	Если Результат = "Выполнено" Тогда
		WSH = Новый COMobject("wscript.network");
		ИмяКомпьютера = WSH.ComputerName;
		ИмяПользователя = WSH.UserName;
		
		ТекстХМЛ = "<?xml version=""1.0"" encoding=""UTF-16""?>
		|<Task version=""1.2"" xmlns=""http://schemas.microsoft.com/windows/2004/02/mit/task"">
		|  <RegistrationInfo>
		|    <Date>2017-04-05T16:11:32.542172</Date>
		|    <Author>"+ИмяКомпьютера+"\"+ИмяПользователя+"</Author>
		|    <Description>Запускаем обновление и затем пускаем пользователей и выполняем синхронизацию с центром</Description>
		|  </RegistrationInfo>
		|  <Triggers>
		|    <CalendarTrigger>
		|      <Repetition>
		|        <Interval>PT5M</Interval>
		|        <Duration>P1D</Duration>
		|        <StopAtDurationEnd>false</StopAtDurationEnd>
		|      </Repetition>
		|      <StartBoundary>2017-04-06T08:00:00</StartBoundary>
		|      <Enabled>true</Enabled>
		|      <ScheduleByDay>
		|        <DaysInterval>1</DaysInterval>
		|      </ScheduleByDay>
		|    </CalendarTrigger>
		|    <RegistrationTrigger>
		|      <Enabled>true</Enabled>
		|      <Delay>PT30S</Delay>
		|    </RegistrationTrigger>
		|  </Triggers>
		|  <Principals>
		|    <Principal id=""Author"">
		|      <UserId>"+ИмяКомпьютера+"\"+ИмяПользователя+"</UserId>
		|      <LogonType>InteractiveToken</LogonType>
		|      <RunLevel>HighestAvailable</RunLevel>
		|    </Principal>
		|  </Principals>
		|  <Settings>
		|    <MultipleInstancesPolicy>IgnoreNew</MultipleInstancesPolicy>
		|    <DisallowStartIfOnBatteries>true</DisallowStartIfOnBatteries>
		|    <StopIfGoingOnBatteries>true</StopIfGoingOnBatteries>
		|    <AllowHardTerminate>true</AllowHardTerminate>
		|    <StartWhenAvailable>true</StartWhenAvailable>
		|    <RunOnlyIfNetworkAvailable>false</RunOnlyIfNetworkAvailable>
		|    <IdleSettings>
		|      <StopOnIdleEnd>true</StopOnIdleEnd>
		|      <RestartOnIdle>false</RestartOnIdle>
		|    </IdleSettings>
		|    <AllowStartOnDemand>true</AllowStartOnDemand>
		|    <Enabled>true</Enabled>
		|    <Hidden>false</Hidden>
		|    <RunOnlyIfIdle>false</RunOnlyIfIdle>
		|    <WakeToRun>false</WakeToRun>
		|    <ExecutionTimeLimit>PT4H</ExecutionTimeLimit>
		|    <Priority>7</Priority>
		|    <RestartOnFailure>
		|      <Interval>PT1M</Interval>
		|      <Count>3</Count>
		|    </RestartOnFailure>
		|  </Settings>
		|  <Actions Context=""Author"">
		|    <Exec>
		|      <Command>C:\run1С.bat</Command>
		|    </Exec>
		|  </Actions>
		|</Task>";
		
		ИмяФайлаСкрипта = "C:\Run1C_Task.xml";
		Ф = Новый ТекстовыйДокумент();
		Ф.УстановитьТекст(ТекстХМЛ);
		Ф.Записать(ИмяФайлаСкрипта, КодировкаТекста.UTF16);
		Результат = "Записано";
	КонецЕсли;
	
	Если Результат = "Записано" Тогда
		ТекстБатника  ="
		|@echo off
		|Rem action - установка значение disable или enable 
		|set task_action=enable 
		|REM Проверка наличия прав администратора
		|REM @WHOAMI /PRIV | find /i ""SeRemoteShutdownPrivilege"" > nul
		|REM if %ERRORLEVEL% == 0 goto admin
		|REM echo Execution aborted. Run this batch file AS Administrator  !!!
		|REM pause
		|REM exit
		|REM :admin
		|REM @echo try %task_action% scheduled tasks ...  
		|schtasks /Create /XML c:\Run1C_Task.xml /TN ""Run1C_Task""
		|schtasks /change /tn ""\Run1C_Task"" /%task_action% >> %~dn0.log";
		
		ИмяФайлаСкрипта = "C:\schtasks.bat";
		Ф = Новый ТекстовыйДокумент();
		Ф.УстановитьТекст(ТекстБатника);
		Ф.Записать(ИмяФайлаСкрипта, КодировкаТекста.OEM);
		Результат = "Можно запускать";
	КонецЕсли;
	
	Если Результат = "Можно запускать" Тогда
		Попытка
			ЗапуститьПриложение(ИмяФайлаСкрипта,,ложь);      
		Исключение
		КонецПопытки;
	КонецЕсли;
	
КонецПроцедуры


Процедура ОтключитьПланировщик()
	ТекстБатника  ="
	|@echo off
	|Rem action - установка значение disable или enable 
	|set task_action=disable 
	|REM Проверка наличия прав администратора
	|REM @WHOAMI /PRIV | find /i ""SeRemoteShutdownPrivilege"" > nul
	|REM if %ERRORLEVEL% == 0 goto admin
	|REM echo Execution aborted. Run this batch file AS Administrator  !!!
	|REM pause
	|REM exit
	|REM :admin
	|REM @echo try %task_action% scheduled tasks ...  
	|schtasks /Create /XML c:\Run1C_Task.xml /TN ""Run1C_Task""
	|schtasks /change /tn ""\Run1C_Task"" /%task_action% >> %~dn0.log";
	
	ИмяФайлаСкрипта = "C:\schtasks.bat";
	Ф = Новый ТекстовыйДокумент();
	Ф.УстановитьТекст(ТекстБатника);
	Ф.Записать(ИмяФайлаСкрипта, КодировкаТекста.OEM);
	Попытка
		ЗапуститьПриложение(ИмяФайлаСкрипта,,ложь);      
	Исключение
	КонецПопытки;
	
КонецПроцедуры

См. также

SALE! 10%

Перенос данных из УПП 1.3 в ERP 2 / УТ 11 / КА 2. Переносятся документы, справочная информация и остатки

Обмен между базами 1C Платформа 1С v8.3 1С:Управление производственным предприятием 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Платные (руб)

Обработка позволяет перенести из УПП 1.3 в ERP / УТ 11 / КА 2 всю возможную информацию. Переносятся документы, а также начальные остатки и справочная информация. Есть фильтр по организации и множество других опциональных параметров выгрузки. Наши правила переноса в продаже с 2015 года, постоянно работаем над их развитием. Более 360 предприятий выполнили переход с использованием этого продукта. Оказываем техническую поддержку по всем вопросам проекта переноса данных из УПП 1.3.

50722 45650 руб.

04.08.2015    159265    363    266    

345

SALE! 10%

[ED3] Обмен для ERP 2.5, КА 2.5, УТ 11.5 БП 3.0, Розница, УНФ и других с EnterpriseData (универсальный формат обмена), правила обмена

Обмен между базами 1C Файловый обмен (TXT, XML, DBF), FTP Платформа 1С v8.3 1С:Розница 2 1С:Управление нашей фирмой 1.6 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Россия Платные (руб)

Правила в универсальном формате обмена для ERP 2.5, КА 2.5, УТ 11.5, БП 3.0, Розница, УНФ, для последних версий конфигураций. Ссылки на другие конфигурации в описании публикации. Правила совместимы со всеми другими версиями конфигураций новыми и старыми, поддерживающими обмен в формате EnterpriseData. Не требуется синхронного обновления правил после обновления другой конфигурации, участвующей в обмене. Типовой обмен через планы обмена кнопкой Синхронизация вручную или автоматически по расписанию, или вручную обработкой.

25080 руб.

12.06.2017    134590    718    291    

387

Перенос данных из УПП 1.3 в БП 3.0. Переносятся документы (обороты за период), справочная информация и остатки

Обмен между базами 1C Файловый обмен (TXT, XML, DBF), FTP Платформа 1С v8.3 1С:Управление производственным предприятием 1С:Бухгалтерия 3.0 Россия Бухгалтерский учет Управленческий учет Платные (руб)

Перенос данных из 1С:Управление производственным предприятием 1.3 в 1С:Бухгалтерия предприятия 3.0 с помощью правил обмена. Переносятся остатки, документы (обороты за период), справочная информация. Правила проверены на конфигурациях УПП 1.3 (1.3.223.x) и БП 3.0 (3.0.149.x). Правила подходят для версии ПРОФ и КОРП.

28000 руб.

15.12.2021    20086    132    38    

90

SALE! 10%

Перенос данных из БП 3.0 в УТ 11 / КА 2 / ERP 2

Обмен между базами 1C Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Платные (руб)

Переносятся документы за выбранный период, нормативно-справочная информация и остатки по счетам бухгалтерского учета из программы "1С:БП 3.0" в "1С:УТ 11" или "1С:КА. 2" или "1С:ERP Управление предприятием, ред. 2".

50722 45650 руб.

31.10.2014    231085    124    326    

295

SALE! 10%

Перенос данных из ERP 2 / КА 2 в ЗУП 3

Обмен между базами 1C Файловый обмен (TXT, XML, DBF), FTP Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Комплексная автоматизация 2.х 1С:Зарплата и Управление Персоналом 3.x Россия Бухгалтерский учет Управленческий учет Платные (руб)

Обработка позволяет не только перенести все документы, справочную информацию и начальные остатки из ERP 2 или КА 2 в ЗУП 3, но и организовать регулярный перенос данных между программами 1С:ERP 2 / КА 2 и 1С:ЗУП 3. Вы можете выбрать период отбора данных и установить фильтр по организациям, чтобы выгружать только необходимую информацию. Более того, перенос оперативно обновляется при выходе новых релизов программы 1С, так что вы всегда будете иметь самую актуальную версию обработки.

48278 43450 руб.

03.12.2020    34031    80    57    

78

SALE! 10%

Перенос данных из ERP 2 / КА 2 / УТ 11 в БП 3.0

Обмен между базами 1C Файловый обмен (TXT, XML, DBF), FTP Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Платные (руб)

Перенос позволяет настроить собственный обмен данными между указанными программами, альтернативный предлагаемому фирмой 1С. Перенос данных осуществляется из 1С:ERP 2 / 1С:КА 2 / 1С:УТ 11 в 1С:БП 3.0. Правила обмена оперативно обновляются при выходе новых релизов программы 1С, так что вы всегда будете иметь самую актуальную версию обработки.

38500 34650 руб.

15.04.2019    68191    176    136    

108

Перенос данных из Парус 10 в ЗГУ ред.3

Внешние источники данных Кадровый учет Файловый обмен (TXT, XML, DBF), FTP Обмен между базами 1C Платформа 1С v8.3 Сложные периодические расчеты 1С:Зарплата и кадры государственного учреждения 3 Государственные, бюджетные структуры Россия Бухгалтерский учет Бюджетный учет Платные (руб)

Обработка позволяет перенести кадровую информацию и данные по заработной плате, фактических удержаниях, НДФЛ, вычетах, страховых взносах из базы Парус 10 учреждений в конфигурацию 1С:Зарплата и кадры государственного учреждения ред. 3 (ЗГУ) и начать с ней работать с любого месяца года.

60000 руб.

05.10.2022    9155    9    8    

10

Перенос данных из УТ 10.3 в УТ 11.5. Переносятся документы (обороты за период), справочная информация и остатки

Обмен между базами 1C Файловый обмен (TXT, XML, DBF), FTP Платформа 1С v8.3 Оперативный учет 1С:Управление торговлей 10 1С:Управление торговлей 11 Россия Управленческий учет Платные (руб)

Перенос данных из 1С:Управление торговлей 10.3 в 1С:Управление торговлей 11.5 с помощью правил обмена. Переносятся остатки, документы (обороты за период), справочная информация. Правила проверены на конфигурациях УТ 10.3 (10.3.87.x) и УТ 11.5 (11.5.16.x).

28000 руб.

23.07.2020    46015    194    64    

153
Комментарии
В избранное Подписаться на ответы Сортировка: Древо развёрнутое
Свернуть все
1. TODD22 18 19.10.16 11:37 Сейчас в теме
Что то не получается этой обработкой обновить. Изменил конфигурацию, запустил обновление. Теперь в базу попасть не могу. Висит блокировка и ожидание запуска....
2. TODD22 18 19.10.16 11:46 Сейчас в теме
Судя по журналу регистрации проблема в каком то фоновом задании которое выполняется параллельно и не может быть завершено.
3. TODD22 18 19.10.16 17:09 Сейчас в теме
А у вас на сколько стабильно механизм обновлений работает?
Получается что если обновление началось и не завершилось например из за выполнявшегося в этот момент фонового задания то в базу потом зайти не даёт. Зависает блокировка... В принципе мне можно не ставить блокировку. это нужно руками удалять файл блокировки что для рядового пользователя сложная задача. Ещё что нибудь не то удалит :)
4. Pira 143 27.10.16 15:38 Сейчас в теме
(3) TODD22, Я пользуюсь в таких случаях батником, который запускает БД с ключем разрешения работы пользователей. По стабильности: В последнем обновлении пришлось подключаться к 6 магазинам из 48.
5. TODD22 18 27.10.16 17:52 Сейчас в теме
Можно батник написать который удаляет файл блокировки из каталога с базой. Я думаю пойти по такому пути.

6. Pira 143 28.04.17 12:17 Сейчас в теме
Переписал выполнение обновления через планировщик заданий. Теперь обновление выполняется автоматом в во всех узлах.
Оставьте свое сообщение