topic Re: read statement in Application Development and Automation Discussions

read statement

Former Member — Wed, 07 Oct 2009 11:59:06 GMT

I have a requirement

i am looping to a internal table

LOOP AT lt_itab into wa_itab

where field1 EQ 'kna1'

And field2 EQ 'zcc1;

Endloop

now i want to check if the entry exits then raise error message and exit...

what is the posible way to check for sy-subrc...inside loop

here the table name and field name are not primary key

regards

arora

Re: read statement

former_member195383 — Wed, 07 Oct 2009 12:08:01 GMT

LOOP AT lt_itab into wa_itab

where field1 EQ 'kna1'

And field2 EQ 'zcc1.

raise error message

exit.

Endloop

Re: read statement

Former Member — Wed, 07 Oct 2009 12:10:37 GMT

hi Rudra

i suppose i didnt made myself clear as if inside the loop in th etable i just want to chck if the entry exist then code

for if condition say if sy-subrc = 0

flag = checked

else.

exit.

endif.

so my qustion was how to chck for sysubrc inside a loop

now i want to check if the entry exits then raise error message and exit...

what is the posible way to check for sy-subrc...inside loop

Re: read statement

former_member195383 — Wed, 07 Oct 2009 12:30:18 GMT

hi..

I hope your requirement is to show error message if there is no entry in the table, based on the conditions,

that you have given in the loop statements.

If there is no entry in the table, the control will not go into the loop.

So write the following logic, which may help.

Declare a flag say, wf_flag.

Loop at itab......

wf_flag = 'X' .

exit.

endloop.

if wf_flag NE 'X' .

write error message.

endif.

Hope it solves your p[roblem.

Re: read statement

Former Member — Wed, 07 Oct 2009 13:03:12 GMT

hi rudra

here is my code

if not it_itab is initial.

LOOP AT lt_itab into wa_itabe

where field1 EQ 'kna1'

And field2 EQ 'zc3'.

Iflag= 'X'.

ENDLOOP.

IF I_pricomp_flag is initial.

Exit.

ENDIF.

now there is below code existing for the same now if i dont want that to execute so exit will come to the end of subroutine ? right?

Re: read statement

Sm1tje — Wed, 07 Oct 2009 13:09:59 GMT

If you just want to exit your subroutine if an entry is available in ITAB, you can use this:


LOOP AT itab INTO wa.
* SET a flag of some sort for returning to calling PERFORM.
  ex_flag = 'X'.
  RETURN.
ENDLOOP.

I hope I understood your requirement. If so, this would be the easiest solution to your problem.

Re: read statement

kesavadas_thekkillath — Wed, 07 Oct 2009 13:18:35 GMT

this will do.


data:val1 type lt_itab-field1, "refer the field type here
     val2 type lt_itab-field2.

val1 = 'kna1'.
val2 = 'zcc1'.
LOOP AT lt_itab into wa_itab where field1 EQ  And field2 EQ .
exit.
Endloop.
if sy-subrc = 0.
message 'Entry Exists' type 'E'.
endif.

or 

read table lt_itab with key field1 = val1 field2 = val2
transporting no fields.
if sy-subrc = 0.
error.
endif.