ALV list display

[Former Member]

hi,

My program is ALV interactive reporting. I am a problem in o/p list display. There is an amount field in the o/p display and i am passing this through fieldcatalog along with cfieldname and ctabname( reference currency fieldname and tablename). In the o/p list display when i am trying to sum-up the amount field its is showing multiple totals this is because it is summing up according to the currency key ( for example for all USD currency it is adding up all the amont related to USD and showing one summation for IN currency it is showing another total) .

Is there any way so that i can have only one total.

define add_field.

wa_fieldcat-fieldname = &1.

wa_fieldcat-col_pos = &2.

wa_fieldcat-ddictxt = &3.

wa_fieldcat-seltext_l = &3.

wa_fieldcat-seltext_m = &3.

wa_fieldcat-seltext_s = &3.

wa_fieldcat-reptext_ddic = &3.

wa_fieldcat-ddictxt = 'M'.

wa_fieldcat-ref_fieldname = &4.

wa_fieldcat-ref_tabname = &5.

wa_fieldcat-cfieldname = &6.

wa_fieldcat-ctabname = &7.

append wa_fieldcat to i_fieldcat.

add 1 to &2.

end-of-definition.

add_field 'HSL' l_pos 'Amt. Co. Cd. Currency'(022) 'HSL01' 'ZUPI5T'

'RTCUR' 'ZUPI5T'.

plz help me.

[Former Member]

could u send u r code...

Srinivas M

[Former Member]

types: begin of ty_data,

ryear like zupi5t-ryear, "Fiscal year

rbukrs like zupi5t-rbukrs, "Company code

racct like zupi5t-racct, "Account number

rzzps_posid like zupi5t-rzzps_posid, "WBS element

rzzmtit like zupi5t-rzzmtit, "MPM title

rzzmfor like zupi5t-rzzmfor, "MPM format

rzzmatnr like zupi5t-rzzmatnr, "Material number

rzzcou like zupi5t-rzzcou, "Country

rzzfow like zupi5t-rzzfow, "Financial owner

rzzoow like zupi5t-rzzoow, "Operational owner

rzzcon like zupi5t-rzzcon, "Licensee Contract

rzzloc like zupi5t-rzzloc, "Licensor Contract

kostl like zupi5t-kostl, "Cost center

zzfam like zupi5t-zzfam, "Fame Number

zzfor like zupi5t-zzfor, "Format

zzprd like zupi5t-zzprd, "Product Line

zzwin like zupi5t-zzwin, "Window group

zzwig like zupi5t-zzwig, "Window

rtcur like zupi5t-rtcur, "Currency Key

hsl01 like zupi5t-hsl01,

end of ty_data.

types: begin of ty_final,

ryear like zupi5t-ryear, "Fiscal year

rbukrs like zupi5t-rbukrs, "Company code

racct like zupi5t-racct, "Account number

rzzps_posid like zupi5t-rzzps_posid, "WBS element

rzzmtit like zupi5t-rzzmtit, "MPM title

rzzmfor like zupi5t-rzzmfor, "MPM format

rzzmatnr like zupi5t-rzzmatnr, "Material number

rzzcou like zupi5t-rzzcou, "Country

rzzfow like zupi5t-rzzfow, "Financial owner

rzzoow like zupi5t-rzzoow, "Operational owner

rzzcon like zupi5t-rzzcon, "Licensee Contract

rzzloc like zupi5t-rzzloc, "Licensor Contract

kostl like zupi5t-kostl, "Cost center

rtcur like zupi5t-rtcur, "Currency Key

zzfam like zupi5t-zzfam, "Fame Number

zzfor like zupi5t-zzfor, "Format

zzprd like zupi5t-zzprd, "Product Line

zzwin like zupi5t-zzwin, "Window group

zzwig like zupi5t-zzwig, "Window

tsl like zupi5t-tsl01, "Amount Transaction currency

hsl like zupi5t-hsl01, "Amount Co. code currency

ksl like zupi5t-ksl01, "Amount Group currency

msl like zupi5t-msl01, "Quantity

end of ty_final.

select ryear rbukrs racct rzzps_posid rzzmtit

rzzmfor rzzmatnr rzzcou rzzfow rzzoow rzzcon

rzzloc kostl

zzfam zzfor zzprd zzwin zzwig

rtcur

hsl01

from zupi5t

into table i_data

where rldnr = p_rldnr

and rrcty = p_rrcty

and rvers = p_rvers

and ryear = p_ryear

and rbukrs = p_rbukrs

and racct in s_racct

and rbusa in s_rbusa

and rzzps_posid in s_rzzps

and rzzmtit in s_rzmtit

and rzzmfor in s_rzmfor

and rzzmatnr in s_zmatnr

and rzzcou in s_rzzcou

and rzzkunnr in s_rkunnr

and rzzfow in s_rzzfow

and rzzoow in s_rzzoow

and rzzcon in s_rzzcon

and rzzaufnr in s_raufnr

and rzzcon in s_rzzloc

and blart in s_blart

and zzrrc in s_zzrrc

and zztsc in s_zztsc

and zzfam in s_zzfam

and zzfor in s_zzfor

and zzgen in s_zzgen

and zzprd in s_zzprd

and zzfmt in s_zzfmt

and zzwin in s_zzwin

and zzwig in s_zzwig

and kostl in s_kostl.

FORM populate_final_table.

loop at i_data into wa_data.

wa_final-ryear = wa_data-ryear.

wa_final-rbukrs = wa_data-rbukrs.

wa_final-racct = wa_data-racct.

wa_final-rzzps_posid = wa_data-rzzps_posid.

