topic Re: Grand total using Control Break Statements in Application Development and Automation Discussions

Grand total using Control Break Statements

Former Member — Tue, 08 Jan 2008 13:25:52 GMT

Hi All,

can u help me out getting a

Grand Total using Control Break Statements.

when i am tring to use 'At Last' its displaying **** as a result

Thanks in Advance

Re: Grand total using Control Break Statements

Former Member — Tue, 08 Jan 2008 13:58:05 GMT

Hi,

Check this sample code

REPORT ZTEST no standard page heading line-count 40(2).

tables : vbap.

data : begin of i_vbap occurs 0,

vbeln like vbap-vbeln,

posnr like vbap-posnr,

matnr like vbap-matnr,

kwmeng like vbap-kwmeng,

netpr like vbap-netpr,

end of i_vbap.

data wa_vbap like line of i_vbap.

data v_flag type c.

select-options s_vbeln for vbap-vbeln obligatory.

start-of-selection.

select vbeln

posnr

matnr

kwmeng

netpr from vbap

into table i_vbap

where vbeln in s_vbeln.

sort i_vbap by vbeln posnr.

end-of-selection.

loop at i_vbap.

move i_vbap to wa_vbap.

at first.

write:/2 'Order #',15 'Item #',28 'Material #',50 'Qty', 70 'Net value'.

skip 1.

endat.

at new vbeln.

write:/2 wa_vbap-vbeln,15 wa_vbap-posnr,28 wa_vbap-matnr,

47 wa_vbap-kwmeng,65 wa_vbap-netpr.

v_flag = 'X'.

endat.

if v_flag ne 'X'.

write:/15 wa_vbap-posnr,28 wa_vbap-matnr,

47 wa_vbap-kwmeng,65 wa_vbap-netpr.

endif.

at end of vbeln.

sum.

skip 1.

write:/5 'Sub totals', 47 i_vbap-kwmeng,65 i_vbap-netpr.

skip 1.

endat.

at last .

skip 1.

sum.

write:/5 'Grand Totals',47 i_vbap-kwmeng,65 i_vbap-netpr.

skip 1.

write:/ 'end of page', 'Footer'.

endat.

clear v_flag.

endloop.

Regards,

Satish

Re: Grand total using Control Break Statements

Former Member — Tue, 08 Jan 2008 14:02:12 GMT

For sub total u need to use at end of

for grand totals u need to use at last only

at first.

<var>=0.

<var> = <var>+field-value.

at last.

u can find grand total in <var>.

Madhavi

Re: Grand total using Control Break Statements

Former Member — Wed, 09 Jan 2008 12:38:13 GMT

Thanks 4 the reply