topic Re: BAPI_ALM_NOTIF_CREATE - Transaction code IW21 in Application Development and Automation Discussions

BAPI_ALM_NOTIF_CREATE - Transaction code IW21

Former Member — Wed, 28 Mar 2007 01:53:11 GMT

Hi to all.

I am using bapi BAPI_ALM_NOTIF_CREATE to create a notification, transaction code IW21. When i execute the abap program attached below, error IM 529 ("Indicate sort number") appears. Somebody can tell me what is wrong?

Thanks in advance.

REPORT ycml_test_002.

DATA:

gs_notif_type TYPE bapi2080-notif_type,

gs_notifheader TYPE bapi2080_nothdri,

gs_notifheader_export TYPE bapi2080_nothdre,

gt_notitem TYPE TABLE OF bapi2080_notitemi WITH HEADER LINE,

gt_notifcaus TYPE TABLE OF bapi2080_notcausi WITH HEADER LINE,

gt_longtexts TYPE TABLE OF bapi2080_notfulltxti WITH HEADER LINE,

gt_return TYPE TABLE OF bapiret2 WITH HEADER LINE,

g_ind TYPE c.

START-OF-SELECTION.

tipo de notificacion

gs_notif_type = 'M2'.

cabecera de notificacion

gs_notifheader-refobjecttype = ''.

gs_notifheader-short_text = 'FALLA DE MOTOR PRINCIPAL'.

gs_notifheader-funct_loc = 'JRL-1000-LNP-N132-LVV'.

gs_notifheader-equipment = '10000168'.

gs_notifheader-assembly = '110011'.

gs_notifheader-reportedby = 'RROJASC'.

gs_notifheader-breakdown = 'X'.

gs_notifheader-strmlfndate = '20070327'.

gs_notifheader-strmlfntime = '100200'.

gs_notifheader-endmlfndate = '20070327'.

gs_notifheader-endmlfntime = '100300'.

posicion de notificacion

gt_notitem-item_key = '0001'.

gt_notitem-item_sort_no = '0000'.

APPEND gt_notitem.

posicion de notificacion

gt_notitem-item_key = '0002'.

gt_notitem-item_sort_no = '0001'.

gt_notitem-dl_codegrp = 'P.LAVBOT'. " parte objeto

gt_notitem-dl_code = '0010'.

gt_notitem-d_codegrp = 'S.LAVBOT'. " sint. averia

gt_notitem-d_codegrp = '0010'.

gt_notitem-descript = 'SINTOMA DE AVERIA'.

APPEND gt_notitem.

posicion de causa

gt_notifcaus-cause_key = '0002'.

gt_notifcaus-cause_sort_no = '0001'.

gt_notifcaus-item_key = '0002'.

gt_notifcaus-cause_codegrp = 'C.LAVBOT'.

gt_notifcaus-cause_code = '0010'.

gt_notifcaus-causetext = 'CAUSAS PRUEBA'.

APPEND gt_notifcaus.

texto de cabecera

gt_longtexts-objtype = 'QMEL'.

gt_longtexts-objkey = '0001'.

gt_longtexts-format_col = '*'.

gt_longtexts-text_line = 'Linea 1 Prueba de Texto'.

APPEND gt_longtexts.

texto de notificacion

gt_longtexts-objtype = 'QMFE'.

gt_longtexts-objkey = '0002'.

gt_longtexts-format_col = '*'.

gt_longtexts-text_line = 'Linea 1A Prueba de Texto'.

APPEND gt_longtexts.

texto de causa

gt_longtexts-objtype = 'QMUR'.

gt_longtexts-objkey = '0003'.

gt_longtexts-format_col = '*'.

gt_longtexts-text_line = 'Linea 1B Prueba de Texto'.

APPEND gt_longtexts.

CALL FUNCTION 'BAPI_ALM_NOTIF_CREATE'

EXPORTING

notif_type = gs_notif_type

notifheader = gs_notifheader

IMPORTING

notifheader_export = gs_notifheader_export

TABLES

notitem = gt_notitem

notifcaus = gt_notifcaus

longtexts = gt_longtexts

return = gt_return.

LOOP AT gt_return WHERE type EQ 'E'.

WRITE: gt_return-message.

g_ind = 'X'.

ENDLOOP.

CHECK g_ind IS INITIAL.

CALL FUNCTION 'BAPI_ALM_NOTIF_SAVE'

EXPORTING

number = gs_notifheader_export-notif_no

TABLES

return = gt_return.

WRITE: 'Aviso No.', sy-msgv1.

CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'

IMPORTING

