Extracting data from journals using SQL

inz(%elem(Jrn)) ; 17 exec sql DECLARE C0 CURSOR FOR 18 SELECT ENTRY_TIMESTAMP,JOURNAL_CODE,JOURNAL_ENTRY_TYPE, 19 JOB_NAME,JOB_USER,JOB_NUMBER,SUBSTR(OBJECT,1,10), 20 SUBSTR(OBJECT,11,10),SUBSTR(OBJECT,21,10), 21 PROGRAM_NAME,CAST(ENTRY_DATA AS CHAR(2000 ...