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
 

 

using IKJEFT01 in CICS

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS
View previous topic :: :: View next topic  
Author Message
sivatechdrive

Active User


Joined: 17 Oct 2004
Posts: 190
Location: hyderabad

PostPosted: Mon Oct 13, 2008 8:40 am    Post subject: using IKJEFT01 in CICS
Reply with quote

Hi Friends,

When i am trying to submit an IKJEFT01 program through CICS, i am getting the below abend, plz help me

IEC020I 001-5,TFEECMP1,STEP001 ,SYSTSIN ,JES
IEC020I EROPT IS 'ABE' OR NOT SPECIFIED
IEF142I TFEECMP1 STEP001 - STEP WAS EXECUTED - COND CODE 0012

Below is Job submitted through CICS

Code:
//TFEECMP1 JOB TD,CLASS=M,MSGCLASS=A, 
//         MSGLEVEL=(0,0),REGION=7M   
//STEP001 EXEC PGM=IKJEFT01           
//SYSUDUMP DD SYSOUT=A                 
//SYSTSPRT DD SYSOUT=A                 
//SYSOUT DD SYSOUT=A                   
//SYSTSIN DD SYSOUT=A                 
SUB 'TFED.RND1(GSAS)'               


I aslo tried by provided cics SDFHLINK libraries in STEPLIB , but non of them worked,

Cheers..
Prasad
Back to top
View user's profile Send private message

dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Mon Oct 13, 2008 9:02 am    Post subject:
Reply with quote

Hello,

Code:
//SYSTSIN DD SYSOUT=A
I suspect this is your current abend cause. . .

Also, please notice that your job has been "Code"ed for readability.
Back to top
View user's profile Send private message
sivatechdrive

Active User


Joined: 17 Oct 2004
Posts: 190
Location: hyderabad

PostPosted: Mon Oct 13, 2008 10:13 am    Post subject:
Reply with quote

Thanks dick scherrer for the help,

The above jcl executed succesfully
my problem only half solve.
The below job submitted successfully but
Code:

//TFEECMP1 JOB TD,CLASS=M,MSGCLASS=A,   
//         MSGLEVEL=(0,0),REGION=7M     
//STEP001 EXEC PGM=IKJEFT01             
//SYSUDUMP DD SYSOUT=A                   
//SYSTSPRT DD SYSOUT=A                   
//SYSOUT DD SYSOUT=A                     
//SYSTSIN DD *                           
SUB 'TFED.RND1(GSAS)'                   


the job in 'TFED.RND1(GSAS) is abended with return code as SEC ERROR
the message is
Code:
LOGON/JOB INITIATION - SUBMITTER IS NOT AUTHORIZED BY USER

i tried by removing USER=TFEE, NOTIFY=TFEE, now the job is submitted by CICS region name S1DCIC0T... (ie. Owner = S1DCIC0T) but i want to have owner as my id (owner = TFEE)
how Can we override the submitter name
Code:
//TFEEJB1 JOB TP,EXEC025,                                       
//         CLASS=M,                                             
//         MSGCLASS=A,MSGLEVEL=(0,0),                           
//         REGION=7M,NOTIFY=&SYSUID,USER=TFEE                             
//PROCS JCLLIB ORDER=(FSH.D.UU.PROCLIB,                         
//      PSH.D.CC.P.PROCLIB,                                     
//      SYS3.D.UU.PROCLIB)                                     
//JOBLIB DD DSN=FSH.D.UU.LOAD,DISP=SHR                         
//       DD DSN=PSH.D.UU.LOAD,DISP=SHR                         
//       DD DSN=PSH.D.CC.P.LOAD,DISP=SHR                       
//CL200   EXEC PROC=CL200                                       
//SORT1.SYSIN DD DSN=PSH.D.CC.P.PARMDATA(CL000C20),DISP=SHR     
//            DD *                                             
  INCLUDE COND=(8,7,CH,EQ,C'2430017')                           
/*                                                             
//SORT2.SYSIN DD DSN=PSH.D.CC.P.PARMDATA(CL000C21),DISP=SHR     
//            DD *                                             
  INCLUDE COND=(45,7,CH,EQ,C'2430017')                         
/*                                                             
//SORT3.SYSIN DD DSN=PSH.D.CC.P.PARMDATA(CL000C22),DISP=SHR     
//            DD *                                             
  INCLUDE COND=(118,7,CH,EQ,C'2430017')                         
/*                                                             
//SORT4.SYSIN DD DSN=PSH.D.CC.P.PARMDATA(CL000C23),DISP=SHR     
//            DD *                                             
  INCLUDE COND=(118,7,CH,EQ,C'2430017')                         
/*                                                             
//SORT5.SYSIN DD DSN=PSH.D.CC.P.PARMDATA(CL000C24),DISP=SHR     
//            DD *                                             
  INCLUDE COND=(118,7,CH,EQ,C'2430017')                         
/*                                                             
//CL025A.PARAM DD *                                             
                                  2430017                  Y1C         
/*                                                                     
//CL020.PARAM DD *                                                     
                                  2430017                  Y1C         
/*                                                                     
//
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Mon Oct 13, 2008 12:36 pm    Post subject:
Reply with quote

Hello,

As your id is not permitted (hence the security violaton), you would need to talk with the security admins or the people who provide "the rules" to the admins. You might also ask your CICS support people if there is some other way to do what you want.

You are now stuck with policy rather than technology icon_wink.gif
Back to top
View user's profile Send private message
mkarthikeyan

New User


Joined: 07 Aug 2008
Posts: 34
Location: Bangalore

PostPosted: Mon Nov 03, 2008 1:15 am    Post subject: Reply to: using IKJEFT01 in CICS
Reply with quote

If you want the owner as TFEE you can override System init parameter (SIP) DFLTUSER=TFEE in CICS. Since the System init table is built using DFLTUSER=S1DCIC0T during CICS installation. the job is started with the mentioned owner. You can override it in SYSIN ddname.

You are getting error message "LOGON/JOB INITIATION - SUBMITTER IS NOT AUTHORIZED BY USER" because you have not provided the password in Jobcard.

Your job will be successfully submitted for the below jobcard. Please provide the password in XXX
//TFEEJB1 JOB TP,EXEC025,
// CLASS=M,
// MSGCLASS=A,MSGLEVEL=(0,0),
// REGION=7M,NOTIFY=&SYSUID,USER=TFEE,PASSWORD=XXX

The job will be submitted by the USER TFEE who has the authority to START the CICS. But the CICS job will start with the Default User defined in SIT or overriden in SIP.

--------------
T-H-I-N-K
IBM
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Mon Nov 03, 2008 6:02 am    Post subject:
Reply with quote

Hello,

Quote:
The job will be submitted by the USER TFEE who has the authority to START the CICS
It may or it probably will not.

This is prohibited in most places. Developers/others are not permitted to "spoof" other (production) user-ids in most cases. It is a poor security implementation that allows "just anyone" to be some other user. . .

If this works on your system, i suspect security is rather weak.
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 -> CICS All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts CICS Transaction Timeout Hooman24 CICS 2 Sun Apr 16, 2017 2:16 pm
No new posts Date and time format in CICS Chandru3183 CICS 2 Sat Mar 18, 2017 12:46 pm
No new posts Asynchronous CICS Processing Question moezbud CICS 1 Mon Mar 06, 2017 6:13 pm
No new posts CICS Question RE: Browse, Readnext an... moezbud CICS 7 Sun Mar 05, 2017 5:45 am
No new posts how to send just 10 rows in a CICS sc... Megha Gupta CICS 5 Thu Feb 23, 2017 6:57 pm


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