MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

MVS console commands in Batch?

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> TSO and ISPF
View previous topic :: View next topic  
Author Message
batsaali
Beginner


Joined: 07 Sep 2007
Posts: 18
Topics: 7

PostPosted: Wed Feb 23, 2011 10:40 am    Post subject: MVS console commands in Batch? Reply with quote

Hello,

Can anyone please help me?

I need an utility (REXX or whatever else)
that I can use in BATCH to pass MVS display commands + retreive the result from these commands in the SYSOUT of the JOB.
So far I found many ways and utilities to issue MVS commands in batch.
But only two that retrieves the output from those commands was SDSF and IOF batch solution. SDSF I can not use because the system that I need to use it on does not have SDSF but CA SYSVIEW instead. IOF is some output manager that needs licensing...Maybe rexx console interface but I do not exactly know how to use it. Does anyone here have similar utility or REXX program that they would like to share with the world? Smile

Thank you all in advance
Back to top
View user's profile Send private message
taltyman
JCL Forum Moderator
JCL Forum Moderator


Joined: 02 Dec 2002
Posts: 310
Topics: 8
Location: Texas

PostPosted: Wed Feb 23, 2011 11:07 am    Post subject: Reply with quote

here's one way. the mvs command is a parm passed to the rexx.
Code:

/* REXX */                                                     
TRACE E                                                       
PARSE UPPER ARG CMD                                           
CONNAME = SPACE(CON TIME(S),0)                                 
"CONSOLE ACTIVATE NAME("CONNAME")"                             
"CONSPROF UNSOLDISP(NO) SOLDISP(NO) SOLNUM(400)"               
SAY "ISSUING " CMD                                             
"CONSOLE SYSCMD("CMD") CART('CONS0001')"                       
GETCODE = GETMSG('CONSMSG1.','SOL','CONS0001',,15)             
IF GETCODE = 0 THEN                                           
  DO CNT = 1 TO CONSMSG1.0                                     
    SAY CONSMSG1.CNT                                           
  END                                                         
GETCODE = GETMSG('CONSMSG2.','SOL','',,5)                     
IF GETCODE = 0 THEN                                           
  DO CNT = 1 TO CONSMSG2.0                                     
    SAY CONSMSG2.CNT                                           
  END                                                         
"CONSOLE DEACTIVATE"                                           
RETURN                                                         
Back to top
View user's profile Send private message
batsaali
Beginner


Joined: 07 Sep 2007
Posts: 18
Topics: 7

PostPosted: Wed Feb 23, 2011 12:11 pm    Post subject: Reply with quote

Oh Man that is sooooooooooo coooooooooooooool!!!!!

Works like a song Smile
Thank you! Thank you! Thank you! Thank you! Thank you! Thank you! Thank you! Thank you! Thank you! 1000000 times thank you!

The world needs more people like you Very Happy
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12369
Topics: 75
Location: San Jose

PostPosted: Wed Feb 23, 2011 12:43 pm    Post subject: Reply with quote

batsaali,

I was never a systems programmer, so I may be way off here, but if MVS Console commands work the same way as CICS commands then you can try the following methods listed here

http://www.mvsforums.com/helpboards/viewtopic.php?p=1420#1420


Kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> TSO and ISPF All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group