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
 

 

Debugging with EDF

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS
View previous topic :: :: View next topic  
Author Message
Robert.Barnes

New User


Joined: 20 Oct 2014
Posts: 8
Location: Auckland, New Zealand

PostPosted: Wed Jan 13, 2016 5:16 am    Post subject: Debugging with EDF
Reply with quote

Is there an EXEC CICS command that I can put into a COBOL program that I can use with EDF like "Display"? Imagine
EXEC CICS DISPLAY Something END-EXEC
that causes EDF to show the same kind of displays as you would for any other EXEC CICS command. ("Something" = a COBOL field or constant). I wondered about INQUIRE but this seems oriented to various system control blocks, and doesn't seem to have an option that can be used as INQUIRE UserData(Something)
Back to top
View user's profile Send private message

Robert Sample

Global Moderator


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

PostPosted: Wed Jan 13, 2016 5:35 am    Post subject:
Reply with quote

Depending on how your site is set up, you might be able to use the COBOL DISPLAY statement. Check with your site support group.
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: Wed Jan 13, 2016 8:08 pm    Post subject: Reply to: Debugging with EDF
Reply with quote

Adding to Robert's post, check with your System folks to see if you can write to external TDQ's "CSMT", "CSSL", etc. In many shops, "CSMT" writes are routed to DD "MSGUSR".

Under the covers, when using the COBOL "DISPLAY" Verb, messages are routed to external TDQ "CESE".

Note that since the introduction of LE as an integral part of the COBOL Compiler (COBOL/370 - Circa 1992), the DISPLAY Verb is managed by LE.

Whereas, in earlier COBOL compilers. it wasn't and generated an SVC, which should never be used in CICS.

HTH....
Back to top
View user's profile Send private message
Robert.Barnes

New User


Joined: 20 Oct 2014
Posts: 8
Location: Auckland, New Zealand

PostPosted: Fri Jan 15, 2016 3:21 am    Post subject:
Reply with quote

Thank you Robert and Bill. I had believed that DISPLAY was invalid, but I find that I CAN write a DISPLAY statement and the COBOL compiles without complaint. (I'm using IBM Enterprise COBOL for z/OS 5.1.1 with CICS 5.1).

I am testing a web service provider, so I start testing with "CEDX CPIH,ON", so next I need to figure out how to access the TDQ "CESE" as I step through a CEDX session. Getting systems assistance is a bit fraught: they're in Dallas TX, and I'm in Auckland New Zealand, so we communicate via email and time zone issues mean that 24hr response to an email is the best I can do.

Thinking aloud: I need to coordinate the CEDX display with the display from COBOL DISPLAY statement. It occurs to me that I could probably achieve this by inserting EXEC CICS LINK PROGRAM('IEFBR14'). In fact if I use
EXEC CICS LINK PROGRAM('IEFBR14') COMMAREA(MyData) LENGTH(length of MyData)
I may have achieved what I want without the COBOL DISPLAY statement. I'll experiment and find out.

BTW: if anybody is interested in what I'm up to, have a look at my web site http://www.jazzsoftware.co.nz

Thanks for your help.
Regards, Robert Barnes. icon_biggrin.gif
Back to top
View user's profile Send private message
boyti ko

New User


Joined: 03 Nov 2014
Posts: 78
Location: Malaysia

PostPosted: Fri Jan 15, 2016 10:01 am    Post subject:
Reply with quote

In my shop, I can see my DISPLAY statements in CICS > CEEMSG. But as Robert told, depends on site set-up.
Back to top
View user's profile Send private message
Robert.Barnes

New User


Joined: 20 Oct 2014
Posts: 8
Location: Auckland, New Zealand

PostPosted: Tue Jan 19, 2016 2:22 am    Post subject: More:
Reply with quote

I wrote my own COBOL subprogram BR14 that does nothing, compiled this into my CICS load library, and then defined and installed it in my CICS group with CEDA. Now statements like: -
EXEC CICS LINK("BR14") COMMAREA(My-Variable)
are visible with CEDX. Exactly what I wanted.
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 -> CICS All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Starts DEBUGGING by Procedure Divisio... jackare Testing & Performance analysis 4 Sun Jan 10, 2016 10:37 pm
No new posts Debugging Native Stored procedure in ... paramoberoi IBM Tools 0 Wed Dec 23, 2015 11:55 am
No new posts TELON WITH DB2 DEBUGGING SETUP REQUIRED rathnamreddy ABENDS & Debugging 1 Sat Jul 18, 2015 11:01 am
No new posts soc 4 with dsnhli while debugging cic... manigadu IBM Tools 1 Sat Nov 22, 2014 1:05 pm
No new posts Debugging CICS w/o any third party tools dbzTHEdinosauer ABENDS & Debugging 0 Wed Sep 12, 2012 10:37 am


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