PM Meldung Langtext

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        =
  .