подсчет сумм по MARK

[.rejector.]

Всем здрасьте.

Подскажите как сделать подсчет сумм отмеченных строк на форме по Ctrl+F1.

В свойстве OnFormat одного из полей добавил код:

PHP код:

IF MARK THEN BEGIN
 ...
END 


при пометки строки все прекрасно считается. А как сделать обратную операцию, когда снимается пометка?

Заранее спасибо!

[Yoil]

А не помогает код

PHP код:

IF MARK THEN BEGIN
 ... 
END ELSE BEGIN
 ... 
END 


?

[.rejector.]

к сожалению нет, не помогает.
при открытии формы начинает ссумировать все строки в форме...

[Yoil]

Что-то пока только тупой вариант в голову лезет.
На OnAfterGetCurrRecord накатать что-то вроде

PHP код:

Sum := 0;
Rec2.COPY(Rec); //Rec2 - переменная типа Record, subtype как у Rec
Rec2.MARKEDONLY(TRUE);
IF Rec2.FIND('-') THEN
  REPEAT
    Sum += Rec2.Quantity;
  UNTIL Rec2.NEXT = 0; 


Sum, соответственно, повесить на отдельный текстбокс вне тейблбокса.

[.rejector.]

а если юзер снял метку и остался на этой записи...?

[Yoil]

Все работает и при пометке, и при снятии метки..
Либо я не понимаю, в чем проблема
Кстати, причем тут OnFormat, я тоже не понял

[.rejector.]

к великому сожалению не могу проверить работоспособность кода, т.к. Нав. вываливается с ошибкой. Rec2 сделал темповой таблицей.

OnFormat - потому что это тригер который отрабатывает и без перехода к след. записи. Ну и попутно выделяет запись жирным шрифтом.

ЗЫ. навик v2.6

[Yoil]

Ну фиг знает. Сейчас проверил в 3.6 - все ок.
2.6 сейчас под рукой нет, к сожалению. Через пару недель до дома доеду - попробую посмотреть.

[.rejector.]

все равно спасибо!

[Yoil]

.rejector, кстати, дык у Вас ошибка вылетает, когда Вы Rec2 делаете темповой таблицей или как?
Дело в том, что как раз темповой ее нельзя делать ни в коем случае.

[.rejector.]

Сначала была темповая, потом нет...
Я переделал код, но он все равно не подходит ;(
По причине того что если несколько раз попрыгать с/на отмеченную запись, то он её ссумирет столько раз сколько с нее прыгали, - не есть гуд. Плюс ко всему MARK не сохраняется, если вышел с формы, а нужно сохранять.

Посему забросил эту гиблую идею, начал делать с другого краю: будем не метить запись, а ставить банальные галочки. Сделаю FlowFields которые будут показывать то что мне нужно...

Спасибо за участие, Удачи.

зы. тот же самый вопрос подкинул на др. форумы - тишина. Либо народ ушел в кому (по причине начала весны), либо просто всем по#рену...

[Yoil]

А точно AfterGetRecod с AfterGetCurrRecord не перепутали?
не должен он по несколько раз одну запись суммировать никак...
Хотя я не знаю 2.6

З.Ы. Вы бы тогда начинали с постановки проблемы, а не с технической задачи Естесственно марки не сохраняются!

[.rejector.]

мда... не сохраняются в курсе...

Если бы юзеры ставили задачу в виде детально продуманного ТЗ, я думаю мы бы с Вами врятли так приятно общались...

[Yoil]

Гы