|
как правильно написать цикл? |
☑ |
0
JedaiMaster
10.08.13
✎
17:34
|
Народ кто может подсказать как правильно цикл написать?
необходимо что бы выполнялось условие
Если таб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Контрагент;
|
|
1
Любопытная
10.08.13
✎
17:51
|
А изначальная задача какая?
|
|
2
sttt
10.08.13
✎
20:04
|
написать запрос ;0)
|
|
3
holostyak
12.08.13
✎
04:16
|
Запросом лучше
|
|
4
razlagator
12.08.13
✎
04:44
|
(0) о боже, что это...
|
|
5
Vovan_Magadan
12.08.13
✎
04:52
|
Для каждого СтрТабЧасти из ТЧ Цикл
таб1Контрагент=СтрТабЧасти.Контрагент;
таб1СуммаСУСН=СтрТабЧасти.СуммаСусн;
//Сообщить(таб1Контрагент);
КонецЦикла;
в чем логика? Там будет тупо последний контрагент из ТЧ
|
|