IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Working with data areas !!!


IBM Mainframe Forums -> CLIST & REXX
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
mjadwani2785

New User


Joined: 28 Apr 2009
Posts: 89
Location: Noida , Dublin

PostPosted: Sun Sep 25, 2011 7:04 pm
Reply with quote

HI,

I was just experimenting with control blocks fields of some data area. Till now my understanding is limited to few data areas namely psa, cvt , jesct ,sscvt as the can be easily found on net. Now I have written this common code to identify the subsystem on my mainframe . I am able to generate but out of them some are inactive. Is it possible to find which subsystems are active and inactive.
the code as follows :

Code:
 flccvt = 16             /* control block
 cvt = c2d(storage(d2x(flccvt),4))/* cvt c
 jesct = c2d(storage(d2x(cvt+296),4))     
 sscvt = c2d(storage(d2x(jesct+24),4))   
 subsys = storage(d2x(sscvt+8),4)         
 subsysusage = storage(d2x(sscvt+20),4)   
 say c2x(subsysusage)                     
 do until(    sscvt =0 )                 
  say subsys                             
 sscvt = c2d(storage(d2x(sscvt+4),4))     
 subsys = storage(d2x(sscvt+8),4)         
 end     


And Is it also possible to know what type of subsystem it is. Like i want to identify all DB2 that are active .


Thanks in advance.

Regards,
Manoj K Jadwani
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy

PostPosted: Sun Sep 25, 2011 7:18 pm
Reply with quote

You are simplfying too much ?

a subsytem from a control block point of view is just an <anchor> point and a <messaging>/<signaling> interface
and is not in any way related to the running status of <something>

a transient subsystem properly initialized for example is there,
waiting for somebody to request its services,
but it will not show up in a sdsf DA like a DB2 instance running,
note I said instance , not subsystem

meditate here for better insight
publib.boulder.ibm.com/infocenter/zos/v1r12/index.jsp?topic=%2Fcom.ibm.zos.r12.ieaf200%2Fconir.htm
Back to top
View user's profile Send private message
mjadwani2785

New User


Joined: 28 Apr 2009
Posts: 89
Location: Noida , Dublin

PostPosted: Sun Sep 25, 2011 7:38 pm
Reply with quote

Thanks for the insight link :-)

Really seems like I have too much simplified. Now need to rephrase my question from subsystem def i need to check the active instance of DB2.

Like following is the snap of output I got from the code

DB2V
DB2A
VRLM
ARLM
DB2C
CRLM
AXR

out of those DB2V and DB2A instances are up and DB2C is down. So can I like check from any of the initialising loadmodules loaded somewhere in another control block and identify it is up ? (just my thinking )

Regards,
Manoj K Jadwani
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy

PostPosted: Sun Sep 25, 2011 8:37 pm
Reply with quote

if You know the names of the procedure name, no need to bother the SSN

just scan the ascb chain to finf out if the relevant procedures are started or not

what are You trying to find out ?
the exercise is useful for learning how to chase control blocks,

just checking if a <subsystem> like You call it is <active> tells nothing from an availabillty point of view

to measure the availability of an application the whole chain of component must be <available> not just the top address space icon_cool.gif
Back to top
View user's profile Send private message
Pedro

Global Moderator


Joined: 01 Sep 2006
Posts: 2547
Location: Silicon Valley

PostPosted: Mon Sep 26, 2011 7:40 pm
Reply with quote

Quote:
So can I like check from any of the initialising loadmodules loaded somewhere in another control block and identify it is up ? (just my thinking )

Doubtful. The information you seek MIGHT be in control block (I do not know) but such control blocks are likely to be in a different address space. You only have access to your own storage, plus some common system areas.
Back to top
View user's profile Send private message
mjadwani2785

New User


Joined: 28 Apr 2009
Posts: 89
Location: Noida , Dublin

PostPosted: Mon Sep 26, 2011 7:48 pm
Reply with quote

Hi Just found a code written by Peter Nancollis . I wish I could again contact him I dont have hi email id.
The link as follows
www.idugdb2-l.org/cgi-bin/wa?A3=ind0204C&L=DB2-L&E=0&P=537685&B=--&T=text%2Fplain;%20charset=iso-8859-1&header=1

here he talks about prhb (Program request handler block) and I am trying hard to understand from which block actually he is querying for DB2 ERLY code ?

Regards,
Manoj K Jadwani
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy

PostPosted: Mon Sep 26, 2011 7:58 pm
Reply with quote

Quote:
I wish I could again contact him I dont have hi email id.

even if You had it You would have just shown bad manners
one of the first rules of netiquette is not to contact people You do not know seeking for help

why not start looking at the data areas Yourself ?

here is a link to some control block chasing stuff
groups.google.com/group/bit.listserv.tsorexx/browse_thread/thread/10f349236c6d3209/3deca0500c7d4c18?hl=en&q=rexx+ascb
Back to top
View user's profile Send private message
mjadwani2785

New User


Joined: 28 Apr 2009
Posts: 89
Location: Noida , Dublin

PostPosted: Tue Sep 27, 2011 1:55 pm
Reply with quote

Thanks Enrico :-)

Regards,
Manoj K Jadwani
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> CLIST & REXX

 


Similar Topics
Topic Forum Replies
No new posts Store the data for fixed length COBOL Programming 1
No new posts Data set Rec-Cnt and Byte-Cnt Testing & Performance 2
No new posts SCOPE PENDING option -check data DB2 2
No new posts Check data with Exception Table DB2 0
No new posts JCL EXEC PARM data in C Java & MQSeries 2
Search our Forums:

Back to Top