1С 7.7, ПриУдаленииСтроки()
21.07.2009
12:50
#1
"Нужно пересчитать сумму колонки Норма при удалении строки табличной части документа, в которых МПЗ.ЕдиницаИзмерения.Наименование = "кг" или "л". Почему не пересчитывает?
Процедура ПодсчетИтога()
тИтог=0;
ВыбратьСтроки();
Пока ПолучитьСтроку()=1 Цикл
Если (СокрЛП(МПЗ.ЕдиницаИзмерения.Наименование)="кг") или (СокрЛП(МПЗ.ЕдиницаИзмерения.Наименование)="л") Тогда
тИтог=тИтог+Норма;
КонецЕсли;
КонецЦикла;
Форма.сИтог.Заголовок("Итого: "+Строка(тИтог)+" кг");
КонецПроцедуры
Процедура ПриУдаленииСтроки()
ПодсчетИтога();
Форма.Обновить();
КонецПроцедуры"
Процедура ПодсчетИтога()
тИтог=0;
ВыбратьСтроки();
Пока ПолучитьСтроку()=1 Цикл
Если (СокрЛП(МПЗ.ЕдиницаИзмерения.Наименование)="кг") или (СокрЛП(МПЗ.ЕдиницаИзмерения.Наименование)="л") Тогда
тИтог=тИтог+Норма;
КонецЕсли;
КонецЦикла;
Форма.сИтог.Заголовок("Итого: "+Строка(тИтог)+" кг");
КонецПроцедуры
Процедура ПриУдаленииСтроки()
ПодсчетИтога();
Форма.Обновить();
КонецПроцедуры"
22.07.2009
07:28
#3
"Попробуйте не заголовок вывести, а "Сообщить("Итого: "+Строка(тИтог)+" кг");". Выводит правильное значение или нет? И выводит ли вообще сообщение?"
22.07.2009
10:10
#4
"Процедура ПриУдаленииСтроки() вызывается, когда строка еще не удалена.
Процедура ПриУдаленииСтроки()
тИтог=0;
УдаляемыйНомер = НомерСтроки;
ВыбратьСтроки();
Пока ПолучитьСтроку()=1 Цикл
Если НомерСтроки <> УдаляемыйНомер Тогда
Если (СокрЛП(МПЗ.ЕдиницаИзмерения.Наименование)="кг") или (СокрЛП(МПЗ.ЕдиницаИзмерения.Наименование)="л") Тогда
тИтог=тИтог+Норма;
КонецЕсли;
КонецЕсли;
КонецЦикла;
Форма.сИтог.Заголовок("Итого: "+Строка(тИтог)+" кг");
Форма.Обновить();
КонецПроцедуры "
Процедура ПриУдаленииСтроки()
тИтог=0;
УдаляемыйНомер = НомерСтроки;
ВыбратьСтроки();
Пока ПолучитьСтроку()=1 Цикл
Если НомерСтроки <> УдаляемыйНомер Тогда
Если (СокрЛП(МПЗ.ЕдиницаИзмерения.Наименование)="кг") или (СокрЛП(МПЗ.ЕдиницаИзмерения.Наименование)="л") Тогда
тИтог=тИтог+Норма;
КонецЕсли;
КонецЕсли;
КонецЦикла;
Форма.сИтог.Заголовок("Итого: "+Строка(тИтог)+" кг");
Форма.Обновить();
КонецПроцедуры "
Читают тему
(гостей: 1)