Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Rexx to execute spool commands
Goto page Previous  1, 2, 3
 
Post new topic   This topic is locked: you cannot edit posts or make replies.    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
View previous topic :: :: View next topic  
Author Message
upendrasri

New User


Joined: 28 Sep 2017
Posts: 27
Location: India

PostPosted: Mon Oct 02, 2017 8:47 pm    Post subject:
Reply with quote

Hi All,

I have another issue am trying to execute a Rexx program using Jcl but its failing with the message

IEC020I EROPT IS 'ABE' OR NOT SPECIFIED

See the below full details .


My Rexx - SPLPERC1
Code:

/* REXX   */                                           
"ALLOC FI(ISFOUT) DA('TEST.INPUT1') SHR REUSE"         
"EXECIO 0 DISKW ISFOUT (OPEN FINIS"                   
"ALLOC DD(ISFOUT) DA('TEST.INPUT1')SHR REUSE"         
"ALLOC DD (ISFIN) NEW REU"                             
QUEUE "SP                                           " 
QUEUE "++ALL                                        " 
"EXECIO "QUEUED()" DISKW ISFIN (FINIS"                 
"CALL *(ISFAFD)"                                       
"FREE DD(ISFOUT)"                                     
"FREE DD(ISFIN)"                                       

The above Rexx working fine. Now I want to execute the above Rexx with JCL as below.

Job to execute my above Rexx
Code:

