==== SQL en Vrac ====

==== Extrait Date Time du TimeStamp ====
SELECT varChar_format(JOB_A00002,'yymmdd')                          
as DebDat, varChar_format(JOB_A00002,'hhmmss') as DebTim, job_A00002
 FROM TABLE(QSYS2.JOB_INFO())   

ou [[https://developer.ibm.com/articles/fun-with-dates-and-times/|DateTime en SQL]]

==== Existe F1, pas dans F2 ==== 
SELECT F1.ODOBNM , F1.ODOBTP FROM qtemp/hjt F1
left exception join
qtemp/hjx F2 on F1.ODOBNM = F2.ODOBNM

==== Existe F1 et (existe ou non) dans F2 ==== 
SELECT F1.ODOBNM , F1.ODOBTP FROM qtemp/hjt F1
left join	
qtemp/hjx F2 on F1.ODOBNM = F2.ODOBNM	

==== Existe F1 et ceux qui existent dans  F2 ==== 
SELECT F1.ODOBNM , F1.ODOBTP FROM qtemp/hjt F1
inner join	
qtemp/hjx F2 on F1.ODOBNM = F2.ODOBNM

==== Job actifs ====
SELECT  substr(JOB_NAME, 1, 6),\\
substr(job_name, 8, locate_in_string(job_name, '/', 8)-8),\\
SUBSTR(JOB_NAME,  LOCATE_IN_STRING(QSYS2.JOB_NAME,'/',-1)+1)\\
FROM SYSIBM.SYSDUMMY1


==== Liste des journaux actifs ====
SELECT JOURNAL_LIBRARY, JOURNAL_NAME, NUMBER_JOURNAL_RECEIVERS,
TOTAL_SIZE_JOURNAL_RECEIVERS
FROM QSYS2.JOURNAL_INFO


=== SYSLIBL ===

SELECT CHAR(CURCHARVAL)
FROM SYSTEM_VALUE_INFO WHERE
SYSVALNAME = 'QSYSLIBL'

=== Numéro de série ===

SELECT CHAR(SUBSTR(CURCHARVAL,	1, 8))
FROM SYSTEM_VALUE_INFO WHERE
SYSVALNAME = 'QSRLNBR'		

==== Liste des ASP ====
SELECT RESOURCE, ASP_NUM, ASP_STATE, DISK_UNITS,
TOTCAP, TOTCAPA, ((TOTCAP - TOTCAPA) * 100.0 /TOTCAP),
THRESHOLD		
FROM QSYS2.ASP_INFO
WHERE PRESENT <> 'NONE'