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
 
Invoking adrdssu using attchmvs

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IBM Tools
View previous topic :: :: View next topic  
Author Message
harisukumaran

New User


Joined: 14 Jun 2005
Posts: 45

PostPosted: Tue Jun 05, 2018 3:30 am    Post subject: Invoking adrdssu using attchmvs
Reply with quote

Code:
prg = 'adrdssu'                       
address attchmvs prg       


Is it not allowed to call adrdssu from a rexx using address attchmvs ?
I keep getting rc= -71 when i try
Back to top
View user's profile Send private message

harisukumaran

New User


Joined: 14 Jun 2005
Posts: 45

PostPosted: Tue Jun 05, 2018 4:29 am    Post subject:
Reply with quote

I get the following when i try LINKMVS
Code:
+IRX0250E System abend code 047, reason code 00000000.       
+IRX0255E Abend in host command adrdssu or address environmen
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8400
Location: Dubuque, Iowa, USA

PostPosted: Tue Jun 05, 2018 5:03 am    Post subject:
Reply with quote

An 047 system abend is an attempt to execute an authorized program in an unauthorized environment. Since X'047' is decimal 71, I suspect you're running into the same issue either way. Talk to your site support group about what you're trying to do and how they recommend you do it.
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8725
Location: Welsh Wales

PostPosted: Tue Jun 05, 2018 11:26 am    Post subject:
Reply with quote

Why on earth would you want to invoke DFdss from within a REXX, and IRXJCL isn't the best way to run REXX in batch, IKJEFT01 offers so much more if I recall correctly.

For IBM product calls I usually use
Code:
CALL *(ADRDSSU)


Perhaps if you actually took the time to explain what it is that you are trying to achieve then the hundreds of years of experience on the forum could spend their time giving a better solution.
Back to top
View user's profile Send private message
Pete Wilson

Active User


Joined: 31 Dec 2009
Posts: 470
Location: London

PostPosted: Mon Jun 11, 2018 2:38 pm    Post subject:
Reply with quote

Does seem a strange thing to do trying to run DFDSS inside a rexx. Probably easier to generate a DFDSS job JCL in the rexx and submit it to INTRDR

You could look at the UIM's in the DFDSS manual to see what they offer.
Back to top
View user's profile Send private message
Willy Jensen

Active User


Joined: 01 Sep 2015
Posts: 228
Location: Denmark

PostPosted: Tue Jun 12, 2018 1:40 pm    Post subject:
Reply with quote

Well I have tested ADRDSSU from REXX in the past for dataset copy or mass deletes.
The syntax I used is "Call *(ADRDSSU)"
The rc -71 = abend S047 is because ADRDSSU is not listed in parmlib member IKJTSOxx section AUTHPGM.
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 -> IBM Tools All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Old gds of GDG not rolledoff after AD... Wallace Lee IBM Tools 3 Fri Feb 09, 2018 9:34 pm
No new posts attchmvs from rexx subroutine that re... harisukumaran CLIST & REXX 1 Fri Jan 19, 2018 5:29 am
This topic is locked: you cannot edit posts or make replies. 00D3003B - time outs in DB2 when invo... chavinash2004 DB2 2 Mon Oct 09, 2017 4:39 pm
No new posts Executing OO COBOL program invoking J... Virendra Shambharkar COBOL Programming 2 Tue Jan 10, 2017 6:37 pm
No new posts Invoking CA 7 commands through REXX kenshin CLIST & REXX 10 Fri Aug 12, 2016 9:33 pm

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