Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Usage and functions of IKJEFT01

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
Ramya A

Active User


Joined: 26 Jul 2004
Posts: 104

PostPosted: Thu Aug 05, 2004 11:58 am    Post subject: Usage and functions of IKJEFT01
Reply with quote

Could anyone give me details about the utility IKJEFT01. The details that I need are

1. What are the functions that can be performed using this utility?
2. What are the inputs that can be given to this utility?
3. What are the parameters passed to this?

I'm in the process of analysing a set of jobs where I encounter this utility and not aware of what it does. Anyway the context in which this utility is used is to execute a REXX exec to produce some kind of letter. It uses a control card starting with //FIELDS and it defines some variables.

Thanks,
Ramya
Back to top
View user's profile Send private message

superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4648
Location: Raleigh, NC, USA

PostPosted: Thu Aug 05, 2004 3:31 pm    Post subject:
Reply with quote

IKJEFT01 is the TSO/E program. You use it whenever you wish to perform a TSO function within a batch job. It allows you to perform any TSO function. For a general list of all TSO functions, type TSO HELP. Additionally, IKJEFT01 allows you to run programs written in TSO/E Command List (CLIST) and/or TSO/E REXX. Optionally, you can also invoke other environments, such as ISPF , allowing you to run ISPF Dialogs in a batch environment.

DB/2 commands are usually invoked via IKJEFT01.

As far as inputs, any valid TSO command will be accepted.

Usually, the only parameter list supplied is the member name of a CLIST or REXX Exec (along with their parameters) as defined in the SYSPROC library.
Back to top
View user's profile Send private message
Sukesh

New User


Joined: 16 Aug 2006
Posts: 1
Location: kolkata

PostPosted: Tue Jan 02, 2007 12:41 pm    Post subject: Re: Details about IKJEFT01
Reply with quote

Hi
IKJEFT01 is called TMP (Terminal Monitor Program ). It process
all TSO/REXX/CLIST command in batch.

Some functions and usage of IKJEFT01 Utility

1) Unload data using DB2 Utility IKJEFT01
2) DB2 BIND using IKJEFT01 Utility
3) Executing DB2 program using IKJEFT01 Utitlity.

1) IKJEFT01 can be used to extract data from db2 tables.
as shown below.

JCL to extract data from db2 tables using IKJEFT01 Utility.

