Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
REXX exec (opercmd) failing quietly on new system

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> All Other Mainframe Topics
View previous topic :: :: View next topic  
Author Message
Mike.Fulton

New User


Joined: 11 Jun 2014
Posts: 22
Location: Canada

PostPosted: Sat Aug 03, 2019 4:45 am    Post subject: REXX exec (opercmd) failing quietly on new system
Reply with quote

Hi

I have been using this rexx exec (opercmd) for awhile now. Here's the source:
Code:

/* REXX */
arg options
trace 'o'
parse var options command
parse var command opercmd

opercmd = strip(opercmd,'L')

If (opercmd == '-?' | opercmd == '') Then Do
  'mvscmdmsg opercmd 0 I'
  Return 0
End

cmd.1 = opercmd
cmd.0 = 1

rc=isfcalls('ON')
if rc<>0 then do
     Exit rc
end

/* Use SDSF Interface to issue console command */
Address SDSF ISFSLASH "("cmd.") (WAIT)"

if rc<>0 then do
     Exit rc
end

do ix=1 to isfulog.0
    say isfulog.ix
end                                                                             

do ix=1 to isfmsg2.0
    say isfmsg2.ix
end

rc=isfcalls('OFF')
Exit rc

and this works great on my z/OS 2.3 system.
On another system (which happens to be z/OS 2.2, but possibly irrelevant), it runs clean with no non-zero return codes. I am expecting I don't have the right authority, but am not sure.
The actual command I am trying to do is just:
opercmd 'd u,dasd,online'
which I can issue successfully from the sdsf log command line, e.g.
Code:

/d u,dasd,online

Running the REXX exec from USS I get:
Code:

ISF776I Processing started for action 1 of 1.
ISF769I System command issued, command text: D U,DASD,ONLINE.
ISF766I Request completed, status: COMMAND ISSUED.
[/code]
Back to top
View user's profile Send private message

steve-myers

Active Member


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

PostPosted: Sat Aug 03, 2019 9:36 am    Post subject:
Reply with quote

And what message do you see in LOG or ULOG? What value do you see in RC?
Back to top
View user's profile Send private message
Mike.Fulton

New User


Joined: 11 Jun 2014
Posts: 22
Location: Canada

PostPosted: Sat Aug 03, 2019 10:51 pm    Post subject: Reply to: REXX exec (opercmd) failing quietly on new system
Reply with quote

rc of 0 for all calls.
Ulog.0 has 0 entries - so nothing printed.
I didn’t know about log - will check!
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 -> All Other Mainframe Topics All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Running rexx on zOS with JCL Rajesh_98 CLIST & REXX 3 Wed Nov 20, 2019 5:19 pm
No new posts Can you manually set an EOF marker in... Don Allard CLIST & REXX 5 Sat Nov 02, 2019 12:30 am
No new posts Running a REXX exec program using ZOSMF Sakthi344 CLIST & REXX 3 Tue Oct 15, 2019 3:13 pm
No new posts REXX VSAM Harold Barnes CLIST & REXX 3 Sat Oct 05, 2019 2:38 pm
No new posts REXX for Reading SMF type 70-1 AdrielGB Testing & Performance analysis 6 Sat Oct 05, 2019 3:03 am

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