Пишу перенос в 8ку. Ессно приходится по 48 раз елозить взад-вперед.
Хотелось бы уже загруженные документы и НЕ измененные в текущей загрузке не записывать и не проводить.
Вижу тока перебором по метаданным.
Но есть ли более красивый код.

Тип есть же звездочка в Зарпросе:
Выбрать * из Документ....

а можно ли сравнить звездочки запросом не перебирая все реквизиты + все табличные части?

а можно повторить вопрос?

Есть переменная ДокОбъект с заполненными программно реквизитами и пока не записанная.
Как быстро и красиво проверить ДокОбъект и Объект в БД, и если ничо не изменилось, то и не записывать ваще.

а может взять и записать? в режиме ОбменДанными.Загрузка

и куда ты собрался прикладывать звёздочку к незаписанному объекту?

(3) фу. потом больше трахаца, лучше сразу при загрузке по уму.
да и не в этом вопрос. как красиво сравнить

про звездочку. может можно както незаписаный объект присунуть в виртуальную таблицу и тогда структуры сущности будут одинаковые и проверять * = *. не?

вопрос скорей не по скорости, а по красивому изврату.

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

значениевстрокувнутр

ещё можно не выгружать лишнее

Самое красивое - использовать Планы обмена. Не измененные объекты не попадут в выборку и их не надо будет ни с чем сравнивать.

(8) чото в этом есть. это же на уровне платформы будет проверятся

(6) попробую щас

(9) регистрироваться

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

чего там у тебя проверяется?

(13) ну платформа проверяет надо включать записанный объект в план обмена. не так?

не так

она тупо регистрирует факт записи объекта

в версионировании посмотри
там перед созданием версии - объекты сериализуются и сравниваются

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

Так функцию напиши - будет в одну строчку всё.

Все уже сделано до вас. Флаг "Записывать только измененные объекты" в обработке "Универсальный обмен данными" на закладке "Загрузка"

Если ничего не изменилось, то тогда какая разница, записывать объект, или нет? Результат будет одинаковый.

(20) на запись уходит время
(19) посмотрю как сранивают
пока (17) проверяю. там можно в двоичные данные конвертнуть объекты в БД и в переменной

нашел в (19) строчку
"Если Не НужноЗаписатьОбъект Тогда
                            
                            НужноЗаписатьОбъект = (Объект[Имя] <> Значение);
                            
                        КонецЕсли;
"

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

НужноЗаписатьОбъект = (Объект[Имя] <> Значение);
Строка 7023 в (19) из БП30

Посказка. Ограничь кол-во выгружаемых объектов. На этих данных отладь перенос. После этого перенеси один раз все объекты в рабочую базу, а не "елозь туда-сюда".

в (23) фу. там пореквизитно

(24) да на каждой порции чонить да новое вылазит постоянно. надо за 15 лет перенести из самописек 77 в 83

изобретаешь свою КД?

просто ОЛЕ

вроде работает

ЗаписьXML = Новый ЗаписьFastInfoset;
    ЗаписьXML.УстановитьДвоичныеДанные();
    ЗаписьXML.ЗаписатьОбъявлениеXML();
    
    ДокБД =  Документы[Вид].НайтиПоНомеру(оНомер,оДата).ПолучитьОбъект();
    ЗаписатьXML(ЗаписьXML, Док, НазначениеТипаXML.Явное);
    
    ДанныеДвоичныеТут = ЗаписьXML.Закрыть();
    
    ЗаписьXML = Новый ЗаписьFastInfoset;
    ЗаписьXML.УстановитьДвоичныеДанные();
    ЗаписьXML.ЗаписатьОбъявлениеXML();
    
    ЗаписатьXML(ЗаписьXML, ДокБД, НазначениеТипаXML.Явное);
    
    ДанныеДвоичныеБД = ЗаписьXML.Закрыть();

    Изменен = ДанныеДвоичныеТут = ДанныеДвоичныеБД;

там сверяются бесконечные строки вида "E0 00 00 01 00 78 CF 02 78 73 69 28 68 74 74 70 3A 2F 2F 77 77 77 2E 77 33 2E 6F 72 67 2F 32 30 30 31 2F 58 4D 4C 53 63 68 65 6D 61 2D 69 6E 73 ...."

