QSYS2.RECORD_LOCK_INFO

À quoi ça sert

Cette vue répond à la question classique : qui verrouille quel enregistrement ? Pour chaque verrou, elle donne la table et son membre, le numéro d'enregistrement relatif (RELATIVE_RECORD_NUMBER), l'état, le statut et la portée du verrou, ainsi que le travail concerné (JOB_NAME, JOB_USER, JOB_NUMBER) et son unité d'exécution.

Elle accepte les paramètres LIBRARY_NAME, FILE_NAME, MEMBER_NAME et IASP_NUMBER, qui limitent la recherche à un fichier plutôt que d'énumérer tout le système. Elle remplace l'enchaînement de la commande WRKOBJLCK puis de l'option sur les enregistrements.

Le gain du SQL est la jointure : on peut rapprocher le travail verrouillant de QSYS2.GET_JOB_INFO pour afficher l'instruction SQL en cours et l'adresse IP du client, comme dans l'exemple d'IBM.

Résultat réel sur un IBM i 7.5

Ce que nous avons exécuté :

SELECT * FROM QSYS2.RECORD_LOCK_INFO

Pas de résultat : la vue parcourt tout le système et n'a pas répondu dans le délai que nous nous fixons ; aucun verrou d'enregistrement n'était actif.

L'exemple d'IBM

Rechercher les verrous d'enregistrements posés sur la table TOYSTORE/SALES.

-- Description: Find any record locks over the TOYSTORE/SALES table 
 WITH LOCK_CONFLICT_TABLE ( 
  table_name, lock_state, rrn, q_job_name) AS ( 
 SELECT table_name, lock_state, rrn, job_name 
 FROM QSYS2.RECORD_LOCK_INFO where 
  table_schema = 'TOYSTORE' and 
  table_name = 'SALES' 
 ) SELECT table_name, lock_state, rrn, 
          q_job_name, V_SQL_STATEMENT_TEXT, 
          V_CLIENT_IP_ADDRESS, B.* 
     FROM LOCK_CONFLICT_TABLE, TABLE(QSYS2.GET_JOB_INFO(q_job_name)) B;

Paramètres

Colonnes renvoyées (16)