как правильно написать цикл?

Народ кто может подсказать как правильно цикл написать?
необходимо что бы выполнялось условие
Если  таб1Контрагент =таб2Контрагент и таб1Контрагент=таб4Контрагент

Для каждого СтрТабЧасти из ТЧ Цикл
         таб1Контрагент=СтрТабЧасти.Контрагент;
         таб1СуммаСУСН=СтрТабЧасти.СуммаСусн;
         //Сообщить(таб1Контрагент);
       КонецЦикла;
         Для каждого СтрТабЧасти из ТЧ2 Цикл
         таб2Контрагент=СтрТабЧасти.Контрагент;
         таб2СуммаСУСН=СтрТабЧасти.СуммаСусн;
         //Сообщить(таб2Контрагент);
       КонецЦикла;
           Для каждого СтрТабЧасти из ТЧ4 Цикл
         таб4Контрагент=СтрТабЧасти.Контрагент;
         таб4СуммаСУСН=СтрТабЧасти.СуммаСусн;
         //Сообщить(таб4Контрагент);
      КонецЦикла;
      Для каждого СтрТабЧасти из ТЧ Цикл
      Если   таб1Контрагент =таб2Контрагент и таб1Контрагент=таб4Контрагент
         Тогда

            //Если  таб1Контрагент =таб2Контрагент и таб1Контрагент=таб4Контрагент
         //сравниваем контрагентов для записи в счет если 3  все равны  в счете 3 записи
         //************======если не будет моб продумать!!!
         Сообщить(таб1Контрагент);
          //**Создаем счет
          НовСчет =  Документы.СчетНаОплатуПокупателю.СоздатьДокумент();
         НовСчет.Организация=Справочники.Организации.НайтиПоКоду("000000002");
          НовСчет.Контрагент = таб1Контрагент;