Всем привет.
Подскажите, как определить кол-во одновременно запущенных вариантов одной программы.

нужно, чтобы ограничить это кол-во.

к примеру, чтобы при запуске отчета было сообщение "Уже запущено n отчетов, подождите".

может в 'ENQUEUE_ESINDX' можно ограничить число запусков?

была такая тема.в поиск

А там как раз такой выход и предлагался, через блокировки.

решил так
*"----------------------------------------------------------------------
*"*"Локальный интерфейс:
*" IMPORTING
*" REFERENCE(N) TYPE I
*" EXPORTING
*" REFERENCE(COUNT) TYPE I
*"----------------------------------------------------------------------
data list1 like table of UINFO with header line.
data list2 like table of UINFO2 with header line.
count = 0.

CALL FUNCTION 'TH_USER_LIST'
tables LIST = list1.

loop at list1 where tcode = sy-tcode.

call function 'TH_LONG_USR_INFO'
exporting
USER = list1-bname
tables USER_INFO = list2.
endloop.

sort list2 by user.
loop at list2 where tcode = sy-tcode.
count = count + 1.
endloop.

if count > n.
MESSAGE e888(sabapdocu) WITH 'Уже запущено ' count 'отчетов, подождите'.
endif.
ENDFUNCTION.

если не ошибаюсь ФМ TH_USER_LIST, даст только инфу о активных режимах пользователей
думаю лучше будет запустить TH_LONG_USR_INFO со значением '*'
т.е

а так же неплохо бы проверить и мандант...

ЗЫ: а если запустят в SE38?

юзеры не должны иметь прав на эту транзакцию, тем более в продуктиве.

Есть еще SA38 к сожалению приходится давать некоторым пользователя ее, но это... обычно вменяемые пользователи...