Developer Tips

IBM i SQL Tips

1. Check Object Record Locks

   SELECT MEMBER_LOCK_TYPE,LOCK_STATE,LOCK_SCOPE,JOB_NAME,
          SUBSTR(JOB_NAME,8,LOCATE_IN_STRING(JOB_NAME,'/',8)-8) AS "User"
           FROM QSYS2.OBJECT_LOCK_INFO
           WHERE SYSTEM_OBJECT_SCHEMA = 'LIBRARY'
             AND SYSTEM_OBJECT_NAME = 'TABLE'
             AND OBJECT_TYPE = '*FILE'
   

   ---

2. Run a Command via SQL

                                                  
   call qsys2.qcmdexc ('dspjob')                       
   call qcmdexc ('dltf qtemp/file')                    
   call qcmdexc ('rmvlnk ''home//file.txt''')    
   

   ---

3. Environment Variables

   *SYS Environment Variables

                                                             
    SELECT ENVIRONMENT_VARIABLE_NAME, ENVIRONMENT_VARIABLE_VALUE  
        FROM QSYS2.ENVIRONMENT_VARIABLE_INFO                      
        WHERE ENVIRONMENT_VARIABLE_TYPE = 'SYSTEM'                
   

   *JOB Environment Variables

                                                             
    SELECT ENVIRONMENT_VARIABLE_NAME, ENVIRONMENT_VARIABLE_VALUE  
        FROM QSYS2.ENVIRONMENT_VARIABLE_INFO                      
        WHERE ENVIRONMENT_VARIABLE_TYPE = 'JOB'                   
   

   ---