Con la función estándar de SAP ENQUE_READ podemos obtener las entradas de bloqueo en el sistema, podremos filtrar por usuario u obtener todas las entradas de bloqueo del sistema filtrando únicamente por el mandante.
Parámetros de Entrada
- GCLIENT: Identificador de Mandante
- GNAME: Bloqueo elemental de entrada en tabla de bloqueo
- GARG: Campos clave de entrada en tabla de bloqueo
- GUNAME: Nombre de usuario en una entrada de bloqueo
Parámetros de Salida
- NUMBER: Número de entradas de bloqueo
- SUBRC: Si es igual a 0 la búsqueda es correcta.
- ENQ: Tabla con una lista con todas las entradas de bloqueo localizadas según el filtrado de la función que trae los siguientes campos:
- GNAME: Nombre de la tabla
- GARG: Campo clave de entrada en tabla de bloqueo
- GMODE: Modo de bloqueo
- GUSR: Titular de entrada de bloqueo
- GUSRVB: Titular bloqueo ID
- GUSE: Contador acumulación de entrada en tabla bloqueo/diálogo
- GUSEVB: Contador acumulación entrada en tabla bloqueo/tarea actual.
- GOBJ: Nombre objeto bloqueo de entrada en tabla bloqueo
- GCLIENT: Mandante en la entrada enqueue
- GUNAME: Nombre de usuario en una entrada de bloqueo
- GTARG: Argumento entrada en tab.bloqueo(campos clave tabla)
- GTCODE: Código transacción en entrada en tabla bloqueo
- GBCKTYPE: Indicador de grabación de una entrada de bloqueo
- GTHOST: Nombre de máquina dentro de ID titular de bloqueo
- GTWP: Número proceso trabajo dentro de ID titular de bloqueo
- GTSYSNR: Número sistema SAP dentro de ID titular de bloqueo
- GTDATE: Fecha dentro de ID de titular de enqueue
- GTTIME: Hora dentro de ID titular de bloqueo
- GTUSEC: Hora/parte en microsegundos dentro de ID titular de bloqueo
- GTMARK: Indicador de marcado de entrada en tabla bloqueo
- GUSETXT: Contador acumulación de entrada en tabla bloqueo/diálogo
- GUSEVBT: Contador acumulación entrada en tabla bloqueo/tarea actual.
Función
DATA: lv_gname TYPE EQEGRANAME, lv_garg TYPE EQEGRAARG, lv_number TYPE SYTABIX, lv_subrc TYPE SYSUBRC, li_enq TYPE STANDARD TABLE OF SEQG3. CALL FUNCTION 'ENQUE_READ' EXPORTING GCLIENT = SY-MANDT GNAME = lv_gname GARG = lv_garg GUNAME = SY-UNAME IMPORTING NUMBER = lv_number SUBRC = lv_subrc TABLES enq = li_enq. IF sy-subrc = 0. ENDIF.
Para ver mas funciones de SAP pulse en el siguiente enlace: Listado de funciones
Buen aporte.