Code: Alles auswählen.
DATA: notifheader TYPE bapi2080_nothdri.
DATA: notifgetdata TYPE bapi2080_nothdre.
DATA: BEGIN OF longtexts OCCURS 0.
INCLUDE STRUCTURE BAPI2080_NOTFULLTXTI.
DATA:END OF longtexts.
PARAMETERS: shorttxt TYPE c LENGTH 40."notifheader-SHORT_TEXT.
PARAMETERS: longtxt TYPE string.
notifheader-short_text = shorttxt.
longtexts-OBJTYPE = 'QMEL'.
longtexts-OBJKEY = '00000000'.
longtexts-TEXT_LINE = longtxt.
CALL FUNCTION 'BAPI_ALM_NOTIF_CREATE'
EXPORTING
* EXTERNAL_NUMBER =
notif_type = 'M2'
notifheader = notifheader
* TASK_DETERMINATION = ' '
* SENDER =
* ORDERID =
* IV_DONT_CHK_MANDATORY_PARTNER =
* NOTIFCATION_COPY =
* DOCUMENT_ASSIGN_COPY = ' '
IMPORTING
notifheader_export = notifgetdata
TABLES
* NOTITEM =
* NOTIFCAUS =
* NOTIFACTV =
* NOTIFTASK =
* NOTIFPARTNR =
longtexts = longtexts
* KEY_RELATIONSHIPS =
* RETURN =
.
CALL FUNCTION 'BAPI_ALM_NOTIF_SAVE'
EXPORTING
number = notifgetdata-notif_no
* TOGETHER_WITH_ORDER = ' '
* IMPORTING
* NOTIFHEADER =
* TABLES
* RETURN =
.
CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
EXPORTING
wait = ' '
* IMPORTING
* RETURN =
.
Code: Alles auswählen.
INSERT VALUE #( objtype = 'QMEL' objkey = '00000000'.
text_line = longtxt ) INTO TABLE longtexts.