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

Debugging with EDF


IBM Mainframe Forums -> CICS
Post new topic   Reply to topic
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
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: 8569
Location: Dubuque, Iowa, USA

PostPosted: Wed Jan 13, 2016 5:35 am
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: 2504
Location: Atlanta, Georgia, USA

PostPosted: Wed Jan 13, 2016 8:08 pm
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
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 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
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
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 View Bookmarks
All times are GMT + 6 Hours
Forum Index -> CICS

 


Similar Topics
Topic Forum Replies
No new posts Not able to view the values of variab... CA Products 1
No new posts Compiling program in endeavor for tra... Compuware & Other Tools 4
No new posts Starts DEBUGGING by Procedure Divisio... Testing & Performance 4
No new posts Debugging Native Stored procedure in ... IBM Tools 0
No new posts TELON WITH DB2 DEBUGGING SETUP REQUIRED ABENDS & Debugging 1
Search our Forums:

Back to Top