return = gt_return.

Re: BAPI_ALM_NOTIF_CREATE - Transaction code IW21

Former Member — Wed, 28 Mar 2007 21:31:34 GMT

Following code solve this question:

REPORT ycml_test_002.

DATA: gs_notif_type TYPE bapi2080-notif_type,

gs_notifheader TYPE bapi2080_nothdri,

gs_notifheader_export TYPE bapi2080_nothdre,

gt_notitem TYPE TABLE OF bapi2080_notitemi WITH HEADER LINE,

gt_notifcaus TYPE TABLE OF bapi2080_notcausi WITH HEADER LINE,

gt_longtexts TYPE TABLE OF bapi2080_notfulltxti WITH HEADER LINE,

gt_return TYPE TABLE OF bapiret2 WITH HEADER LINE,

g_ind TYPE c.

START-OF-SELECTION.

tipo de notificacion

gs_notif_type = 'M2'.

cabecera de notificacion - QMEL

gs_notifheader-refobjecttype = ''.

gs_notifheader-short_text = 'FALLA DE MOTOR PRINCIPAL'.

gs_notifheader-funct_loc = 'JRL-1000-LNP-N132-LVV'.

gs_notifheader-equipment = '10000168'.

gs_notifheader-assembly = '110011'.

gs_notifheader-reportedby = 'RROJASC'.

gs_notifheader-breakdown = 'X'.

gs_notifheader-strmlfndate = '20070327'.

gs_notifheader-strmlfntime = '100200'.

gs_notifheader-endmlfndate = '20070327'.

gs_notifheader-endmlfntime = '100300'.

gs_notifheader-code_group = ''.

gs_notifheader-coding = ''.

posicion de notificacion - QMFE
gt_notitem-item_key = '0001'.

gt_notitem-item_sort_no = '0001'.

gt_notitem-dl_codegrp = 'P.LAVBOT'. " parte objeto

gt_notitem-dl_code = '0010'.

gt_notitem-d_codegrp = 'S.LAVBOT'. " sint. averia

gt_notitem-d_code = '0010'.

gt_notitem-descript = 'SINTOMA DE AVERIA'.

APPEND gt_notitem.

posicion de causa - QMUR
gt_notifcaus-cause_key = '0001'.

gt_notifcaus-cause_sort_no = '0001'.

gt_notifcaus-item_key = '0001'.

gt_notifcaus-cause_codegrp = 'C.LAVBOT'.

gt_notifcaus-cause_code = '0010'.

gt_notifcaus-causetext = 'CAUSAS PRUEBA'.

gt_notifcaus-item_sort_no = '0001'.

APPEND gt_notifcaus.

texto de cabecera

gt_longtexts-objtype = 'QMEL'.

gt_longtexts-objkey = '0001'.

gt_longtexts-format_col = '*'.

gt_longtexts-text_line = 'Linea 1 Prueba de Texto'.

APPEND gt_longtexts.

texto de notificacion

gt_longtexts-objtype = 'QMFE'.

gt_longtexts-objkey = '0001'.

gt_longtexts-format_col = '*'.

gt_longtexts-text_line = 'Linea 1A Prueba de Texto'.

APPEND gt_longtexts.

texto de causa

gt_longtexts-objtype = 'QMUR'.

gt_longtexts-objkey = '00010001'.

gt_longtexts-format_col = '*'.

gt_longtexts-text_line = 'Linea 1B Prueba de Texto'.

APPEND gt_longtexts.

CALL FUNCTION 'BAPI_ALM_NOTIF_CREATE'

EXPORTING

notif_type = gs_notif_type

notifheader = gs_notifheader

task_determination = 'X'

IMPORTING

notifheader_export = gs_notifheader_export

TABLES

notitem = gt_notitem

notifcaus = gt_notifcaus

longtexts = gt_longtexts

return = gt_return.

LOOP AT gt_return WHERE type EQ 'E'.

WRITE: gt_return-message.

g_ind = 'X'.

ENDLOOP.

CHECK g_ind IS INITIAL.

CLEAR: gt_return.

REFRESH: gt_return.

CALL FUNCTION 'BAPI_ALM_NOTIF_SAVE'

EXPORTING

number = gs_notifheader_export-notif_no

TABLES

return = gt_return.

LOOP AT gt_return.

WRITE: 'Aviso No.', sy-msgv1.

ENDLOOP.

CLEAR: gt_return.

REFRESH: gt_return.

CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'

IMPORTING

return = gt_return.

LOOP AT gt_return.
WRITE: gt_return-message.
ENDLOOP.