IF-Abfrage schlanker machen
Die Frage ist als "gelöst" markiert. Den entsprechend Beitrag findest du hier.
4 Beiträge
•
Seite 1 von 1
4 Beiträge
Seite 1 von 1
Hallo,
ich bin mal wieder auf der Suche auf einen eleganteren Weg. Ich möchte wissen, ob ich anhand der Angaben des Benutzers den ausgewählten Bestand ermitteln kann, ob auch noch BESTQ abfragen muss. Das ist dann der Fall, wenn nur ein Wert in den Feldern LABST, INSME, SPEME and RETME gefüllt ist und die anderen nicht.
Aktuell sieht meine IF-Abfrage so aus:
Kann ich das nicht irgendwie eleganter lösen?
Tot ziens
ich bin mal wieder auf der Suche auf einen eleganteren Weg. Ich möchte wissen, ob ich anhand der Angaben des Benutzers den ausgewählten Bestand ermitteln kann, ob auch noch BESTQ abfragen muss. Das ist dann der Fall, wenn nur ein Wert in den Feldern LABST, INSME, SPEME and RETME gefüllt ist und die anderen nicht.
Aktuell sieht meine IF-Abfrage so aus:
Code: Alles auswählen.
if ( ls_mard-labst is not INITIAL and ls_mard-insme is INITIAL and ls_mard-speme is INITIAL and ls_mard-retme is INITIAL )
or ( ls_mard-labst is INITIAL and ls_mard-insme is not INITIAL and ls_mard-speme is INITIAL and ls_mard-retme is INITIAL )
or ( ls_mard-labst is INITIAL and ls_mard-insme is INITIAL and ls_mard-speme is not INITIAL and ls_mard-retme is INITIAL )
or ( ls_mard-labst is INITIAL and ls_mard-insme is INITIAL and ls_mard-speme is INITIAL and ls_mard-retme is not INITIAL ).
"mach was
else.
"mach was anderes
endif.
Tot ziens
gesponsert ⓘ
Stellenangebote auf ABAPforum.com schalten
kostenfrei für Ausbildungsberufe und Werksstudenten
kostenfrei für Ausbildungsberufe und Werksstudenten
Beitrag
von a-dead-trousers (Top Expert / 4483 / 231 /
1205
)
»
Weis jetzt nicht ob das "eleganter" ist:
So ist es IMHO besser lesbar.
Alternativ könntest du dir noch einen einzigen Vergleich mit EQUIV überlegen, aber den Vergleichsoperator würde ich nur vorsichtig einsetzen. Vorallem bei vier Vergleichen ist das ein ziemlicher "Mindfuck" wenn man das später mal wieder warten muss.
lg ADT
Code: Alles auswählen.
data ld_count type i.
if ls_mard-labst is not INITIAL. add 1 to ld_count. ENDIF.
if ls_mard-insme is not INITIAL. add 1 to ld_count. ENDIF.
if ls_mard-speme is not INITIAL. add 1 to ld_count. ENDIF.
if ls_mard-retme is not INITIAL. add 1 to ld_count. ENDIF.
if ld_count eq 1.
"mach was
else.
"mach was anderes
endif.Alternativ könntest du dir noch einen einzigen Vergleich mit EQUIV überlegen, aber den Vergleichsoperator würde ich nur vorsichtig einsetzen. Vorallem bei vier Vergleichen ist das ein ziemlicher "Mindfuck" wenn man das später mal wieder warten muss.
lg ADT
Folgende Benutzer bedankten sich beim Autor a-dead-trousers für den Beitrag:
Barney
Theory is when you know something, but it doesn't work.
Practice is when something works, but you don't know why.
Programmers combine theory and practice: Nothing works and they don't know why.
ECC: 6.18
Basis: 7.50
Practice is when something works, but you don't know why.
Programmers combine theory and practice: Nothing works and they don't know why.
ECC: 6.18
Basis: 7.50
Danke! 
Ob Du mir es glaubst oder nicht: mir war grade derselbe Gedanken gekommen und hatte es schon umgesetzt... Manchmal denkt man echt zu kompliziert... 
Ob Du mir es glaubst oder nicht: mir war grade derselbe Gedanken gekommen und hatte es schon umgesetzt... Manchmal denkt man echt zu kompliziert... Code: Alles auswählen.
IF ls_mard-labst IS NOT INITIAL.
ADD 1 TO lf_count.
ENDIF.
IF ls_mard-insme IS NOT INITIAL.
ADD 1 TO lf_count.
ENDIF.
IF ls_mard-speme IS NOT INITIAL.
ADD 1 TO lf_count.
ENDIF.
IF ls_mard-retme IS NOT INITIAL.
ADD 1 TO lf_count.
ENDIF.
IF lf_count EQ 1.
p_ok = 'X'.
ELSE. "more than one stock type
...
Code: Alles auswählen.
summe = labst + insme + speme + retme.
if speme = summe or
labst = summe or
insme = summe or
retme = summe.
endif.
Seite 1 von 1
Vergleichbare Themen
7
Antw.
Antw.
5437
Views
Views
8
Antw.
Antw.
5236
Views
Views
1
Antw.
Antw.
2219
Views
Views
Frage die ABAP Experten
Über diesen Beitrag
Die Frage ist als "gelöst" markiert. Den entsprechend Beitrag findest du hier.
Unterstütze die Community und teile den Beitrag für mehr Leser und Austausch
Aktuelle Forenbeiträge
Newsletter Anmeldung
Keine Beiträge verpassen! Wöchentlich versenden wir lesenwerte Beiträge aus unserer Community.Die letzte Ausgabe findest du hier.
Aktuelle Forenbeiträge
Unbeantwortete Forenbeiträge
F6862 - Stücklistenpositionen Massenhinzufügen ohne Änderungsnummer
vor 3 Wochen von Radinator 1 / 2049
vor 3 Wochen von Radinator 1 / 2049