Raise Exception Runtime error

Question

Error analysis
A RAISE statement in the program "SAPLTHFB" raised the exception
condition "ALREADY_RUNNING".
Since the exception was not intercepted by a superior program
in the hierarchy, processing was terminated.
Short description of exception condition:
For detailed documentation of the exception condition, use
Transaction SE37 (Function Library). You can take the called
function module from the display of active calls.
How to correct the error
You may able to find an interim solution to the problem
in the SAP note system. If you have access to the note system yourself,
use the following search criteria:
"RAISE_EXCEPTION" C
"SAPLTHFB" or "LTHFBU09"
"TH_INIT_COLLECTOR_ARRAY"
or
"SAPLTHFB" "ALREADY_RUNNING"
or
"RSM13000 " "ALREADY_RUNNING"
Source code extract
000430     end_of_data = 1.
000440     end_of_vbcontext = 1.
000450     describe field func length func_len in character mode.
000460
000470
000480   * J.B. (6.3.00): collective runs must not run concurrent for
000490   * one function module
000500   *
000510   * el (23.11.01): add server group to enqueue argument to allow
000520   *                parallel collective runs in different server groups
000530   describe field enq_vbcontext length context_len in character mode.
000540   gran_list-gname = 'UPDCOLLRUN'.
000550   gran_list-gmode = 'E'.
000560   gran_list-garg  =  client.
000570   offset = 3.
000580   gran_list-garg+3(func_len)  =  func.
000590   add func_len to offset.
000600   gran_list-garg+offset(context_len) = enq_vbcontext.
000610   append gran_list.
000620
000630   call 'C_ENQUEUE'
000640        id 'OPCODE'           field '1'
000650        id 'ENQOBJ'           field 'UPDCOLLRUN'
000660        id 'GRANULES'         field gran_list-sys
000670        id 'DELAY_ON_REJECT'  field  ' '
000680        id 'USTP'             field  '2'
000690        id 'COLLISION_UNAME'  field user
000700        id 'COLLISION_OBJECT' field obj
000710        id 'SYNCHRON'         field 'X'.
000720   if sy-subrc <> 0.
  >     raise already_running. -
/* error occurs at this line-----*\
000740   endif.
000750
000760
000770   if vbcontext = '*'.
000780     call 'ThVBCall' id 'OPCODE' field get_server_names
000790                     id 'VBCONTEXT' field vbcontext.
000800   endif.
plz help me to understand this error

Answer 1

Simple, you cannot run collective runs in parallel...
Note 436094 - Short dump ALREADY_RUNNING
If the collective run is running in parallel on different clients read
Note 595671 - Collective run processing in several clients
Regards
Juan