Solved: urgent

Former Member · ‎2008 Jan 03

hi,

following code is the part of the program which i am developing.

data:

i_data type standard table of ty_data,

i_final type standard table of ty_final,

data:

wa_data type ty_data,

wa_final type ty_final,

select-options:

s_rpmax for zupi5t-rpmax obligatory no-extension. "Period

parameters:

p_rbukrs like zupi5t-rbukrs obligatory, "Company code

p_rtcur like zupi5t-rtcur. "obligatory. "Currency Key

select-options:

s_racct for zupi5t-racct obligatory, "Account number

s_rbusa for zupi5t-rbusa, "Business area

s_rzzps for zupi5t-rzzps_posid obligatory no intervals, "WBS Element

s_rzmtit for zupi5t-rzzmtit, "MPM title

s_rzmfor for zupi5t-rzzmfor, "MPM format

s_zmatnr for zupi5t-rzzmatnr, "Material number

s_rzzcou for zupi5t-rzzcou, "Country

s_rkunnr for zupi5t-rzzkunnr, "Customer number

s_rzzfow for zupi5t-rzzfow, "Financial owner

s_rzzoow for zupi5t-rzzoow, "Operational owner

s_rzzcon for zupi5t-rzzcon, "Licence contract

s_raufnr for zupi5t-rzzaufnr, "Order number

s_rzzloc for zupi5t-rzzloc, "Licensor contract

s_blart for zupi5t-blart, "Document type

s_zzrrc for zupi5t-zzrrc, "Return reason code

s_zztsc for zupi5t-zztsc, "Type of sales/Sales channel

s_zzfam for zupi5t-zzfam, "Fame number

s_zzfor for zupi5t-zzfor, "Format

s_zzgen for zupi5t-zzgen, "Movie Genre

s_zzprd for zupi5t-zzprd, "Product Line

s_zzfmt for zupi5t-zzfmt, "Price point

s_zzwin for zupi5t-zzwin, "Window group

s_zzwig for zupi5t-zzwig, "Window

s_kostl for zupi5t-kostl. "Cost center

select ryear rbukrs racct rzzps_posid rzzmtit

rzzmfor rzzmatnr rzzcou rzzfow rzzoow rzzcon

rzzloc kostl

zzfam zzfor zzprd zzwin zzwig

rtcur tsl01 tsl02

tsl03 tsl04 tsl05 tsl06 tsl07 tsl08 tsl09 tsl10 tsl11

tsl12 tsl13 tsl14 tsl15 tsl16 hsl01 hsl02 hsl03 hsl04

hsl05 hsl06 hsl07 hsl08 hsl09 hsl10 hsl11 hsl12 hsl13

hsl14 hsl15 hsl16 ksl01 ksl02 ksl03 ksl04 ksl05 ksl06

ksl07 ksl08 ksl09 ksl10 ksl11 ksl12 ksl13 ksl14 ksl15

ksl16 msl01 msl02 msl03 msl04 msl05 msl06 msl07 msl08

msl09 msl10 msl11 msl12 msl13 msl14 msl15 msl16

from zupi5t

into table i_data

where rldnr = p_rldnr

and rrcty = p_rrcty

and rvers = p_rvers

and ryear = p_ryear

and rpmax in s_rpmax

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.

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-tsl = wa_data-tsl01 + wa_data-tsl02 + wa_data-tsl03 +

wa_data-tsl04 + wa_data-tsl05 + wa_data-tsl06 +

wa_data-tsl07 + wa_data-tsl08 + wa_data-tsl09 +

wa_data-tsl10 + wa_data-tsl11 + wa_data-tsl12 +

wa_data-tsl13 + wa_data-tsl14 + wa_data-tsl15 +

wa_data-tsl16.

wa_final-hsl = wa_data-hsl01 + wa_data-hsl02 + wa_data-hsl03 +

wa_data-hsl04 + wa_data-hsl05 + wa_data-hsl06 +

wa_data-hsl07 + wa_data-hsl08 + wa_data-hsl09 +

wa_data-hsl10 + wa_data-hsl11 + wa_data-hsl12 +

wa_data-hsl13 + wa_data-hsl14 + wa_data-hsl15 +

wa_data-hsl16.

wa_final-ksl = wa_data-ksl01 + wa_data-ksl02 + wa_data-ksl03 +

wa_data-ksl04 + wa_data-ksl05 + wa_data-ksl06 +

wa_data-ksl07 + wa_data-ksl08 + wa_data-ksl09 +

wa_data-ksl10 + wa_data-ksl11 + wa_data-ksl12 +

wa_data-ksl13 + wa_data-ksl14 + wa_data-ksl15 +

wa_data-ksl16.

wa_final-msl = wa_data-msl01 + wa_data-msl02 + wa_data-msl03 +

wa_data-msl04 + wa_data-msl05 + wa_data-msl06 +

wa_data-msl07 + wa_data-msl08 + wa_data-msl09 +

