Re: IW32 user status update

srilihitha

Use this code in include ZXQQMU20   (F/Exit EXIT_SAPMIWO0_020 user-exit QQMA0014)

DATA:i_stat  LIKE jstat OCCURS 0 WITH HEADER LINE,

      l_objnr TYPE j_objnr.

 

SELECT SINGLE objnr FROM aufk INTO l_objnr WHERE aufnr = i_viqmel-aufnr.

 

CALL FUNCTION 'STATUS_READ'

   EXPORTING

     objnr       = i_viqmel-objnr

     only_active = 'X'

   TABLES

     status      = i_stat.

 

LOOP AT i_stat.

   IF i_stat-stat = 'I0158'.

 

     CALL FUNCTION 'STATUS_CHANGE_EXTERN'

       EXPORTING

         objnr       = l_objnr

         user_status = 'E0004'

         set_inact   = ' '.

 

   ENDIF.

ENDLOOP.

NOTE

• All required inputs to be taken from the previous reply.
• Hope this is your expected solution.
• Please note that this thread went so long because you have not been clear since the initial query.
• Let not things be repeated which have been already explained in detail in the previous reply.
• Also expect quick feedback from you. It is seen that you respond very late to received replies.

BTW,The right Subject line for your query should be

"Order user-status update during IW52 Save"

Good luck

KJogeswaraRao