Suchhilfe überprüfen
10 Beiträge
•
Seite 1 von 1
10 Beiträge
Seite 1 von 1
Beitrag
von simethandreas (ForumUser / 26 / 0 /
0
)
»
Ich lese mit folgenden Programm eine Excel-Tabelle in eine SAP-Tabelle "test_excel" ein:
Die Schleife läuft für jede in der Excel-Tabelle vorhandene Zeile durch. Und innerhalb der Schleife werden die Spalten 1-10 eingelesen.
Das alles funktioniert auch.
Nun möchte ich aber eine Validierung, um zu prüfen ob für das betroffene Feld 1-10 eine Suchhilfe in SAP hinterlegt is und falls ja, der von Excel eingelesene Wert der Suchhilfe entspricht...wenn ja, wird er, wie bisher im Code, übernommen, ansonsten nicht.
Wie kann ich das lösen?
Code: Alles auswählen.
method EXCEL_SYNC~EXCEL_SYNC_IN.
data: rows type EXCEL_ROW_TAB.
data: wa_rows type EXCEL_ROWS.
data: it_test_excel type table of test_excel.
data: wa_test_excel LIKE LINE OF it_test_excel.
loop at input-EXCEL-rows into wa_rows.
wa_test_excel-feld1 = wa_rows-field1.
wa_test_excel-feld2 = wa_rows-field2.
....
wa_test_excel-feld10 = wa_rows-field10.
APPEND wa_test_excel to it_test_excel.
ENDLOOP.
INSERT zbc_test_excel FROM TABLE it_test_excel.
endmethod.Das alles funktioniert auch.
Nun möchte ich aber eine Validierung, um zu prüfen ob für das betroffene Feld 1-10 eine Suchhilfe in SAP hinterlegt is und falls ja, der von Excel eingelesene Wert der Suchhilfe entspricht...wenn ja, wird er, wie bisher im Code, übernommen, ansonsten nicht.
Wie kann ich das lösen?
Zuletzt geändert von simethandreas am 09.10.2009 10:05, insgesamt 1-mal geändert.
gesponsert ⓘ
Stellenangebote auf ABAPforum.com schalten
kostenfrei für Ausbildungsberufe und Werksstudenten
kostenfrei für Ausbildungsberufe und Werksstudenten
Beitrag
von simethandreas (ForumUser / 26 / 0 /
0
)
»
Und wie wende ich das an?
Bin in ABAP noch der totale Anfänger
Bin in ABAP noch der totale Anfänger
Du solltest ja wissen, was Du in den einzelnen Feldern an Werten erwartest, z.B. ein Werk, eine Materialnummer, etc.
Diese Quick and Dirty-Lösung unten geht jetzt mal davon aus, daß wir das alles "schön hart verdrahtet" machen.
Und so weiter, jetzt kann man das noch kapseln und schön machen, auf jeden Falls hast Du damit eine zuverlässige und dynamische Eingabeprüfung.
Diese Quick and Dirty-Lösung unten geht jetzt mal davon aus, daß wir das alles "schön hart verdrahtet" machen.
Code: Alles auswählen.
loop at input-MT_OSRBG_BC_SOA_EXCEL-rows into wa_rows.
* Prüfung 1. Feld (z.B. ein Werk)
CALL FUNCTION 'DDUT_INPUT_CHECK'
EXPORTING
tabname = 'MARC'
fieldname = 'WERKS'
calling_program = repid "Weiß nicht, ob man das braucht
strucname = .... "Weiß ich ebenfalls nicht
value = wa_rows-Feld1
IMPORTING
msgid = wa_output-msgid
msgty = wa_output-msgty
msgno = wa_output-msgno
msgv1 = wa_output-msgv1
msgv2 = wa_output-msgv2
msgv3 = wa_output-msgv3
msgv4 = wa_output-msgv4
EXCEPTIONS
OTHERS = 4.
IF sy-subrc <> 0 OR NOT wa_output-msgid IS INITIAL.
* Nicht übernehmen
ELSE.
wa_test_excel-feld1 = wa_rows-field1.
ENDIF.
* 2. Feld Kundennummer
CALL FUNCTION 'DDUT_INPUT_CHECK'
EXPORTING
tabname = 'KNA1'
fieldname = 'KUNNR'
value = wa_rows-Feld2
IMPORTING
msgid = wa_output-msgid
msgty = wa_output-msgty
msgno = wa_output-msgno
msgv1 = wa_output-msgv1
msgv2 = wa_output-msgv2
msgv3 = wa_output-msgv3
msgv4 = wa_output-msgv4
EXCEPTIONS
OTHERS = 4.
IF sy-subrc <> 0 OR NOT wa_output-msgid IS INITIAL.
* Nicht übernehmen
ELSE.
wa_test_excel-feld2 = wa_rows-field2.
ENDIF.
Beitrag
von simethandreas (ForumUser / 26 / 0 /
0
)
»
was ist das feld "wa_output.." ?
das hab ich ja gar nicht
das hab ich ja gar nicht
Ups, stimmt, typischer Copy&Paste-Fehler. Das sind einfach Variablen, die die Export-Message-Variablen entgegennehmen. Kannst Du eventuell bis auf die MSGID weglassen, da ich die nach dem FB noch abfragen würde.simethandreas hat geschrieben:was ist das feld "wa_output.." ?
das hab ich ja gar nicht
Beitrag
von simethandreas (ForumUser / 26 / 0 /
0
)
»
und wie muss ich das "wa_output-msgid " mit data anlegen?
Beitrag
von simethandreas (ForumUser / 26 / 0 /
0
)
»
also so?
dann kommt:
the data object "gv_MSGID" has no structure and therefore no component
Code: Alles auswählen.
DATA: GV_MSGID TYPE sy-msgid.
....
....
* Prüfung 1. Feld
CALL FUNCTION 'DDUT_INPUT_CHECK'
EXPORTING
tabname = 'zbc_test_excel'
fieldname = 'wa_test_excel_feld1'
value = wa_rows-field1
IMPORTING
msgid = GV_MSGID-msgid
EXCEPTIONS
OTHERS = 4.
IF sy-subrc <> 0 OR NOT GV_MSGID-msgid IS INITIAL.
"nicht übernehmen
ELSE.
wa_test_excel-feld1 = wa_rows-field1.
ENDIF.the data object "gv_MSGID" has no structure and therefore no component
Seite 1 von 1
Vergleichbare Themen
3
Antw.
Antw.
4833
Views
Views
Suchhilfe: Zwei Dynpro-Felder aus 1 Suchhilfe beschicken
von meinrad » 03.03.2006 15:24 • Verfasst in Dialogprogrammierung
von meinrad » 03.03.2006 15:24 • Verfasst in Dialogprogrammierung
4
Antw.
Antw.
3143
Views
Views
2
Antw.
Antw.
535
Views
Views
Benutzereingabe bei Sichern überprüfen
von jamyr » 28.08.2019 14:54 • Verfasst in ABAP® für Anfänger
von jamyr » 28.08.2019 14:54 • Verfasst in ABAP® für Anfänger
3
Antw.
Antw.
2777
Views
Views
1
Antw.
Antw.
164
Views
Views
Filenamen auf Umlaute oä überprüfen
von Micha_ela » 29.10.2024 19:21 • Verfasst in ABAP® für Anfänger
von Micha_ela » 29.10.2024 19:21 • Verfasst in ABAP® für Anfänger
Frage die ABAP Experten
Über diesen Beitrag
Unterstütze die Community und teile den Beitrag für mehr Leser und Austausch
Aktuelle Forenbeiträge
Nach Transport von Stellen über RHMOVE30 nur Planvariante "nie verwenden"
vor 2 Stunden von DeathAndPain 4 / 517
vor 2 Stunden von DeathAndPain 4 / 517
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
Nach Transport von Stellen über RHMOVE30 nur Planvariante "nie verwenden"
vor 2 Stunden von DeathAndPain 4 / 517
vor 2 Stunden von DeathAndPain 4 / 517