Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Extracting TIOT & TSO

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & Assembler
View previous topic :: :: View next topic  
Author Message
yogeshpawar

New User


Joined: 01 Mar 2006
Posts: 37
Location: Sussex-UK

PostPosted: Thu May 28, 2009 8:07 pm    Post subject: Extracting TIOT & TSO
Reply with quote

Hi,

I have got following code in one of our program

Code:

* GET JOBNAME FROM TIOT AND TEST FOR TSO                     
         EXTRACT MEXTRACT,,FIELDS=(TIOT,TSO)                 
         LM    R2,R3,MEXTRACT                                 
         TM    0(R3),X'80'         TEST FOR TSO               
         BNO   *+8                                           
         MVI   MTEST,X'FF'         SHOW PROGRAM BEING TESTED
         MVC   MJOBN,0(R2)         STORE JOBNAME FROM TIOT   



I understand that TIOT will give Jobname info. Can somebody tell me what kind of information is returned by TSO option in FIELDS parameter above.

Also can you direct me to any reading material which will explain about different options used in FIELDS parameter and corresponding information returned.
Back to top
View user's profile Send private message

Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8000
Location: Bellevue, IA

PostPosted: Thu May 28, 2009 8:12 pm    Post subject:
Reply with quote

Look up the EXTRACT macro in the z/OS Authorized Assembler Services Reference manual for your version of z/OS. That will send you to the other manuals you need to review.
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10232
Location: italy

PostPosted: Thu May 28, 2009 8:13 pm    Post subject: Reply to: Extracting TIOT & TSO
Reply with quote

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA2A281/CCONTENTS?SHELF=IEA2BK81&DN=SA22-7610-14&DT=20080125032027

part of the MVS bookshelf which contains the manuals dealing with macros

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/Shelves/IEA2BK81
Back to top
View user's profile Send private message
Bill O'Boyle

CICS Moderator


Joined: 14 Jan 2008
Posts: 2502
Location: Atlanta, Georgia, USA

PostPosted: Thu May 28, 2009 8:47 pm    Post subject: Reply to: Extracting TIOT & TSO
Reply with quote

Perhaps the following will help -

http://www.ibmmainframes.com/viewtopic.php?p=167434&highlight=#167434

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

New User


Joined: 01 Mar 2006
Posts: 37
Location: Sussex-UK

PostPosted: Thu May 28, 2009 10:05 pm    Post subject: Reply to: Extracting TIOT & TSO
Reply with quote

Hi Bill,

I already had a look at that post and understood about TIOT. Now I want to know what kind of information is returned by TSO option in FIELDS.

Does this tell about whether your job is running on Test or Production system?
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8000
Location: Bellevue, IA

PostPosted: Thu May 28, 2009 10:51 pm    Post subject:
Reply with quote

How would a macro know which system it is being assembled on? If the system returned is SYS1, is that a test or production name?
Back to top
View user's profile Send private message
yogeshpawar

New User


Joined: 01 Mar 2006
Posts: 37
Location: Sussex-UK

PostPosted: Sun May 31, 2009 7:08 pm    Post subject: Reply to: Extracting TIOT & TSO
Reply with quote

Hi Enricho,

I got the information about EXTRACT macro in the link you have provided but there was no detailed explaination about parameters passed to this.

For eg. When we give TIOT option we get information about Jobname, etc. In the same way I am trying to understand what kind of information is returned when we give TSO option in FIELDS.

Also, the other links provided points o the first link for detailed explaination of EXTRACT but couldn't find much info around the different parameters passed.
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10232
Location: italy

PostPosted: Mon Jun 01, 2009 5:09 pm    Post subject: Reply to: Extracting TIOT & TSO
Reply with quote

starting from 13.0, proceeding to 13.1
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA2A281/13.1?SHELF=IEA2BK81&DT=20080125032027&CASE=


You get a pointer
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA2A881/CCONTENTS?DT=20080120225118
Back to top
View user's profile Send private message
yogeshpawar

New User


Joined: 01 Mar 2006
Posts: 37
Location: Sussex-UK

PostPosted: Fri Jul 17, 2009 9:44 pm    Post subject: Reply to: Extracting TIOT & TSO
Reply with quote

Thanks Enrico. Have found what I needed.
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 -> PL/I & Assembler All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Extracting Information from DD Statem... Charles Wolters All Other Mainframe Topics 7 Wed Apr 13, 2016 10:21 pm
No new posts Extracting cobol source code from loa... vicky10001 COBOL Programming 7 Mon May 26, 2014 3:35 pm
No new posts Extracting required information from ... nandeshwar IBM Tools 9 Mon Feb 17, 2014 4:46 pm
No new posts extracting qalifier from dataset into... useit JCL & VSAM 14 Thu Jun 27, 2013 4:13 pm
No new posts Extracting the View scripts of a table Bhuvanesh Subburajan DB2 2 Thu Mar 14, 2013 3:26 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us