0
matri555
14.08.13
✎
23:20
|
Есть многоуровневый цикл
Подскажите как проверить при обходе ТЗ в какое условие цикла я попадаю.
Объясню есть несколько циклов
типа Если условие тогда рез1
Если другое условие тогда рез2
и т.д.
по каждому сотруднику есть несколько строк
все выполняется за исключением 2 строки по сотруднику при разных графиках работы
ТЗ1.Колонки.Добавить("инд");
строка1 = ТЗ1[0];
гр=строка1[3];
сорт=строка1[6];
сотр=строка1[0];
строка1[7]=1;
Для сч = 1 По ТЗ1.Количество()-1 Цикл
стрТЗ= ТЗ1[сч];
Если стрТЗ.Сотрудник=сотр Тогда
//Если СтрТЗ.ГрафикРаботы Не NULL ТОГДА
Если стрТЗ.Сорт=сорт Тогда
Если СтрТЗ.Сорт =1 И СтрТЗ.ГрафРаботы = гр Тогда
СтрТЗ.инд=инд;
КонецЕсли;
Если СтрТЗ.Сорт =1 И гр<>стрТЗ.ГрафРаботы Тогда
инд = инд + 1;
СтрТЗ.Инд=инд;
гр=стрТЗ.ГрафРаботы;
сообщить(гр);
КонецЕсли;
Если СтрТЗ.Сорт=сорт И СтрТЗ.Сорт =2 Тогда
инд=инд+1;
СтрТЗ.Инд=инд;
КонецЕсли;
КонецЕсли;
Если СтрТЗ.Сорт<>сорт Тогда
инд=1;
СтрТЗ.Инд=инд;
сорт = СтрТЗ.сорт;
КонецЕсли;
КонецЕсли;
Если стрТЗ.Сотрудник <> сотр Тогда
сотр = стрТЗ.Сотрудник;
инд=1;
гр=стрТЗ.ГрафРаботы;
СтрТЗ.Инд=инд;
КонецЕсли;
Сообщить(СтрТЗ.Инд);
КонецЦикла;
|
|