посмотрю теперь скоко занимает времени такая сериализация. не быстрей ли просто записывать всегда

(0) Прием заключается в том, что каждому документу при записи вычисляется по значимым реквизитам и приписывается хэш код.

вообщем сказка. Спасибо (17).
Оттуда дернул три строки.

Красота же:

Изменен = НЕ (ДанныеДвоичныеТут = ДанныеДвоичныеБД);

проверил. работает в обе стороны - при изменении документа юзером в базе и при программном дописывании реквизитов.

красота. именно я так подумал, когда проникся КД

КД и СКД - это следующие по значимости изобретения после огня и колеса

(34) может. чото я 48 раз садился за изучение КД.. но пива не хватило

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

ты не постиг дао конвертации. объекты переносятся сами. превращаются в то, что я им повелю. и мне плевать, сколько там процедур, правил и т.п....

(0)Нет

(38) можно. одной строчкой. предварительно обе сущности перевести в двоичные данные

(0) При записи во время загрузки можно записывать куда-нибудь значение хитрожопого реквизита ВерсияДанных. Потом при повторной загрузке те, у которых это реквизит совпадает с записанным при обмене, не трогать.

Если СравнитьВсеРеквизиты(Док1,Док2) Тогда printfn "%s" "все реквизиты равны"

(40) хорошая идея на предмет проверки повторной записи, а то иногда документы основания проводят подчиненные и программная запись матерится.
но в (0) вопрос как переменную сравнить до первой записи.

щас уперся что в табличные части загружаю, очисткой ТЧ и повторной добавкой.
а так по (33) двоичные данные оказываются разные.

буду переписывать сравнением тч перед заполнением

(0) сравнить звездочки запросом? Легко!
Ну, не понимаете? Конечно по количеству! Звездочек. Ну, а если равное - это уже сложнее. В следующий раз расскажу. Всем спокойно ночи!

Э мне кажется изначальное ТЗ не прописано до конца.
Суть "не переносить" измененные документы? Или наоборот сделать даже если изменили в новой или просто отличается в источнике, то перезаписать из источника?

Почему простейшим образом по периоду не делать?

(44) суть: есть переменная ДокОбъект с заполненными данными, и есть Объект в базе. надо сравнить без записи первого

(0)Сравнивай данные объекта и ссылки. Пример тут:
http://catalog.mista.ru/public/118839/

(46) нету абонемента.
ну коли там сравнение по-реквизитно, значит перебором по метаданным?

меня устроило сравнение объектов целиком в одну строку

Изменен = НЕ (ДанныеДвоичныеТут = ДанныеДвоичныеБД);

у вас будет короче?

(47)Хоть какое свертывание объекта будет отличаться от такого же свертывения ссылки даже если ничего не изменено.Просто потому что это разные типы.
Так что только по метаданным и реквизитам

(48) сорри, не понимаю "свертывения ссылки"

(49)Ну типа
ЗначениеВСтрокуВнутр()
Или
ЗначениеВФайл()
Иили как у тебя в двоичные данные.

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

(51)Чет мне кажется не прекрасно. Просто ты не проверял на критичных значениях когда они конкретно различаются.

(51)Ссылка и объект очень похожи.пока Объект не изменили

(51)И насчет "прекрасно сравниваются" - код бы в студию

&НаСервере
Функция СравнитьОбъекты(Объект1,Объект2)

    ЗаписьXML = Новый ЗаписьFastInfoset;
    ЗаписьXML.УстановитьДвоичныеДанные();
    ЗаписьXML.ЗаписатьОбъявлениеXML();
    
    ЗаписатьXML(ЗаписьXML, Объект1, НазначениеТипаXML.Явное);     
    ДанныеДвоичные1 = ЗаписьXML.Закрыть();
    
    ЗаписьXML = Новый ЗаписьFastInfoset;
    ЗаписьXML.УстановитьДвоичныеДанные();
    ЗаписьXML.ЗаписатьОбъявлениеXML();
    
    ЗаписатьXML(ЗаписьXML, Объект1, НазначениеТипаXML.Явное);
    ДанныеДвоичные2 = ЗаписьXML.Закрыть();

    Возврат (ДанныеДвоичные1 = ДанныеДвоичные2);

