вася-стоит реквизит неиспользовать
вася-стоит реквизит неиспользовать
петя
КолвоКлиентов-2, а нужно 1
или
вася-стоит реквизит неиспользовать
вася-стоит реквизит неиспользовать
петя
юра-стоит реквизит неиспользовать
юра-стоит реквизит неиспользовать
КолвоКлиентов-2, а нужно 1
Процедура РасчитатьКолвоКлиентов()
Тз = СоздатьОбъект("ТаблицаЗначений");
ВыгрузитьТабличнуюЧасть(ТЗ,"Клиент");
Тз.ВыбратьСтроки();
Пока Тз.ПолучитьСтроку()=1 Цикл
Если Тз.Клиент.Неиспользуется = 1 Тогда
Тз.УдалитьСтроку(Тз.НомерСтроки);
Если Тз.НомерСтроки > Тз.Количествострок() Тогда
Тз.СдвинутьСтроку(-1);
КонецЕсли;
КонецЕсли;
КонецЦикла;
ТЗ.Свернуть("Клиент","");
КолвоКлиент = Тз.КоличествоСтрок();
КонецПроцедуры // РасчитатьКолвоКлиентов