Belegart von IDOC in UserExit EXIT_SAPLF050_006 ändern Thema ist als GELÖST markiert
3 Beiträge
•
Seite 1 von 1
3 Beiträge
Seite 1 von 1
Hallo zusammen,
ich will aus dem UserExit EXIT_SAPLF050_006 gerne die Belegart der verarbeiteten IDOC´s überprüfen und ggf. ändern. Ich habe schon diverse FuBa´s ausprobiert aber hatte noch kein Erfolg. Ich hab Zugriff auf die einzelnen Segmente der IDOC´s, aber die Belegart versteckt sich im Feld sdata und ist dort ziemlich unhandlich hinterlegt. Kann ich irgendwie geschickt auf die sdata zugreifen um die Belegart zu ändern?
Vielen Dank im Voraus
Jan
ich will aus dem UserExit EXIT_SAPLF050_006 gerne die Belegart der verarbeiteten IDOC´s überprüfen und ggf. ändern. Ich habe schon diverse FuBa´s ausprobiert aber hatte noch kein Erfolg. Ich hab Zugriff auf die einzelnen Segmente der IDOC´s, aber die Belegart versteckt sich im Feld sdata und ist dort ziemlich unhandlich hinterlegt. Kann ich irgendwie geschickt auf die sdata zugreifen um die Belegart zu ändern?
Vielen Dank im Voraus
Jan
gesponsert ⓘ
Stellenangebote auf ABAPforum.com schalten
kostenfrei für Ausbildungsberufe und Werksstudenten
kostenfrei für Ausbildungsberufe und Werksstudenten
Hallo Jan,
du müsstest dann ja wissen, in welchem genauen Segement du das ändern willst. Du kannst z.B. mit einem typisierten Feldsymbol die Daten auslesen/manipulieren. Beispiel:
du müsstest dann ja wissen, in welchem genauen Segement du das ändern willst. Du kannst z.B. mit einem typisierten Feldsymbol die Daten auslesen/manipulieren. Beispiel:
Code: Alles auswählen.
FIELD-SYMBOLS: <fs> TYPE e1edl24. " Beispiel-Segment
LOOP AT idoc_data ASSIGNING FIELD-SYMBOL(<idoc>).
IF <idoc>-segnam = 'E1EDL24'.
ASSIGN <idoc>-sdata TO <fs> CASTING.
IF sy-subrc = 0.
<fs>-bsart = 'XXX'.
ENDIF.
ENDIF.
ENDLOOP.
Danke für deine Hilfe, mit deinem Code hat die Änderung geklappt.qyurryus hat geschrieben: ↑07.10.2021 13:57Hallo Jan,
du müsstest dann ja wissen, in welchem genauen Segement du das ändern willst. Du kannst z.B. mit einem typisierten Feldsymbol die Daten auslesen/manipulieren. Beispiel:
Code: Alles auswählen.
FIELD-SYMBOLS: <fs> TYPE e1edl24. " Beispiel-Segment LOOP AT idoc_data ASSIGNING FIELD-SYMBOL(<idoc>). IF <idoc>-segnam = 'E1EDL24'. ASSIGN <idoc>-sdata TO <fs> CASTING. IF sy-subrc = 0. <fs>-bsart = 'XXX'. ENDIF. ENDIF. ENDLOOP.
Damit die Änderung aber nach der Verarbeitung des IDOC´s gespeichert bleibt, musste ich folgende FuBa´s zusätzliche benutzen:
Code: Alles auswählen.
CALL FUNCTION 'EDI_DOCUMENT_OPEN_FOR_EDIT'
EXPORTING
document_number = idoc_docnum
TABLES
idoc_data = idoc_data.
FIELD-SYMBOLS: <fs> TYPE e1fikpf.
LOOP AT idoc_data ASSIGNING FIELD-SYMBOL(<idoc>).
IF <idoc>-segnam = 'E1FIKPF'.
ASSIGN <idoc>-sdata TO <fs> CASTING.
IF sy-subrc = 0.
IF <fs>-bukrs = '0103' OR <fs>-bukrs = '0307'.
<fs>-blart = 'SZ'.
ELSE.
<fs>-bukrs = 'SY'.
ENDIF.
ENDIF.
ENDIF.
ENDLOOP.
CALL FUNCTION 'EDI_CHANGE_DATA_SEGMENTS'
TABLES
idoc_changed_data_range = idoc_data.
CALL FUNCTION 'EDI_DOCUMENT_CLOSE_EDIT'
EXPORTING
DOCUMENT_NUMBER = idoc_docnum
DO_COMMIT = 'X'
DO_UPDATE = 'X'
WRITE_ALL_STATUS = 'X'.
Seite 1 von 1
Frage die ABAP Experten
Über diesen Beitrag
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.
Vergleichbare Themen
Aktuelle Forenbeiträge
Unbeantwortete Forenbeiträge
Custom logic - Feld wieder initialisieren (BADI CRMS4_SERV_CUST_H_MODIFY)
letzen Monat von JanR 1 / 288611
letzen Monat von JanR 1 / 288611