wa_data-msl10 + wa_data-msl11 + wa_data-msl12 +

wa_data-msl13 + wa_data-msl14 + wa_data-msl15 +

wa_data-msl16.

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-tsl,

wa_final-hsl, wa_final-ksl, wa_final-msl.

endloop.

here they r 4 fields TSL, MSL, KSL, MSL. I am getting the values of these fields by summation of tsl01,tsl02........tsl09 as defined in the table zupi5t) and respectively for other fields also.

Now the requirement is i should add the fields depending upon the range given for the select-option period s_rpmax. suppose if i give the range as 3 to 5 in the selection screen then tsl03, tsl04,tsl05 should get added and should be stored in tsl and this applies for the other fields also ( hsl,ksl,msl).

please help me in resolving this issue. plz.

mnicolai_77 · ‎2008 Jan 03

hi,

try to use the FIELD-SYMBOLS and the istruction

ASSIGN COMPONENT <id> OF STRUCTURE <str> TO <<fs>>

<id> can contain the name of the field

<str> name of your structure

<<FS>> field symbols.

if u concatenate the prefix of your field (e.g. "TLS") and the period nn (e.g. '01' ' 02' ...) into <id> the field symbold have the value of the field TLSnn.

then sum this value into the destination field (e.g. wa_final-tsl).

for example.

field-symbols: <fs> type any.

data: id(20).

data: nn(2) type n.

do.

move sy-index to nn.

concatenate 'TLS' nn into id.

assign component (id) of structure wa_data to <fs>

if sy-subrc <> 0.

exit.

endif.

add <fs> to wa_final-tsl.

enddo.

Former Member · ‎2008 Jan 03

O...we will solve and u will recive 000's of salary...

be fair bindhu..coomon use ur logic..split the sum into minor and post then expect the answer or else none is going to answer sure...

Former Member · ‎2008 Jan 03

hi,

sure i will split the amount who's going to resolve this problem if u r going to resolve then i will give whole salary.

Former Member · ‎2008 Jan 03

Hey satish,

Nothing in the above code yar. See if you know the answer then better to provide solution otherwise don't.

Don't blame SDN with these type of time waste solutions....

Regards,

Kumar

mnicolai_77 · ‎2008 Jan 03

hi,

try to use the FIELD-SYMBOLS and the istruction

ASSIGN COMPONENT <id> OF STRUCTURE <str> TO <<fs>>

<id> can contain the name of the field

<str> name of your structure

<<FS>> field symbols.

if u concatenate the prefix of your field (e.g. "TLS") and the period nn (e.g. '01' ' 02' ...) into <id> the field symbold have the value of the field TLSnn.

then sum this value into the destination field (e.g. wa_final-tsl).

for example.

field-symbols: <fs> type any.

data: id(20).

data: nn(2) type n.

do.

move sy-index to nn.

concatenate 'TLS' nn into id.

assign component (id) of structure wa_data to <fs>

if sy-subrc <> 0.

exit.

endif.

add <fs> to wa_final-tsl.

enddo.

Former Member · ‎2008 Jan 03

hi,

can u plz suggest me where to insert this code which u have written.

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-tsl = wa_data-tsl01 + wa_data-tsl02 + wa_data-tsl03 +

wa_data-tsl04 + wa_data-tsl05 + wa_data-tsl06 +

wa_data-tsl07 + wa_data-tsl08 + wa_data-tsl09 +

wa_data-tsl10 + wa_data-tsl11 + wa_data-tsl12 +

wa_data-tsl13 + wa_data-tsl14 + wa_data-tsl15 +

wa_data-tsl16.

wa_final-hsl = wa_data-hsl01 + wa_data-hsl02 + wa_data-hsl03 +

wa_data-hsl04 + wa_data-hsl05 + wa_data-hsl06 +

wa_data-hsl07 + wa_data-hsl08 + wa_data-hsl09 +

wa_data-hsl10 + wa_data-hsl11 + wa_data-hsl12 +

wa_data-hsl13 + wa_data-hsl14 + wa_data-hsl15 +

wa_data-hsl16.

wa_final-ksl = wa_data-ksl01 + wa_data-ksl02 + wa_data-ksl03 +

wa_data-ksl04 + wa_data-ksl05 + wa_data-ksl06 +

wa_data-ksl07 + wa_data-ksl08 + wa_data-ksl09 +

wa_data-ksl10 + wa_data-ksl11 + wa_data-ksl12 +

wa_data-ksl13 + wa_data-ksl14 + wa_data-ksl15 +

wa_data-ksl16.

wa_final-msl = wa_data-msl01 + wa_data-msl02 + wa_data-msl03 +

wa_data-msl04 + wa_data-msl05 + wa_data-msl06 +

wa_data-msl07 + wa_data-msl08 + wa_data-msl09 +

wa_data-msl10 + wa_data-msl11 + wa_data-msl12 +

wa_data-msl13 + wa_data-msl14 + wa_data-msl15 +

