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

Viewing the data in the CWA


IBM Mainframe Forums -> CICS
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
feellikeneo

New User


Joined: 19 Mar 2007
Posts: 73
Location: Chennai

PostPosted: Sun Jan 24, 2010 10:47 pm
Reply with quote

Hi,

I am having issue in reading the CWA data in my COBOL program. And in order to debug that I need to view the data in the CWA.

Is there any command to view the data in the CWA without using a separate COBOL program. Like CEBR to read TSQ data. I know one way is to take a whole region dump and examine the dump. But this is more expensive and time consuming.

Could you suggest any ways to read the CWA data.
Thanks for your time looking into this.
Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2146
Location: At my coffee table

PostPosted: Sun Jan 24, 2010 10:58 pm
Reply with quote

Have you looked at Command-level interpreter (CECI) and ADDRESS?
Back to top
View user's profile Send private message
feellikeneo

New User


Joined: 19 Mar 2007
Posts: 73
Location: Chennai

PostPosted: Sun Jan 24, 2010 11:08 pm
Reply with quote

I have looked into CECI. But that enables me only to read some files or TDQ.. Not CWA.. Appreciate if you could provide any specific commands to read CWA using CECI.

And ADDRESS, this doesn't help me to read the data. This returns me some HEX address space, which I already have. I need to read the data at that address space.
Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2146
Location: At my coffee table

PostPosted: Sun Jan 24, 2010 11:31 pm
Reply with quote

You could always invoke CEDF on any transaction and from there invoke CECI to get the address of the CWA and view it directly with the CEDF's storage viewing
Back to top
View user's profile Send private message
Bill O'Boyle

CICS Moderator


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

PostPosted: Sun Jan 24, 2010 11:41 pm
Reply with quote

Ever since CICS/ESA 4.1, you can invoke CECI from CEDF. Place your terminal under CEDF and enter an eligible transid. After getting past "PROGRAM INITIATION", press <PF5> (Working-Storage), then press <PF5> again and you will have launched CECI. Issue the ADDRESS API and copy the CWA address, press <PF3> and you'll be returned to Working-Storage. At the top of this screen, paste in the CWA address and press <Enter>. You'll now be viewing the CWA data. If the CWA length is unknown, while you're in CECI, issue an ASSIGN CWALENG API.

You'll need to map the CWA data with a copy of the CWA layout from your application system.

Bill
Back to top
View user's profile Send private message
Bill O'Boyle

CICS Moderator


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

PostPosted: Sun Jan 24, 2010 11:42 pm
Reply with quote

Guy,

You beat me to it.... icon_redface.gif

Bill
Back to top
View user's profile Send private message
feellikeneo

New User


Joined: 19 Mar 2007
Posts: 73
Location: Chennai

PostPosted: Mon Jan 25, 2010 12:03 am
Reply with quote

thanks Bill & Guy for ur suggestion..
I may be putting more constraints.. I am having problem in my production environment, so I am not allowed to use CEDF icon_sad.gif

Can you recall any other ways ?
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19243
Location: Inside the Matrix

PostPosted: Mon Jan 25, 2010 1:07 am
Reply with quote

Hello,

Someone has permission to use CEDF in production. . .

Work with them or tell your management that you need permission to do this temporarily to resolve the issue.
Back to top
View user's profile Send private message
Earl Haigh

Active User


Joined: 25 Jul 2006
Posts: 475

PostPosted: Mon Jan 25, 2010 1:29 am
Reply with quote

Quote:
I am having problem in my production environment, so I am not allowed to use CEDF


Thats odd, you are responsible for an application that uses the
CWA, but you can access CECI and NOT CEDF in your production
region.

As Dick suggests, talk to your management.
Back to top
View user's profile Send private message
Bill O'Boyle

CICS Moderator


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

PostPosted: Wed Jan 27, 2010 7:59 pm
Reply with quote

If you are authorized to use TMON for CICS, logon, then look for selection "STORAGE ANALYSIS", then "CICS CONTROL BLOCKS", then "CSA COMMON SYSTEM AREA". Place you cursor under the CSA address and press <Enter>. Then on the command line, enter FLD=CSACWAA and press <Enter>. Place your cursor under the address associated with CSACWAA and press <Enter>. You are now viewing the CWA associated with the given region.

If you need the CWA length, from "CICS CONTROL BLOCKS", locate "SIT SYSTEM INITIALIZATION TABLE", place your cursor under this and press <Enter>. Then on the command line, enter FLD=SITCWA and press <Enter>. This will give you the CWA length as a binary-halfword in hex.

Bill
Back to top
View user's profile Send private message
Bill O'Boyle

CICS Moderator


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

PostPosted: Wed Jan 27, 2010 8:23 pm
Reply with quote

A correction. The CWA length is adjacent to the CWA address in the CSA as a binary-halfword. You don't have to look at the SIT unless you're curious.

Bill
Back to top
View user's profile Send private message
feellikeneo

New User


Joined: 19 Mar 2007
Posts: 73
Location: Chennai

PostPosted: Thu Jan 28, 2010 4:14 am
Reply with quote

Bill,

That was a great input. We do not have TMON in my site, but have Omegamon. I am pursuing if I can use Omegamon to read CWA data.
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 -> CICS

 


Similar Topics
Topic Forum Replies
No new posts db2 vs static data COBOL Programming 1
No new posts External data queue (changes?) CLIST & REXX 0
No new posts Pull data using date difference betwe... DB2 6
No new posts fast data scrambling PL/I & Assembler 10
No new posts How to save SYSLOG as text data via P... All Other Mainframe Topics 4
Search our Forums:

Back to Top