topic Re: Problem with loop in Application Development and Automation Discussions

Problem with loop

Former Member — Thu, 14 Dec 2006 14:56:19 GMT

Hello,

I have only one entry in P0000 with aedtm = 11/01/2006 and iam writing this code.

loop at p0000 into p0000 where aedtm in s_aedtm.

IF SY-SUBRC EQ 0.

some code.

endif.

endloop.

but the thing is it is looping twice even though it has only one entry in p0000 and iam getting 2 entries. can yoe please explain why this is happening

Thanks

Viky

Re: Problem with loop

Former Member — Thu, 14 Dec 2006 14:57:27 GMT

What is in s_aedtm?

You don't need the if sy-subrc inside the loop, as it will only go into the loop if it find an entry to match the where condition.

Re: Problem with loop

Former Member — Thu, 14 Dec 2006 14:58:46 GMT

Also why are you looping into a header line of the same name as the table? If the table has a header line you can use the syntax:

LOOP AT p0000 WHERE etc

without specifing the header line.

Re: Problem with loop

Former Member — Thu, 14 Dec 2006 14:59:30 GMT

Yes ,

But why is it going into the loop twice if it has only one entry in that.

Thanks

Viky

Re: Problem with loop

RichHeilman — Thu, 14 Dec 2006 15:00:22 GMT

Post the code exactly as it is in your program.

Regards,

RIch Heilman

Re: Problem with loop

Former Member — Thu, 14 Dec 2006 15:00:48 GMT

Remove the code you don't need and see if it's still doing the same time. Othewise we need to know whats in s_aedtm.

Re: Problem with loop

Former Member — Thu, 14 Dec 2006 15:04:04 GMT

here is my code below

loop at p0000 where aedtm in s_aedtm.

MOVE P0000-PERNR TO IT_tab-PERNR.

MOVE P0000-AEDTM TO IT_tab-AEDTM.

MOVE P0000-BEGDA TO IT_tab-BEGDA.

MOVE P0000-UNAME TO IT_tab-UNAME.

endloop.

Re: Problem with loop

surya_gupta3 — Thu, 14 Dec 2006 15:07:57 GMT

I dont think there would be a check for SY-SUBRC.

Please Write LOOP at i_tab into work_area.

You are not using work area explicitely. Please declare a work area of LINE TYPE of P000.

Regards,

Surya

Re: Problem with loop

Former Member — Thu, 14 Dec 2006 15:09:26 GMT

data: i_p0000 type table of pa0000 with header line.

loop at p0000 where aedtm in s_aedtm.

read table i_p0000 with key

aedtm = s_aedtm.

if sy-subrc ne 0.

move p0000 to i_p0000.

append i_p0000.

endif.

endloop.

this will read your internal table and only append to it if it does not find an entry with a duplicate changed on date (s_aedtm) from the selection screen.

This will read the internal table and only insert 1 value with that aedtm. If your s_aedtm is a select option and you have several single entries it will do the same, entering 1 record for each aedtm you specify.

Warren

Re: Problem with loop

sridhar_k1 — Thu, 14 Dec 2006 15:12:58 GMT

Do you have GET PERNR above the loop?

it might be looping twice.

Regards

Sridhar

Re: Problem with loop

Former Member — Thu, 14 Dec 2006 15:16:44 GMT

ya i have a get pernr.

Re: Problem with loop

sridhar_k1 — Thu, 14 Dec 2006 15:21:41 GMT

Put a break point at LOOP and execute, the program should stop at loop twice, that's the reason for 2 records even if P0000 contain only one.

Regards

Sridhar

Re: Problem with loop

Former Member — Thu, 14 Dec 2006 15:24:20 GMT

so how do I make a correction in that

Re: Problem with loop

sridhar_k1 — Thu, 14 Dec 2006 15:33:53 GMT

GET PERNR event might be selecting 2 records depending on the user selection.

limit the selection to select only one record, or discard the records from itab after the selection is complete.

Regards

Sridhar

Re: Problem with loop

Former Member — Thu, 14 Dec 2006 15:37:49 GMT

use CLEAR P000 before the loop , this should not be a problem but just a try

Re: Problem with loop

Former Member — Thu, 14 Dec 2006 18:10:47 GMT

Vicky,

You could do...

*********************

data: I_P0000 type table of PA0000 with header line.

start-of-selection.

get pernr.

provide single * from p0000 between pn-begda and pn-endda

where aedtm = s_aedtm.

move P0000 to I_P0000.

append I_P0000.

endprovide.

end-of-selection.