Notification creation using imrc0001 exit(ik11) but unble to get the status

Question

Hai to all
i had used the exit IMRC0001 for the creation of notification if reading exceeds the upper range using fm
BAPI_ALM_NOTIF_CREATE
BAPI_ALM_NOTIF_SAVE
It is updated in table VIQMEL
but when i open tcode iw22 is giving me a error message
Object does not exist (status management)
Message no. IM258
Diagnosis
This refers to an error in central status management.
Task status
The central status management connection at task level will only be supported from Release 3.0.
For this reason, no task status is available for statuses created before changing to Release 3.0, and status change is therefore also not possible.
Procedure
In the case of task statuses of notifications in releases prior to 3.0:
When you save a notification you can create a status for the tasks.
In the case of notification or task statuses for notifications from Release 3.0:
Please refer to your system administrator.
i had applied the OSS NOTE 437878
then also iam unale to update the staus directly
when iam running the note program ZPMNOT_STATUS01 separetly with the created notification it is upadting the status.
how to update the status automatically
thanking you.

Answer 1

HI,
See If this helps you...
DATA: it_bapi2080_nothdri LIKE bapi2080_nothdri,
it_bapi2080_notfulltxti LIKE STANDARD TABLE OF
bapi2080_notfulltxti WITH HEADER LINE,
it_bapi2080_notitemi LIKE STANDARD TABLE OF
bapi2080_notitemi WITH HEADER LINE,
it_bapi2080_notcausi LIKE STANDARD TABLE OF
bapi2080_notcausi WITH HEADER LINE,
it_bapi2080_notactvi LIKE STANDARD TABLE OF
bapi2080_notactvi WITH HEADER LINE,
it_bapi2080_nottaski LIKE STANDARD TABLE OF
bapi2080_nottaski WITH HEADER LINE,
it_bapi2080_notpartnri LIKE STANDARD TABLE OF
bapi2080_notpartnri WITH HEADER LINE,
it_bapi2080_notkeye LIKE STANDARD TABLE OF
bapi2080_notkeye WITH HEADER LINE.
ADD NOTIFICATION *******************
IF e_subrc = 0 AND e_msgty NE 'E'.
CLEAR p_qmnum.
SELECT SINGLE qmnum
INTO p_qmnum
FROM afih
WHERE aufnr = s_e1orhdr-aufnr.
IF p_qmnum NE space.
CLEAR it_bapi2080_notfulltxti.
REFRESH it_bapi2080_notfulltxti.
CLEAR it_bapi2080_notcausi.
REFRESH it_bapi2080_notcausi.
CLEAR it_bapi2080_notactvi.
REFRESH it_bapi2080_notactvi.
CLEAR it_bapi2080_notitemi.
REFRESH it_bapi2080_notitemi.
IF s_zin_tcs_servorder-fegrp NE space.
it_bapi2080_notitemi-item_key = '0010'.
it_bapi2080_notitemi-item_sort_no = '0010'.
APPEND it_bapi2080_notitemi.
it_bapi2080_notcausi-cause_key = '0010'.
it_bapi2080_notcausi-cause_sort_no = '0010'.
it_bapi2080_notcausi-item_key = '0010'.
it_bapi2080_notcausi-causetext = s_zin_tcs_servorder-ecomm.
it_bapi2080_notcausi-cause_codegrp = s_zin_tcs_servorder-fegrp.
it_bapi2080_notcausi-cause_code = s_zin_tcs_servorder-fecod.
it_bapi2080_notcausi-item_sort_no = '0010'.
APPEND it_bapi2080_notcausi.
it_bapi2080_notactvi-act_key = '0010'.
it_bapi2080_notactvi-act_sort_no = '0010'.
it_bapi2080_notactvi-acttext = s_zin_tcs_servorder-comnt.
it_bapi2080_notactvi-act_codegrp = s_zin_tcs_servorder-mngrp.
it_bapi2080_notactvi-act_code = s_zin_tcs_servorder-mncod.
it_bapi2080_notactvi-item_sort_no = '0010'.
APPEND it_bapi2080_notactvi.
CALL FUNCTION 'BAPI_ALM_NOTIF_DATA_ADD'
EXPORTING
number = p_qmnum
orderid = s_e1orhdr-aufnr
TABLES
notitem = it_bapi2080_notitemi[]
notifcaus = it_bapi2080_notcausi[]
notifactv = it_bapi2080_notactvi[]
return = it_bapiret2.
PERFORM error_check.
CALL FUNCTION 'BAPI_ALM_NOTIF_SAVE'
EXPORTING
number = p_qmnum
TABLES
return = it_bapiret2.
PERFORM error_check.
PERFORM bapi_commit.
ENDIF.
ENDIF.
ENDIF.
NOTIFICATION OVER *************************