Востановление Распределенки
19.09.2005
12:52
#1
Такая ситуация.
Была распределеная база 1с, назавем ее "Центр" в которую выгружались все данные с филиалов. Эту базу украли, т.е. украли сервак на которой находилась база и архивные копии, (понимаю глупо хранить копии на том же компе, хотел переписать но все руки не доходили. с кем не бывает, да и не думал, что украдут).
Но осталась база "Центр" за 2004 год.
Возможно ли загрузить все данные с филиалов в эту базу (Центр за 2004 год), чтоб востановить 2005г. Проблема в том, что конфигурация базы поменялась с 2004, и в филиалах уже стоит другая конфигурация, а так же "Выгрузка" выгружает только те данные которые еще не выгружались, так что с помощью обычных выгрузок в центральную базу 2004 года невозможно загрузить филиалы.
Может, ктони-нибудь с этим сталкивался, есть обработки, или хотя бы советы?
Была распределеная база 1с, назавем ее "Центр" в которую выгружались все данные с филиалов. Эту базу украли, т.е. украли сервак на которой находилась база и архивные копии, (понимаю глупо хранить копии на том же компе, хотел переписать но все руки не доходили. с кем не бывает, да и не думал, что украдут).
Но осталась база "Центр" за 2004 год.
Возможно ли загрузить все данные с филиалов в эту базу (Центр за 2004 год), чтоб востановить 2005г. Проблема в том, что конфигурация базы поменялась с 2004, и в филиалах уже стоит другая конфигурация, а так же "Выгрузка" выгружает только те данные которые еще не выгружались, так что с помощью обычных выгрузок в центральную базу 2004 года невозможно загрузить филиалы.
Может, ктони-нибудь с этим сталкивался, есть обработки, или хотя бы советы?
19.09.2005
13:23
#2
"Совет:
1. Обновить конфигурацию в центре периферийным md-шником.
2. Обменяться.
3. Написать обработку, которая для документов и справочников выполнит что-нибудь типа
Объект = Док.ТекущийДокумент();
КдСозд = ИБСозданияОбъекта(Объект);
Если КдСозд = ТекущаяИБКод() Тогда
Если Док.ДатаДок>Дата(2004,12,31) Тогда
Док.Записать();
КонецЕсли;
КонецЕсли;
Объект = Спр.ТекущийЭлемент();
КдСозд = ИБСозданияОбъекта(Объект);
Если КдСозд = ТекущаяИБКод() Тогда
Спр.Записать();
КонецЕсли;
и запустить в периферийной базе.
4. Обменяться."
1. Обновить конфигурацию в центре периферийным md-шником.
2. Обменяться.
3. Написать обработку, которая для документов и справочников выполнит что-нибудь типа
Объект = Док.ТекущийДокумент();
КдСозд = ИБСозданияОбъекта(Объект);
Если КдСозд = ТекущаяИБКод() Тогда
Если Док.ДатаДок>Дата(2004,12,31) Тогда
Док.Записать();
КонецЕсли;
КонецЕсли;
Объект = Спр.ТекущийЭлемент();
КдСозд = ИБСозданияОбъекта(Объект);
Если КдСозд = ТекущаяИБКод() Тогда
Спр.Записать();
КонецЕсли;
и запустить в периферийной базе.
4. Обменяться."
Читают тему
(гостей: 1)