Regarding Function Module for Locking ( enque)

Question

Hi,
I am facing a Problem that is when iam running Call transaction one popup is coming because some other user currently editing that Tcode at that time i need to lock tcode using enque specially for table . If suppose some other user editing at that time it will shoe that popup and it will exit from their with out doing any other process For that i need Function module for Lock and Delock.
thanks in advance,
murali krishna.

Answer 1

So in this example, I am doing a loop and check for a lock, if I don't get one, I wait for 5 seconds, this loop continues untill 30 seconds, no lock then it quits and gives message.
report zrich_0001.
data: counter type i.
parameters: p_equnr type equi-equnr.
start-of-selection.
  clear counter.
  do.
Exhausted,  no luch in getting a lock, get of of DO loop.
    if counter > 6.
      sy-subrc = 1.
      exit.
    endif.
Try for lock
    call function 'ENQUEUE_EIEQUI'
      exporting
        mode_equi            = 'E'
        mandt                = sy-mandt
        equnr                = p_equnr
   _wait                = 'X'
      exceptions
        foreign_lock         = 1
        system_failure       = 2
        others               = 3.
Got a lock, get out of DO loop.
   if sy-subrc  = 0.
      exit.
    endif.
Still here?  Then wait another 5 seconds
    wait up to 5 seconds.
    counter = counter  + 1.
  enddo.
Report status
  case sy-subrc.
    when  0.
      message s001(00) with 'Lock could not be established'.
    when  1.
      message i001(00) with 'Lock could not be established'.
  endcase.
Regards,
rewards point