0 Replies Latest reply: Mar 18, 2013 10:39 AM by Palak Behal RSS

While calling FM ISU_S_WORKLIST_INSTALL, I am getting Dump MESSAGE_TYPE_X in BUF_IL_GET_SAVE_DATA

Palak Behal
Currently Being Moderated

Hi All,

 

I am using FM ISU_S_WORKLIST_INSTALL for removal of installation and devices. This works fine in most of the cases but in production we have encountered a dump of MESSAGE_TYPE_X in BUF_IL_GET_SAVE_DATA . The dump happens in line 57 of include LITOBBUFILF40. But as it happens very rarely and in production I am not able to find the reason for that. Though, I think it is because of data locking happening somewhere because of which data of buffer table above gets deleted.

 

I am attaching my code for your understanding

*** end of change by pbeh-ibm (dump handling)
   CALL FUNCTION 'ISU_S_WORKLIST_INSTALL_PROVIDE'
     EXPORTING
       X_ANLAGE         = WA_REG30-ANLAGE          " Installation
       X_EADAT          = P_BEZDT                  " Activity Date
       X_GERAETALT      = WA_REG30-GERAETALT       " Serial Number
       X_SPARTEA        = P_SPARTE
*      x_action         = '05'                     " Operation Removal
       X_ACTION         = '02'                    "  Removal
       X_UPD_ONLINE     = C_MARKED " Online update 'X'
       X_NO_DIALOG      = C_MARKED " No dialog required
       X_NO_MR_REQUIRED = C_MARKED " No meter readings considered
     IMPORTING
       Y_OBJ            = WA_OBJ
       Y_AUTO           = WA_AUTO " System Data
     EXCEPTIONS
       NOT_FOUND        = 1
       FOREIGN_LOCK     = 2
       INVALID          = 3
       INTERNAL_ERROR   = 4
       NOT_QUALIFIED    = 5
       INPUT_ERROR      = 6
       SYSTEM_ERROR     = 7
       NOT_CUSTOMIZED   = 8
       OTHERS          = 9.

   IF SY-SUBRC NE 0.
     MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
     WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4 INTO IT_MESSAGES-TEXT_MSG.
     IT_MESSAGES-NOTIFICATION = WA_QMEL-QMNUM.
     IT_MESSAGES-ICON = ICON_RED_LIGHT.
     APPEND IT_MESSAGES.
     CLEAR P_OK.
   ENDIF.

 

     WA_AUTO-ZWSTAND = C_MARKED.
     WA_OBJ-AUTO-OKCODE = WA_AUTO-OKCODE = 'SAVE'.

* Save the data to the system
     WA_AUTO-OKCODE = C_VALUE_SAVE.


CALL FUNCTION 'ISU_S_WORKLIST_INSTALL'
       EXPORTING
         X_ACTION       = '02'                    " Operation Removal
         X_UPD_ONLINE   = C_MARKED
         X_NO_DIALOG    = C_MARKED
       IMPORTING
         Y_DB_UPDATE    = DB_UPDATE                " Success Indicator
       CHANGING
         XY_OBJ         = WA_OBJ
         XY_AUTO        = WA_AUTO                  " Device Data
       EXCEPTIONS
         NOT_FOUND      = 1
         FOREIGN_LOCK   = 2
         INVALID        = 3
         INTERNAL_ERROR = 4
         NOT_QUALIFIED  = 5
         INPUT_ERROR    = 6
         SYSTEM_ERROR   = 7
         NOT_CUSTOMIZED = 8
         OTHERS        = 9.

     IF SY-SUBRC NE 0.
       MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
             WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4
             INTO IT_MESSAGES-TEXT_MSG.
       IT_MESSAGES-NOTIFICATION = WA_QMEL-QMNUM.
       IT_MESSAGES-ICON = ICON_RED_LIGHT.
       APPEND IT_MESSAGES.
       CLEAR P_OK.
Endif.

 

 

 

 

Please help me solving this issue.

 

Actions