Имя: Пароль:
1C
1С v8
Выгрузка/загрузка исправление
0 ntr
 
08.06.12
10:17
Здравствуйте!
Есть стандартная ВыгрузкаЗагрузкаДанныхXML.epf , необходимо чтобы выгруженные документы загружались в такую же конфигурацию но на определённую дату. Вопрос: как сделать чтобы номер присваивался в соответствии с нумератором и соблюсти ссылки подчинённости документов?
код загрузки:

Пока ВозможностьЧтенияXML(ЧтениеXML) Цикл

   ЗаписанноеЗначение = ПрочитатьXML(ЧтениеXML);        
       Если ПриЗагрузкеИспользоватьРежимОбменаДанными Тогда
           
           Попытка // Планы обмена свойства ОбменДанными не имеют
               ЗаписанноеЗначение.ОбменДанными.Загрузка = Истина;
           Исключение
           КонецПопытки;
           
       КонецЕсли;
       
       Попытка
           ЗаписанноеЗначение.Записать();
       Исключение
           
           ТекстОшибки = ОписаниеОшибки();
           
           Если НЕ ПродолжитьЗагрузкуВСлучаеВозникновенияОшибки Тогда
               
               #Если Клиент Тогда
                   Если Вопрос("При записи произошла ошибка:" + Символы.ПС + ТекстОшибки + "
                       |Продолжит загрузку?", РежимДиалогаВопрос.ДаНет) = КодВозвратаДиалога.Нет Тогда
                       ВызватьИсключение;
                   КонецЕсли;
               #Иначе
                   ВызватьИсключение;
               #КонецЕсли
               
           Иначе
               
               Попытка
                   Сообщить("Ошибка при загрузке данных. Объект: " + ЗаписанноеЗначение + ", Тип: " + ТипЗнч(ЗаписанноеЗначение) + "
                       |Ошибка : " + ТекстОшибки, СтатусСообщения.Важное);
               Исключение
                   Сообщить("Ошибка при загрузке данных.
                       |Ошибка : " + ТекстОшибки, СтатусСообщения.Важное);
               КонецПопытки;    
               
           КонецЕсли;
           
           Загружено = Загружено - 1;
           
       КонецПопытки;    
       
       Загружено = Загружено + 1;
       
       #Если Клиент Тогда
       Если Загружено % 100 = 0 Тогда
           Состояние("Загружено объектов - " + Загружено);
           ОбработкаПрерыванияПользователя();
       КонецЕсли;
       #КонецЕсли
   
   КонецЦикла;
1 Алексей777
 
08.06.12
10:25
функцией установкой нового номера
2 ntr
 
08.06.12
10:32
информация о подчинённости будет потеряна в этом случае?
3 ntr
 
08.06.12
11:04
(1) как установить новый номер если нет объекта документ?
4 ntr
 
08.06.12
11:18
это вообще реально?
5 abitfrosty
 
08.06.12
11:20
ЗаписанноеЗначение.Записать(); - тут же документ записывается, почему его нет?