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

breakpoint before every CALL


IBM Mainframe Forums -> Compuware & Other Tools
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
jerryte

Active User


Joined: 29 Oct 2010
Posts: 201
Location: Toronto, ON, Canada

PostPosted: Tue Jul 03, 2012 11:22 pm
Reply with quote

How do I set a breakpoint before every CALL statement in COBOL? Also which manual provides information about this? Thanks
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 Jul 04, 2012 1:13 am
Reply with quote

What if you set the Breakpoint to the first line of executable code in the Called sub-program?

Is it the Caller you're concerned with or the Called sub-program?
Back to top
View user's profile Send private message
jerryte

Active User


Joined: 29 Oct 2010
Posts: 201
Location: Toronto, ON, Canada

PostPosted: Wed Jul 04, 2012 1:35 am
Reply with quote

This still requires me to manually set the breakpoints one at a time. I am debugging a mainline program that calls a lot of subroutines. I want to execute the subroutine and then check the results immediately afterwards. There doesn't seem to be an easy way to do this.
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6967
Location: porcelain throne

PostPosted: Wed Jul 04, 2012 1:49 am
Reply with quote

xpeditor? intertest? debug tool?
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8591
Location: Dubuque, Iowa, USA

PostPosted: Wed Jul 04, 2012 5:20 am
Reply with quote

Xpediter allows BEFORE ALL CALL but since you didn't tell us which product you are using, I'm not sure if that is relevant.
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6967
Location: porcelain throne

PostPosted: Wed Jul 04, 2012 7:20 am
Reply with quote

For xpeditor,
i wrote a rexx to scan thru a compiler listing,
that way I had the correct pg/ln
for my scripts containing
BEFORE and AFTER BREAK points.
Back to top
View user's profile Send private message
jerryte

Active User


Joined: 29 Oct 2010
Posts: 201
Location: Toronto, ON, Canada

PostPosted: Wed Jul 04, 2012 7:11 pm
Reply with quote

We have Xpediter/TSO 9.0

I might try the rexx idea and generate a script
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6967
Location: porcelain throne

PostPosted: Wed Jul 04, 2012 7:22 pm
Reply with quote

another way:
when in source mode,
x all, find all "call",
A newline
A newline
A newline
A newline
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6967
Location: porcelain throne

PostPosted: Wed Jul 04, 2012 10:52 pm
Reply with quote

B newline,
since they are for BEFORE breaks.
Back to top
View user's profile Send private message
Ed Goodman

Active Member


Joined: 08 Jun 2011
Posts: 556
Location: USA

PostPosted: Thu Jul 05, 2012 9:13 pm
Reply with quote

Robert:
Quote:
Xpediter allows BEFORE ALL CALL but since you didn't tell us which product you are using, I'm not sure if that is relevant.


Jerryte:
Quote:
We have Xpediter/TSO 9.0

I might try the rexx idea and generate a script


Huh?
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 -> Compuware & Other Tools

 


Similar Topics
Topic Forum Replies
No new posts Issued a CMD call for /DIS & it r... IMS DB/DC 3
No new posts Call Natural program with rexx CLIST & REXX 2
No new posts CALL statement in COBOL for VSE COBOL Programming 3
No new posts Need example for CALL 'ISRSUPC' in COBOL COBOL Programming 2
No new posts trigger enter key automatically call ... CICS 17
Search our Forums:

Back to Top