wa_final-rzzmtit = wa_data-rzzmtit.

wa_final-rzzmfor = wa_data-rzzmfor.

wa_final-rzzmatnr = wa_data-rzzmatnr.

wa_final-rzzcou = wa_data-rzzcou.

wa_final-rzzfow = wa_data-rzzfow.

wa_final-rzzoow = wa_data-rzzoow.

wa_final-rzzcon = wa_data-rzzcon.

wa_final-rzzloc = wa_data-rzzloc.

wa_final-kostl = wa_data-kostl.

wa_final-zzfam = wa_data-zzfam.

wa_final-zzfor = wa_data-zzfor.

wa_final-zzprd = wa_data-zzprd.

wa_final-zzwin = wa_data-zzwin.

wa_final-zzwig = wa_data-zzwig.

wa_final-rtcur = wa_data-rtcur.

WA_FINAL-HSL01 = WA_DATA-HSL01.

append wa_final to i_final.

clear : wa_final-ryear,

wa_final-rbukrs, wa_final-racct,

wa_final-rzzps_posid, wa_final-rzzmtit, wa_final-rzzmfor,

wa_final-rzzmatnr, wa_final-rzzcou,

wa_final-rzzfow, wa_final-rzzoow, wa_final-rzzcon,

wa_final-rzzloc,

wa_final-kostl,

wa_final-zzfam,

wa_final-zzfor,

wa_final-zzprd, wa_final-zzwin,

wa_final-zzwig,

wa_final-rtcur,

wa_final-hsl.

endloop.

data: l_pos type i.

l_pos = 1.

add_field 'RYEAR' l_pos 'Fiscal Year'(002) 'RYEAR' 'zupi5t' '' '' .

add_field 'RBUKRS' l_pos 'Company Code'(003) 'RBUKRS' 'zupi5t' '' ''.

add_field 'RACCT' l_pos 'Account Number'(004) 'RACCT' 'zupi5t' '' ''.

add_field 'RZZPS_POSID' l_pos 'WBS Element'(005) 'RZZPS_POSID'

'ZUPI5T' '' ''.

add_field 'RZZMTIT' l_pos 'MPM title'(006) 'RZZMTIT' 'zupi5t' '' ''.

add_field 'RZZMFOR' l_pos 'MPM Format'(007) 'RZZMFOR' 'zupi5t' '' ''.

add_field 'RZZMATNR' l_pos 'Material'(008) 'RZZMATNR' 'zupi5t' '' ''.

add_field 'RZZCOU' l_pos 'Country'(009) 'RZZCOU' 'zupi5t' '' '' .

add_field 'RZZFOW' l_pos 'Financial owner'(010) 'RZZFOW' 'zupi5t' ''

''.

add_field 'RZZOOW' l_pos 'Operational owner'(011) 'RZZOOW' 'zupi5t' ''

''.

add_field 'RZZCON' l_pos 'Licensee Contract'(012) 'RZZCON' 'zupi5t' ''

''.

add_field 'RZZLOC' l_pos 'Licensor Contract'(013) 'RZZLOC' 'zupi5t' ''

''.

add_field 'KOSTL' l_pos 'Cost Center'(014) 'KOSTL' 'zupi5t' '' '' .

add_field 'ZZFAM' l_pos 'Fame Number'(015) 'ZZFAM' 'zupi5t' '' ''.

add_field 'ZZFOR' l_pos 'Format'(016) 'ZZFOR' 'zupi5t' '' '' .

add_field 'ZZPRD' l_pos 'Product Line'(017) 'ZZPRD' 'zupi5t' '' '' .

add_field 'ZZWIN' l_pos 'Window Group'(018) 'ZZWIN' 'zupi5t' '' '' .

add_field 'ZZWIG' l_pos 'Window'(019) 'ZZWIG' 'zupi5t' '' ''.

• add_field 'RTCUR' l_pos 'Currency'(020) 'RTCUR' 'zupi5t' '' ''.

• add_field 'TSL' l_pos 'Amt. Transactn curr.'(021) '' '' '' ''.

add_field 'HSL' l_pos 'Amt. Co. Cd. currency'(022) 'HSL01' 'ZUPI5T'

'CURR1' 'T882'.

Atually the reference currency fieldname and tablename for the field HSL01 is CURR1 AND T882. But when i am executing the program it is going into dump saying *The current ABAP/4 program "SAPLSLVC " had to be terminated because

one of the statements could not be executed.

Field symbol has not yet been assigned.You attempted to access an unassigned field symbol

*

but when i am giving RTCUR and ZUPI5T as currency reference field and tablename program is executing fine i am getting why this is happening .

can u plz suggest me.

[Former Member]

pls send ur entire program to my id srinivas.abap@gmail.com..

ASAP

I will let u know...

Regards,

Srinivas M

[Former Member]

srinivasa.abap@gmail.com

[Former Member]

Hi ramya,

Could u pls send u r O/p Screen shot where u r facing a problem

send to this id only... as Iam not able to access internet after 2 'O clock

Regards,

Srinivas M

[Former Member]

Hi Ramya,

i will send a sample code 4 ur probelm check it once..

*SubTotal on the Field NETWR

wa_fieldcat-col_pos = '3'. "Column Position

wa_fieldcat-tabname = 'IT_SALESORDER'. "Internal Table

wa_fieldcat-fieldname = 'NETWR'. "Field Name

wa_fieldcat-do_sum = 'X'. "Sum

wa_fieldcat-seltext_m = 'Net Value'. "Display Text In Screen

APPEND wa_fieldcat TO gt_fieldcat.

Award points if helpful.

Kiran Kumar.G.A