КонецФункции // СравнитьОбъекты()

СравнитьОбъекты (ДокОбъект, Дкументы[ДокОбъект.Метаданные().Имя].НайтиПоНомеру(ДокОбъект.Номер,ДокОбъект.Дата))

(56) СравнитьОбъекты (ДокОбъект, Дкументы[ДокОбъект.Метаданные().Имя].НайтиПоНомеру(ДокОбъект.Номер,ДокОбъект.Дата).ПолучитьОбъект())

ссылку не пробовал. попробую

&НаСервере
Функция СравнитьОбъекты(Объект1,Объект2)

    ЗаписьXML = Новый ЗаписьFastInfoset;
    ЗаписьXML.УстановитьДвоичныеДанные();
    ЗаписьXML.ЗаписатьОбъявлениеXML();
    
    ЗаписатьXML(ЗаписьXML, Объект1, НазначениеТипаXML.Явное);    
    ДанныеДвоичные1 = ЗаписьXML.Закрыть();
    
    ЗаписьXML = Новый ЗаписьFastInfoset;
    ЗаписьXML.УстановитьДвоичныеДанные();
    ЗаписьXML.ЗаписатьОбъявлениеXML();
    
    ЗаписатьXML(ЗаписьXML, Объект2, НазначениеТипаXML.Явное);
    ДанныеДвоичные2 = ЗаписьXML.Закрыть();

    Возврат (ДанныеДвоичные1 = ДанныеДвоичные2);

КонецФункции// СравнитьОбъекты()

при переносе только пришлось переписать загрузку в табличные части.
раньше чистил их и добавлял строки.
щас пишу в тз, сравниваю тз и тч ОбщегоНазначения.КоллекцииИдентичны(тзТек,Док.ТЧ) и если равны то не трогаю тч.
Тогда (59) корректно проходит

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

я проверял (59) программным измененим ДокОБъекта и в базе руками в режиме пользователя. вроде всё корректно отрабатывает.
есть какая то доля сомнения, что гдето когдато будет не айс, но пока робит.

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

(59) ты уверен, что это проверка равенства содержимого двоичных данных, а не ссылок на область памяти, где лежат двоичные данные?

(63) уверен. проверял 48 раз. сам чую подвох, но пока не нашол

(64) с таким подходом в любом случае ты бесчеловечески пожертвуешь быстродействием и оперативной памятью.

(61) замерю потом отладчиком на большом объеме. пока стало в разы быстрей, за счет пропуска записи не измененных объектов

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

(67) если разовый, то не парься, не проверяй, просто записывай каждый раз. Твоя запись хмл по-любому раз в 50 будет медленнее, чем простая команда Записать().

(68) быстрей. незнаю что делает
ЗаписатьXML(ЗаписьXML, Объект1, НазначениеТипаXML.Явное);    
ДанныеДвоичные1 = ЗаписьXML.Закрыть();

но в бд она пишет. это методы 1с.
чо они делают не знаю.

ЗаписатьXML (WriteXML)
Вариант синтаксиса: Записать без имени

Синтаксис:

ЗаписатьXML(<ЗаписьXML>, <Значение>, <НазначениеТипа>, <Форма>)
Параметры:

<ЗаписьXML> (обязательный)

Тип: ЗаписьУзловDOM, ЗаписьFastInfoset, ЗаписьXML.
Объект, через который осуществляется запись XML.
<Значение> (обязательный)

Записываемое в поток XML значение. Тип параметра определяется совокупностью типов, для которых определена XML-сериализация.

но в бд она НЕ пишет. и потому быстрей

(67)Если разовый перенос, то сабж не нужен. Смотри (24)

(0)В типовом версионировании данных данные сериализуются и по ним рассчитывается хэш-строка MD5. Эта сумма сохраняется для версии и испольуется для дальнейшего сравнения. Т.о. не нужно каждый раз сравнивать весь объект, а только его хэш-строку, что выполняется быстро. А хэш-строка храниться в базе после расчета.