Commencez par créer un groupe de fonctions personnalisées, créez le module de fonction pour la vérification personnalisée, puis activez la vérification personnalisée.
Dans la case Table/Vue, entrez /WINSHTLQ/QREPRM, puis cliquez sur Gérer.
Cliquez sur Nouveau, et entrez les valeurs indiquées ci-dessous :
Cliquez sur Enregistrer, puis sur Quitter.
Ce code bloque l’accès à la table MACKV pour tous les utilisateurs de Automate Query.
FONCTION Z_Automate_CHECK_ACCESS.
*"----------------------------------------------------------------------
*"*"Local Interface:
*" IMPORTING
*" VALUE(TABLE) TYPE DD02L-TABNAME
*" EXPORTING
*" VALUE(ALLOWED) TYPE BOOLEAN
*" EXCEPTIONS
*" ERROR
*"----------------------------------------------------------------------
*Return access allowed ('X'=True or '-'=False) for current user
ALLOWED = ''. "Initialize
IF TABLE = 'MACKV'. "For any user
ALLOWED = '-'.
ELSE.
ALLOWED = 'X'.
ENDIF.
ENDFUNCTION.
*"----------------------------------------------------------------------
Vous pouvez aussi ajouter des appels de contrôle d'autorité pour vos propres objets d'autorisation dans les conditions pour l'utilisateur actif (champ système SY-UNAME).