Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 20.02.2013, 23:00   #1
edmynt
Пользователь
 
Аватар для edmynt
 
Регистрация: 03.06.2009
Сообщений: 83
По умолчанию 1с 77 Пересчет запроса

Проверьте плж код, он работает не верно...общее количество строк считает нормально, а вот остальные счетчики по условию не считает

Запрос.тип в форме является оператором выбора из перечисления

Код:
Пока Запрос.Группировка(1) = 1 Цикл
		// Заполнение полей ном
		Таб.ВывестиСекцию("Строки");
		СтрВ=СтрВ+1;               //колличество строк
		Если (Запрос.тип="Значение1") Тогда
		    СтрП=СтрП+1;              //количесто со Значение1
		КонецЕсли;
		Если Запрос.тип="Значение2" Тогда
		    СтрГ=СтрГ+1;               //количесто со Значение3
		КонецЕсли;      
		Если Запрос.тип="Значение3" Тогда
		    СтрН=СтрН+1;                //количесто со Значение3
		КонецЕсли;
	КонецЦикла;
edmynt вне форума Ответить с цитированием
Старый 20.02.2013, 23:53   #2
edmynt
Пользователь
 
Аватар для edmynt
 
Регистрация: 03.06.2009
Сообщений: 83
По умолчанию

Решение нашел сам, вот код мож кому пригодится

Код:
Пока Запрос.Группировка(1) = 1 Цикл
		// Заполнение полей ном
		Таб.ВывестиСекцию("Строки");
		СтрВ=СтрВ+1;
		Если СокрЛП(Запрос.тип)="Значение1" Тогда
		    СтрП=СтрП+1;
		КонецЕсли;
		Если СокрЛП(Запрос.тип)="Значение2"  Тогда
		    СтрГ=СтрГ+1;
		КонецЕсли;      
		Если СокрЛП(Запрос.тип)="Значение3"  Тогда
		    СтрН=СтрН+1;
		КонецЕсли;
	КонецЦикла;
edmynt вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Пересчет с разбиением Avel85 Microsoft Office Excel 7 02.09.2011 13:44
Пересчет массива sweyle Microsoft Office Excel 2 24.03.2011 11:46
С++ Пересчет фунтов. Усложненная! Fier Помощь студентам 2 12.02.2011 23:11
Пересчет формул Uralmaster Microsoft Office Excel 4 03.02.2011 13:00
Пересчет даты atenon Microsoft Office Access 3 10.12.2010 19:17