Skip to main content

When trying to extract data using IKJEFT01 utility, using a SQL query mentioned on the SYSIN statement, no records are being extracted.
An empty SYSPRINT, LSEQ dataset "LSEQ.SYSPRINT.OUTPUT" is being created.

Sample JCL:

//LSEQ JOB LSEQ,'WL(REBUILD)',CLASS=A,MSGCLASS=X,REGION=0M
//*****************************************************************    
//STEP010  EXEC PGM=IKJEFT01
//*
//SYSTSIN   DD *
  DSN SYSTEM(CICSSQL)                                                  
  RUN PROGRAM(SQLTP2)                                           
  END   
//SYSTSPRT  DD SYSOUT=*
//*
//*SYSPRINT  DD SYSOUT=*
//SYSPRINT  DD DSN=LSEQ.SYSPRINT.OUTPUT,
//            DISP=(NEW,CATLG),
//            DCB=(RECFM=LSEQ,LRECL=133,BLKSIZE=1330)
//SYSUDUMP  DD SYSOUT=*
//SYSOUT    DD SYSOUT=*
//*
//SYSIN     DD *
SELECT CURRENT_TIMESTAMP;
/*

Full article: https://portal.microfocus.com/s/article/KM000017415


#EnterpriseDeveloper
#SupportTips/KnowledgeDocs