Code:
//STEP002  EXEC PGM=IKJEFT01,
            //             DYNAMNBR=20,COND=(0,NE)
            //STEPLIB  DD  DISP=SHR,
            //             DSN=SYS.DB2.XXX.RUNXX.LOAD
            //         DD  DISP=SHR,
            //             DSN=SYS.DB2.XXX.SDSNEXIT
            //         DD  DISP=SHR,
            //             DSN=SYS.DB2.XXX.SDSNLOAD
            //SYSIN    DD  *
            SELECT  *
            FROM EMP_TABLE
            WITH UR;
            //*
            //SYSTSIN  DD  *
            DSN SYSTEM(XXX) RETRY(20)
            RUN PROGRAM(DSNTIAUL) PLAN(DSNTIAUL) PARMS('SQL') -
            LIB ('SYS.DB2.XXX.RUNXX.LOAD')
            END
            /*
            //***UNLOAD FILE
            //SYSREC00 DD  DISP=(NEW,CATLG,DELETE),
            //             DSN=DEV.UNLOAD.FILE,
            //             UNIT=SYSDA,SPACE=(CYL,(50,50),RLSE)
            //*
            //***TABLE STRUCTURE
            //SYSPUNCH DD  DUMMY
            //*
            //SYSTSPRT DD  SYSOUT=*
            //SYSPRINT DD  SYSOUT=*
            //SYSUDUMP DD  SYSOUT=*
           


2) Using IKJEFT01 utility for DB2 BIND

Sample JCL to DB2 BIND

Code:
//*  DB2 BIND JCL
            //*
            //BIND     EXEC PGM=IKJEFT01,
            //             COND=(4,LT),
            //             REGION=4096K
            //STEPLIB  DD  DISP=SHR,
            //             DSN=XXX4.DB2.XXXX.XXXXLOAD
            //DBRMLIB  DD  DISP=SHR,
            //             DSN=DEV.SURESH.DBRM(DB2PROG)    <---------------  (1)
            //SYSPRINT DD  SYSOUT=*
            //SYSTSPRT DD  SYSOUT=*
            //SYSUDUMP DD  SYSOUT=*
            //SYSTSIN  DD  *
            DSN SYSTEM (DEVDB )
            BIND  MEMBER    (DB2PROG) -
            PACKAGE   (PACKG11) -
            LIBRARY   ('DEV.SURESH.DBRM') -         <---------------- (2)
            ACTION    (REP) -
            ISOLATION (CS) -
            VALIDATE  (BIND)-
            RELEASE   (COMMIT) -
            OWNER     (SURESH) -
            QUALIFIER (DEVQUALI)
            END
            /*
           


(1) & (2) - specify the location of DBRM.


It is a part of cobol db2 compile jcl.. Refer below

***************************************

Code:
//DB2COMP (XXX,XXX),'COMPILE JCL',                           
//             CLASS=A,MSGCLASS=A,NOTIFY=&SYSUID                     
//********************************************************************
//* COMPILATION, LINK EDIT AND THE BIND STEP FOR A COBOL DB2 PROGRAM *
//* WILL BE DONE BY SUBMITTING THIS JOB.                             *
//* THE DB2 REGIONS AND CORRESPONDING PARAMETERS NEEDS TO BE CHANGED *
//* WITH RESPECT TO THE PROGRAM                                      *
//********************************************************************
//*                 PRECOMPILE DB2 PROGRAM                           *
//*--------------  LOCATION OF DBRM LIBRARY -------------------------*
//********************************************************************
//PC       EXEC PGM=DSNHPC,                                           
//             PARM='HOST(COB2),APOST,SOURCE',                       
//             REGION=4096K                                           
//DBRMLIB  DD  DISP=SHR,                                             
//             DSN=DEV.SURESH.DBRM(DB2PROG)    <------------------------ (1)                   
//STEPLIB  DD  DISP=SHR,                                             
//             DSN=SYSX.DB2.XXX.XXXXX 
//******************************************************************** 
//*SYSIN -----------INPUT COBOL DB2 PROGRAM LOCATION-----------------* 
//******************************************************************** 
//SYSIN    DD  DISP=SHR,                                               
//             DSN=DEV.SURESH.SRC(DB2PROG)     <----------------------  (2)                     
//SYSCIN   DD  DISP=(MOD,PASS),                                         
//             DSN=&&TEMP,                                           
//             SPACE=(800,(500,500)),                                   
//             UNIT=SYSDA                                               
//******************************************************************** 
//*                          DCLGEN MEMBER LOCATION                  * 
//*SYSLIB-----------------INPUT SOURCE LIBRARY FOR SQL---------------* 
//******************************************************************** 
//SYSLIB   DD  DISP=SHR,                                               
//             DSN=DEV.SURESH.DCL               <---------------------- (3)                         
//         DD  DISP=SHR,                                               
//             DSN=DEV.SURESH.CPY                             
//SYSPRINT DD  SYSOUT=T                                               
//SYSTERM  DD  SYSOUT=T                                               
//SYSUDUMP DD  SYSOUT=*                                               
//SYSUT1   DD  SPACE=(800,(500,500),,,ROUND),                         
//             UNIT=SYSDA                                             
//SYSUT2   DD  SPACE=(800,(500,500),,,ROUND),                         
//             UNIT=SYSDA                                             
//*                                                                   
//********************************************************************
//*                         COMPILATION                              *
//********************************************************************
//*                                                                   
//COB      EXEC PGM=IGYCRCTL,                                         
//             COND=(4,LT,PC),                                         
//             PARM=('SIZE(4000K),BUFSIZE(32760),LIST,LIB,MAP,OBJECT',
//             'DATA(31),XREF,RENT'),                                 
//             REGION=4M
//STEPLIB  DD  DISP=SHR,                                               
//             DSN=XXXX.XXXXXX                                       
//SYSIN    DD  DISP=(OLD,DELETE),                                     
//             DSN=&&TEMP                                           
//SYSLIN   DD  DISP=(MOD,PASS),                                       
//             DSN=&&LOADTMP,                                         
//             SPACE=(800,(500,500)),                                 
//             UNIT=SYSDA                                             
//********************************************************************
//*--------------SOURCE LIBRARIES FOR COBOL DB2 CODE (COPY LIBRARIES)*
//********************************************************************
//SYSLIB   DD  DISP=SHR,                                               
//             DSN=DEV.SURESH.DCL              <-----------------  (4)
//         DD  DSN=DEV.SURESH.CPY,DISP=SHR
//SYSPRINT DD  SYSOUT=*                                               
//SYSUDUMP DD  SYSOUT=*                                               
//SYSUT1   DD  SPACE=(800,(500,500),,,ROUND),                         
//             UNIT=SYSDA                                             
//SYSUT2   DD  SPACE=(800,(500,500),,,ROUND),                         
//             UNIT=SYSDA                                             
//SYSUT3   DD  SPACE=(800,(500,500),,,ROUND),                         
//             UNIT=SYSDA                                             
//SYSUT4   DD  SPACE=(800,(500,500),,,ROUND),                         
//             UNIT=SYSDA                                             
//SYSUT5   DD  SPACE=(800,(500,500),,,ROUND),                         
//             UNIT=SYSDA                                             
//SYSUT6   DD  SPACE=(800,(500,500),,,ROUND),                         
//             UNIT=SYSDA                                             
//SYSUT7   DD  SPACE=(800,(500,500),,,ROUND),                         
//             UNIT=SYSDA                                             
//*                                                                   
//*                                                                     
//******************************************************************** 
//*                         LINK EDIT                                * 
//******************************************************************** 
//*                                                                     
//LKED     EXEC PGM=IEWL,                                               
//             COND=((4,LT,COB),(4,LT,PC)),                             
//             PARM='XREF'                                             
//SYSLIB   DD  DISP=SHR,                                               
//             DSN=SXXX.SXXXXXXX                                       
//         DD  DISP=SHR,                                               
//             DSN=XXXX.DB2.XXX.XXXXLOAD                               
//         DD  DISP=SHR,                                               
//             DSN=SYS1.VSCLLIB                                         
//SYSLIN   DD  DISP=(OLD,DELETE),                                       
//             DSN=&&LOADTMP                                           
//*        DD  DDNAME=SYSIN                                             
//******************************************************************** 
//*----------------LOCATION OF LOAD LIBRARY--------------------------* 

//SYSLMOD  DD  DISP=SHR,                                               
//             DSN=DEV.SURESH.LOADLIB(DB2PROG)    <------------  (5)                   
//SYSPRINT DD  SYSOUT=*                                                 
//SYSUDUMP DD  SYSOUT=*                                                 
//SYSUT1   DD  SPACE=(1024,(50,50)),                                   
//             UNIT=SYSDA                                               
//*                                                                     
//******************************************************************** 
//*               BIND - BIND THE DB2 PACKAGE                        * 
//******************************************************************** 
//BIND     EXEC PGM=IKJEFT01,                                           
//             COND=(4,LT),                                             
//             REGION=4096K                                             
//STEPLIB  DD  DISP=SHR,                                               
//             DSN=XXX4.DB2.XXXX.XXXXLOAD                               
//DBRMLIB  DD  DISP=SHR,                                               
//             DSN=DEV.SURESH.DBRM(DB2PROG)    <---------------  (6)       
//SYSPRINT DD  SYSOUT=*                                                 
//SYSTSPRT DD  SYSOUT=*                                                 
//SYSUDUMP DD  SYSOUT=*                                                 
//SYSTSIN  DD  *                                                       
DSN SYSTEM (DEVDB )                                                       
BIND  MEMBER    (DB2PROG) -                                             
      PACKAGE   (PACKG11) -                                           
      LIBRARY   ('DEV.SURESH.DBRM') -         <---------------- (7)                       
      ACTION    (REP) -                                                 
      ISOLATION (CS) -                                                 
      VALIDATE  (BIND)-                                                 
      RELEASE   (COMMIT) -     
      OWNER     (SURESH) -                                             
      QUALIFIER (DEVQUALI)                                               
END                                                                     
/*                                                                     

**************************** Bottom of Data ****************************


(1) - When we precompiled, precompiler will create the DBRM, it will
be placed in the pds specified here.

(2) - Location of COBOL-DB2 program

(3) - Needs to speficiy DCLGEN member locations

(4) - Needs to specify DCLGEN and COPYBOOK locations here

(5) - Load module location, load module will be created here. this
location needs to be given in run jcl.

(5) & (6) - specify the location of DBRM, ( same location used in step1 ).


***************************************

3) Using IKJEFT01 utility for executing cobol db2 program.

Sample JCL to execute IKJEFT01 utility to run COBOL DB2 program.

Code:
//** COBOL DB2 RUN JCL
            //STEP01 EXEC PGM=IKJEFT01,
            //         DYNAMNBR=20
            //*
            //STEPLIB  DD  DISP=SHR,
            //             DSN=SYSL.DB2.DEV.XXXXLOAD
            //         DD  DISP=SHR,
            //             DSN=SYSL.DB2.DEV.XXXXYYYY
            //*
            //SYSTSPRT DD  SYSOUT=*
            //SYSTSIN  DD  *
            DSN SYSTEM(DEVDB)
            RUN PROGRAM(DB2PROG)              -
            PLAN(PLAN11111)                      -
            LIBRARY('DEV.SURESH.LOADLIB')
            END
            /*
            //SYSOUT   DD  SYSOUT=*
            //SYSIN    DD  *
            //*
            //* COBOL DB2 RUN JCL ENDS
           
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts SUBSTR for Date functions Shaheen Shaik DB2 4 Thu Apr 06, 2017 2:14 pm
No new posts Need inputs on Space requirement and... ashek15 IMS DB/DC 0 Sat Apr 01, 2017 8:26 am
No new posts "DFSRRC00 vs IKJEFT01" for ... arunsoods All Other Mainframe Topics 5 Fri Aug 12, 2016 9:54 pm
No new posts Regd Date Functions in Syncsort muralikrishnan_new SYNCSORT 2 Fri Jul 01, 2016 8:21 pm
No new posts How can amount of the Storage Usage b... esduman61 CICS 6 Wed Mar 09, 2016 1:19 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us