我需要按自然顺序打印一些行。在某些情况下,如果重复,我需要打印所有行,在其他情况下累积一些行。 我使用了一些变量,放在详细信息行中(第一个和最后一个省略):
{@aggitot}
shared numbervar tqtaprezzo;
tqtaprezzo:=tqtaprezzo+{RIGHEDOCUMENTI.QTAGEST};
{@mostraqtaprezzo}
evaluateafter({@aggitot});
shared numbervar tqtaprezzo;
if {EXTRACLIENTI.DettaglioLotti}='SI' then
{RIGHEDOCUMENTI.QTAGEST}
else
tqtaprezzo
{@aggitot2}
evaluateafter({@mostraqtaprezzo});
shared numbervar tqtaprezzo;
if {RIGHEDOCUMENTI.CODART}<>next({RIGHEDOCUMENTI.CODART}) then
tqtaprezzo:=0
这条细节省略了
部分{RIGHEDOCUMENTI.CODART}=next({RIGHEDOCUMENTI.CODART} and {EXTRACLIENTI.DettaglioLotti}<>'SI'
报告似乎没问题,但是当DettaglioLotti ='SI'并且每次分页后立即打印的第一行只显示一条记录,而不是两条或更多条记录。
有什么想法吗?