wa_data-msl16.

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-tsl,

wa_final-hsl, wa_final-ksl, wa_final-msl.

endloop.

tih is my loop statement where do i need to make changes.

mnicolai_77 · ‎2008 Jan 03

hi,

replace this code

wa_final-tsl = wa_data-tsl01 + wa_data-tsl02 + wa_data-tsl03 +

wa_data-tsl04 + wa_data-tsl05 + wa_data-tsl06 +

wa_data-tsl07 + wa_data-tsl08 + wa_data-tsl09 +

wa_data-tsl10 + wa_data-tsl11 + wa_data-tsl12 +

wa_data-tsl13 + wa_data-tsl14 + wa_data-tsl15 +

wa_data-tsl16.

with

do.

move sy-index to nn.

concatenate 'TSL' nn into id.

assign component id of structure wa_data to <fs>.

if sy-subrc <> 0. exit. endif.

if nn in s_rpmax.

add <fs> to wa_final-tsl.

endif.

enddo.

bye.

Former Member · ‎2008 Jan 03

hi nicolai,

The logic which u wrote

concatenate the prefix of your field (e.g. "TLS") and the period nn (e.g. '01' ' 02' ...) into <id> the field symbold have the value of the field TLSnn.

can we take the value of period which is select-option? .

do.

move sy-index to nn.

concatenate 'TSL' nn into id.

assign component (id) of structure wa_data to <fs>

if sy-subrc 0.

exit.

endif.

add <fs> to wa_final-tsl.

enddo.

in the above do loop the value of the sy-index will always start from 1 and the same think is concatenated along with TSL and id.

but my requirement is if the period range is given as 4 to 9 then the corresponding values of TSL i.e TSL04 to TSL09 should get added up.with the above code this is not achieved.

plz nicolai can u suggest me how can u suggest me what to do. Any one can help me.

mnicolai_77 · ‎2008 Jan 03

hi,

try this code in debug

SELECT-OPTIONS s_rpmax FOR bkpf-perio.

DATA: BEGIN OF wa_data,

tsl01(8) TYPE p VALUE '1.00',

tsl02(8) TYPE p VALUE '2.00',

tsl03(8) TYPE p VALUE '3.00',

tsl04(8) TYPE p VALUE '4.00',

tsl05(8) TYPE p VALUE '5.00',

tsl06(8) TYPE p VALUE '6.00',

tsl07(8) TYPE p VALUE '7.00',

tsl08(8) TYPE p VALUE '8.00',

tsl09(8) TYPE p VALUE '9.00',

tsl10(8) TYPE p VALUE '10.00',

tsl11(8) TYPE p VALUE '11.00',

tsl12(8) TYPE p VALUE '12.00',

tsl13(8) TYPE p VALUE '13.00',

tsl14(8) TYPE p VALUE '14.00',

tsl15(8) TYPE p VALUE '15.00',

tsl16(8) TYPE p VALUE '16.00',

END OF wa_data.

DATA: tsl(8) TYPE p.

FIELD-SYMBOLS: <fs> TYPE ANY.

DATA: id(20).

DATA: nn(2) TYPE n.

DO.

MOVE sy-index TO nn.

CONCATENATE 'TSL' nn INTO id.

ASSIGN COMPONENT id OF STRUCTURE wa_data TO <fs>.

IF sy-subrc <> 0.

EXIT.

ENDIF.

IF nn IN s_rpmax.

ADD <fs> TO tsl.

ENDIF.

ENDDO.

write tsl.

Former Member · ‎2008 Jan 04

hi nicolai,

Actually u solved my problem before only i didnt notice ur solution. Thank u very much thanks alot.

Former Member · ‎2008 Jan 03

Hi ramya,

I understood your problem. Let me take clarification from you.

Here your select options RPMAX is with out extension. so suppose user will enter values like 3,5,8. Then what is the requirement. will it sum values from 3 to 8 or will it take sum only 3,5,8. First take clarity in this. then we will try the solution for this

Hope this helps you. Reply for queries, shall post the updates.

Regards.

Kumar.

Former Member · ‎2008 Jan 03

hi lakshman,

Here period( s_rpmax) is with no-extension means the user can only make an entry on one line. Calling the additional "Multiple Selection" screen is not supported and no pushbutton for this appears on the selection screen.

so when i enter range as 3 to 8 in the selection screen for period then corresponding values of TSL, KSL, HSL and MSL sholud get added. i.e tsl03,tsl04,tsl05.....tsl08. and respectively for ksl, msl , hsl.

hope this is clear.

Former Member · ‎2008 Jan 03

Hi ramya,

Iam understand u r problem.

so , if u can send me the full code to me means i will do modification of code. and send to u.

[email protected]

By Category

Related Content

Activity Groups

Industry Groups

Influence and Feedback Groups

Interest Groups

Location Groups

Customer Only Groups

Forums

Related Resources

Products

Learning and Support

About

My SAP Profile

My SAP Profile

urgent