Avez-vous déjà uti­li­ser la vue QSYS2.OBJECT_LOCK_INFO ?

Bon­jour,

Après quelques recherches, voi­ci une des uti­li­sa­tions faites :

  Select job_name 
    From QSYS2.OBJECT_LOCK_INFO 
   Where object_name = 'BNRIDP' 
     And object_schema = 'BFBASE' 
     And Object_type = '*FILE'
Group by job_name       
;

Seule­ment les per­for­mances sont mau­vaises, il faut attendre, dans l’u­sage futur d’un inter­ac­tif, c’est trop long.

Un autre usage par table UDTF :

SELECT *
  FROM TABLE(QSYS2.OBJECT_LOCK_INFO(
  LIBRARY_NAME=>'BFBASE',
  OBJECT_NAME=>'',
  OBJECT_TYPE=>'*FILE',
  IASP_NUMBER=>0)) X
;       

donne un résul­tat plus rapide.