//STEP1 EXEC PGM=IKJEFT01,PARM='%SPLPERC1'     
//SYSEXEC DD DSN=IGCF.TSO.EXEC,DISP=SHR       
//SYSTSIN DD SYSOUT=*                           
//SYSTSPRT DD SYSOUT=*                         
//ISFOUT  DD DSN=TEST.INPUT1,DISP=SHR 
//ISFIN   DD DUMMY                             
//SYSIN   DD *                                 
SP                                             
++ALL                                           
/*         


TEST.INPUT1 Dataset Properties
Code:

General Data                           Current Allocation               
 Management class . . : NOMIG           Allocated tracks  . : 1         
 Storage class  . . . : STANDARD        Allocated extents . : 1         
  Volume serial . . . : TEST01                                         
  Device type . . . . : 3390                                           
 Data class . . . . . : DEFAULT                                         
  Organization  . . . : PS             Current Utilization             
  Record format . . . : FBA             Used tracks . . . . : 1         
  Record length . . . : 133             Used extents  . . . : 1         
  Block size  . . . . : 6118                                           
  1st extent tracks . : 1                                               
  Secondary tracks  . : 50             Dates                           
  Data set name type  :                 Creation date . . . : 2017/10/02

But When I submit the abvoe Job its failing with CC= 12 the below are the error messages from JESYSMSG

Code:

IEF237I JES2 ALLOCATED TO SYSTSIN                                               
IEF237I JES2 ALLOCATED TO SYSTSPRT                                             
IGD103I SMS ALLOCATED TO DDNAME ISFOUT                                         
IEF237I DMY  ALLOCATED TO ISFIN                                                 
IEF237I JES2 ALLOCATED TO SYSIN                                                 
IGD101I SMS ALLOCATED TO DDNAME (ISFIN   )                                     
        DSN (SYS17275.T160350.RA000.TESTSPLJ.R0138050    )                     
        STORCLAS (STANDARD) MGMTCLAS (        ) DATACLAS (TEMPDS)               
        VOL SER NOS= W0T103                                                     
IGD104I TTSS.SRSQ.SPL.INPUT1                         RETAINED,  DDNAME=ISFOUT   
IGD105I SYS17275.T160350.RA000.TTSYSPLJ.R0138050     DELETED,   DDNAME=ISFIN   
IEC020I 001-5,TESTSPLJ,STEP1   ,SYSTSIN ,JES                                   
IEC020I EROPT IS 'ABE' OR NOT SPECIFIED                                         
IEF142I TESTSPLJ STEP1 - STEP WAS EXECUTED - COND CODE 0012         

Error messages of SYSTSPRT

READY
UNRECOVERABLE COMMAND SYSTEM ERROR






Thanks!
Upendra.

Coded for the incapable
Back to top
View user's profile Send private message

steve-myers

Active Member


Joined: 30 Nov 2013
Posts: 574
Location: The Universe

PostPosted: Mon Oct 02, 2017 8:55 pm    Post subject:
Reply with quote

This is another issue, unrelated to your other issues.

However -

//SYSTSIN DD SYSOUT=*

The TSO Terminal Monitor program expects to read TSO commands from the data set specified by the DD statement with DD name SYSTSIN. I suspect that is rather difficult here.
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 1894
Location: UK

PostPosted: Mon Oct 02, 2017 9:09 pm    Post subject:
Reply with quote

You have been asked to use the code tags when posting stuff sfrom the screen - code, JCL, data etc. Please do so or you may find your topic locked.
Back to top
View user's profile Send private message
upendrasri

New User


Joined: 28 Sep 2017
Posts: 27
Location: India

PostPosted: Mon Oct 02, 2017 9:12 pm    Post subject:
Reply with quote

Hi Steve,

Yeah this is other issue with My JCL. I have modified my JCS as below

//STEP1 EXEC PGM=IKJEFT01,PARM='%SPLPERC1'
//SYSEXEC DD DSN=IGCF.TSO.EXEC,DISP=SHR
//SYSTSIN DD DSN=TEST.CMD,DISP=SHR
//SYSTSPRT DD SYSOUT=*
//ISFOUT DD DSN=TEST.INPUT1,DISP=SHR
//ISFIN DD DUMMY
//SYSIN DD DUMMY
/*

TEST.CMD File contains the below commands
SP
++ALL

But still getting the same error.

Thanks!
Back to top
View user's profile Send private message
upendrasri

New User


Joined: 28 Sep 2017
Posts: 27
Location: India

PostPosted: Mon Oct 02, 2017 9:17 pm    Post subject:
Reply with quote

Hi Nic,

Sorry, Can you please let me know what do you mean by code tags? Am bit new to this forum.

Do you want me to open a new topic with new name?




Thanks!
Back to top
View user's profile Send private message
steve-myers

Active Member


Joined: 30 Nov 2013
Posts: 574
Location: The Universe

PostPosted: Tue Oct 03, 2017 12:42 am    Post subject:
Reply with quote

Use a search engine for phpbb code and follow some of those links. phpbb is the software that runs this forum and many other similar forums on the internet. When a moderator suggests you use code tags they mean to use phpbb tags that cause the software to emit ...
Code:
a block of text in a font with fixed width letters like this.

You can see what I did by clicking on the quote block at the upper right.
Back to top
View user's profile Send private message
Willy Jensen

Active User


Joined: 01 Sep 2015
Posts: 170
Location: Switzerland

PostPosted: Tue Oct 03, 2017 1:53 pm    Post subject:
Reply with quote

You say that the modified job ends with the same error messages. But messages from the first job had:
IEC020I 001-5,TESTSPLJ,STEP1 ,SYSTSIN ,JES
I don't think that you get that message again after you assigned SYSTSIN to a dataset.
SP and ++ALL belongs to the ISFIN DD, so I think that you JCL should look like this:
Code:
//STEP1 EXEC PGM=IKJEFT01,PARM='%SPLPERC1'
//SYSEXEC DD DSN=IGCF.TSO.EXEC,DISP=SHR
//SYSTSIN DD DUMMY
//SYSTSPRT DD SYSOUT=*
//ISFOUT DD DSN=TEST.INPUT1,DISP=SHR
//ISFIN DD DSN=TEST.CMD,DISP=SHR
//SYSIN DD DUMMY
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10327
Location: italy

PostPosted: Tue Oct 03, 2017 2:41 pm    Post subject: Reply to: Rexx to execute spool commands
Reply with quote

topic locked ...
a conclusion was not reached after 46 posts , I do not see any chances of getting one
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   This topic is locked: you cannot edit posts or make replies.    IBMMAINFRAMES.com Support Forums -> CLIST & REXX All times are GMT + 6 Hours
Goto page Previous  1, 2, 3
Page 3 of 3

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts How to write Rexx program to size and... sreejeshcs CLIST & REXX 14 Thu Oct 12, 2017 7:26 am
This topic is locked: you cannot edit posts or make replies. Rexx to execute spool commands upendrasri CLIST & REXX 5 Wed Oct 04, 2017 6:54 am
No new posts Execute JCL step based on the content... sprikitik JCL & VSAM 2 Tue Oct 03, 2017 10:03 am
No new posts Spool Extract for Z /os 1.04 version Khadhar Basha CLIST & REXX 3 Thu Sep 28, 2017 3:14 pm
No new posts ejck thru rexx to multiple jobs insid... Susanta All Other Mainframe Topics 5 Tue Sep 19, 2017 1:39 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us