Равны = Истина;
           Для каждого Реквизит из Док.ДокументОбъект.Метаданные().Реквизиты Цикл
               Выполнить ("Равны = Равны и Док.ДокументОбъект." + Реквизит.Имя + " = Док.РанееЗагруженныйДокументСсылка." + Реквизит.Имя + "");
           КонецЦикла;

про квадратные скобки слышал чо-нибудь?

(0) квадратные скобки тебя спасут

та да

ДокументОбъект[ИмяРеквизита]=Значение

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

Может, ТЧ должна быть или вообще не документ, а другая сущность

Если я правильно телепатирую...


Если Док.ДокументОбъект[Реквизит.Имя ] = Док.РанееЗагруженныйДокументСсылка[Реквизит.Имя ] Тогда
   Равны=Истина;
Иначе
   Раны=Ложь;
КонецЕсли;

Раны=Ложь;
=
Равны=Ложь;

а так я бы написал без мозговывертов с "равно":

Равны=Истина;
Для каждого Реквизит из ....
 Если Объект1[Реквизит.Имя]<>Объект2[Реквизит.Имя] тогда
   Равны=Ложь;Прервать;

(5) отменяется, неверно понял смысл сначала

(7) И прервать, если Ложь

Равны = Равны

оХГДЕЖ !!!

(12) Ну это таки будет работать, всё правильно ж ) Правда через гланды, конечно.

(0) А чем тебе не нравится Выполнить() ?

(12) Хахахаха
Всем спасибо, сделал так:
           Равны = Истина;
           Для каждого Реквизит из Док.ДокументОбъект.Метаданные().Реквизиты Цикл
               Равны = Равны и Док.ДокументОбъект[Реквизит.Имя] = Док.РанееЗагруженныйДокументСсылка[Реквизит.Имя];
           КонецЦикла;


(15) Зачем ты бежишь по всем оставшимся реквизитам, если у тебя уже в 1м найдется разница? Или тут код не полный?

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

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

(11)Ну да

(15)Извращенец:-)

(15) После первого различия дальнейший цикл бессмыслен

(17) Какая разница, сколько реквизитов?

Если сильно хочется поизвращаться то хоть делай это рационально.

Равны = Док.ДокументОбъект[Реквизит.Имя] = Док.РанееЗагруженныйДокументСсылка[Реквизит.Имя];

вполне достаточно

Равны = Истина;
           Для каждого Реквизит из Док.ДокументОбъект.Метаданные().Реквизиты Цикл
               Если Не Равны Тогда
                 Прервать;
               КонецЕсли;
               Равны = (Док.ДокументОбъект[Реквизит.Имя] = Док.РанееЗагруженныйДокументСсылка[Реквизит.Имя]);
           КонецЦикла;

(21) Разница большая. Если много реквизитов, то есть смысл оптимизировать скорость.

(23) -> (9)

(24)Если хоть один не совпал объекты уже неравны хоть там что дальше

(23) почему прерывание до проверки? )

(24) Какая разница, много реквизитов или мало?

(22) так будет работать только совместно с Прервать

(27) какая разница?

(29)Так и надо Прервать. Тебе уже всем форумом кричат, что дальше смотреть нет смысла

(30) В лишнем прогоне цикла

(32) ну поставь в постусловие, оптимизатор))

(28) -> (24)

Сделал с прервать....

           Для каждого Реквизит из Док.ДокументОбъект.Метаданные().Реквизиты Цикл
               Если Не Док.ДокументОбъект[Реквизит.Имя] = Док.РанееЗагруженныйДокументСсылка[Реквизит.Имя] тогда
                   .....
                   Прервать;
               КонецЕсли;
           КонецЦикла;

А ваще, лучше всего писать как в (7), ибо что (15), что (22) - это всё сложночитаемый код.

(35) а (9) ? :)

в (7) как минимум лишнее присваивание переменной в цикле

(35) В (7) операция лишние разы выполняется    Равны=Истина;

(23)
Для каждого Реквизит из Док.ДокументОбъект.Метаданные().Реквизиты Цикл
   Равны = (Док.ДокументОбъект[Реквизит.Имя] = Док.РанееЗагруженныйДокументСсылка[Реквизит.Имя]);
   Если Не Равны Тогда
       Прервать;
   КонецЕсли;
КонецЦикла;

(36) (9) по удобочитаемости такое же, как и (7). А так да, нафиг оно определение Равны не надо.

(39) Тут тоже лишние раз выполняется Равны =

в (39) тоже до дыр пытаются затереть бедную переменную

Равны = Истина;
НеРавны = Ложь;
Для каждого Реквизит из Док.ДокументОбъект.Метаданные().Реквизиты Цикл
   Равны = (Док.ДокументОбъект[Реквизит.Имя] = Док.РанееЗагруженныйДокументСсылка[Реквизит.Имя]);
   НеРавны = (Док.ДокументОбъект[Реквизит.Имя] <> Док.РанееЗагруженныйДокументСсылка[Реквизит.Имя]);
   Если НЕ Равны И НЕРавны Тогда
       Равны = Ложь;
       НеРавны = Истина;
       Прервать;
   КонецЕсли;
КонецЦикла;

Равны = Истина;
НеРавны = Ложь;
Для каждого Реквизит из Док.ДокументОбъект.Метаданные().Реквизиты Цикл
   Равны = (Док.ДокументОбъект[Реквизит.Имя] = Док.РанееЗагруженныйДокументСсылка[Реквизит.Имя]);
   Если НЕ Равны Тогда
       Прервать;
   КонецЕсли;
КонецЦикла;

*НеРавны = Ложь;  - тоже убрать

ппц.
вы что курите?

(46)Готовь сани летом, а к пятнице готовься со среды :-)

(46)
Если Равны = НеРавны Тогда
  Вопрос("вы что курите?");
...

равны равны неравны

Равно=Равно<>Неравно
:-)

(48)
Если НЕ Равны <> НеРавны Тогда
 Вопрос("вы что курите?");
...

Для каждого Реквизит из Док.ДокументОбъект.Метаданные().Реквизиты Цикл
   Если Док.ДокументОбъект[Реквизит.Имя] <> Док.РанееЗагруженныйДокументСсылка[Реквизит.Имя] Тогда
       Прервать;
   КонецЕсли;
КонецЦикла;

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

блин. Равны забыл :))

(54) И НеРавны тоже

в номинации "бессымсленная беспощада" победил (52)

Если НЕ (Равны <> НеРавны)<>(Равны = НеРавны) Тогда
 Вопрос("вы что курите?");

(53) Да кому он нужен, этот мифический Программист

(56) +1

(59) да блин. с этим равны неравны :)

Равны = Истина;
Для каждого Реквизит из Док.ДокументОбъект.Метаданные().Реквизиты Цикл
   Если Док.ДокументОбъект[Реквизит.Имя] <> Док.РанееЗагруженныйДокументСсылка[Реквизит.Имя] Тогда
       Равны = Ложь;
       Прервать;
   КонецЕсли;
КонецЦикла;

Всем спасибо! В следующий раз я еще что-нибудь спрошу )

(61) Так и сделал.

(62) давай, а то до пятницы не дотянем

(41) По крайней мере после цикла остается переменная "Равно". А вот то что в (52) точно бессмысленно. Ну прошелся я по реквизитам, если равны все, просто по всем пролетел. Если не равны, ну не по всем пролетел - результат то где?