[59056] in SAPr3-news
Re: Loop-Schleife mit Selection-Screen und Validierung
daemon@ATHENA.MIT.EDU (Lars)
Wed Mar 14 04:24:26 2007
To: sapr3-news@mit.edu
Date: 14 Mar 2007 01:24:16 -0700
From: "Lars" <belpatin@gmx.net>
Message-ID: <1173860656.417981.56320@y80g2000hsf.googlegroups.com>
Hallo Steffen,
On 13 Mrz., 16:12, "St. Kother" <steffen.kot...@gmx.net> wrote:
> do.
> call selection-screen...
> if sy-subrc <> 0.
> exit.
> else
> perform z_barcodedruck_validate
> using...
> if rc_validate =3D 0.
> " Verarbeitung der Daten, Schreiben in Z-Tabelle und Druck
> endif.
> endif.
> enddo.
Eventuell geht's auch ohne den Loop:
----- snip ----
constants: cf_true type flag value 'X',
cf_false type flag value space.
data: ln_current_line type sytabix,
lf_terminated type flag.
field-symbols <fs_table_line> type ts_zeile_deiner_tabelle.
ln_current_line =3D 1.
while lf_terminated eq cf_false.
* N=E4chste Zeile einlesen...
read table lt_deine_tabelle
assigning <fs_table_line>
index ln_current_line.
if sy-subrc ne 0.
lf_terminated =3D cf_true.
continue.
endif.
* Aufruf des Selektionsbildschirms
call selection-screen...
* Abbruchpr=FCfung:
if sy-subrc ne 0.
* Index auf den n=E4chsten Eintrag stellen
add 1 to ln_current_line.
else.
* Validierung:
perform ...
if rc_validate eq 0.
* Verarbeitung der Daten durchf=FChren...
* ... und den Index auf den n=E4chsten Eintrag stellen
add 1 to ln_current_line.
else.
* Hier machen wir n=FCx!
endif.
endif.
endwhile.
----- snip ---
Hoffentlich ist's hilfreich :o)
Gr=FC=DFe
Lars Kempkens
