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
 
Invoke TSO Command from COBOL program

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
sinusam

New User


Joined: 06 Jan 2004
Posts: 18

PostPosted: Tue May 03, 2005 10:26 am    Post subject: Invoke TSO Command from COBOL program
Reply with quote

Invoke TSO Command from COBOL program

I want to get the output of LISTDS (a given dsn) command in my COBOL program.

I tried to invoke the TSO Command from the IKJEFTSR (TSOLNK) Service Routine. But I get return code 20 (authorized program). How to get rid of it ?

Is there any other method to run a TSO command from a COBOL program and get the output in the WORKING STORAGE SECTION ?


Regards,
Sinu
Back to top
View user's profile Send private message

somasundaran_k

Active User


Joined: 03 Jun 2003
Posts: 134

PostPosted: Tue May 03, 2005 9:28 pm    Post subject:
Reply with quote

Sinu
Check this link. It will be helpful.

http://mywebpages.comcast.net/gsf/tools/cob2tso.txt


Regds
-Som
Back to top
View user's profile Send private message
sinusam

New User


Joined: 06 Jan 2004
Posts: 18

PostPosted: Wed May 04, 2005 2:19 pm    Post subject: Output of LISTDS is needed in COBOL WORKING STORAGE
Reply with quote

Dear Somu,

I tried to run that program. It was invoking
"TSO ALLOCATE" command. It was successul. But when I changed the command to "LISTDS", I'm getting the previous error.

In the TSO/E Programming Services (IKJ4B740) manual, there was an example for IKJEFTSR which is invoking
LISTBC command. But it is also returning RC=20.

Can you please figure out the problem ?

Regards,
Sinu
Back to top
View user's profile Send private message
somasundaran_k

Active User


Joined: 03 Jun 2003
Posts: 134

PostPosted: Wed May 04, 2005 10:37 pm    Post subject:
Reply with quote

Sinu
I didn't get time to check this progrm . But please note that we can't invoke TSO COMMANDS WHICH REQUIRE AUTHORIZATION using this service facility. So I guess that can be a cause for getting this error.

Regds
-Som
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 -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts The same REXX program doesnt work for... jackzhang75 CLIST & REXX 5 Wed Dec 06, 2017 2:51 am
No new posts OUTREC with ALter Command scorp_rahul23 DFSORT/ICETOOL 1 Wed Nov 22, 2017 3:10 pm
This topic is locked: you cannot edit posts or make replies. Cobol to fetch the content by using s... arunc55 COBOL Programming 4 Fri Nov 17, 2017 1:25 pm
No new posts Calling IKJEFT01 program from Rexx upendrasri CLIST & REXX 8 Wed Nov 15, 2017 4:27 pm
No new posts VBS and VB, COBOL syntax is the same ... natt.sut COBOL Programming 3 Sun Nov 12, 2017 6:36 am

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