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
This topic is locked: you cannot edit posts or make replies. Extract all "IF" Statements... Adarsh Damodaran CLIST & REXX 1 Wed Sep 06, 2017 9:28 am
No new posts How to change a string containing the... chong.zhou TSO/ISPF 6 Tue Aug 29, 2017 4:54 pm
No new posts Failure after DIR command Hank Watson All Other Mainframe Topics 2 Tue Aug 29, 2017 3:14 am
No new posts ALPHABETIC check in COBOL vidyaa COBOL Programming 8 Thu Aug 17, 2017 7:13 pm
No new posts Command to find TMEMBER name for a TPIPE Siva NKK Kothamasu IMS DB/DC 0 Wed Aug 16, 2017 6:08 pm

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