View previous topic :: View next topic
|
Author |
Message |
shikhagupta33
New User
Joined: 11 Apr 2005 Posts: 7 Location: Bangalore
|
|
|
|
Hi All,
I my previous project I was using TRACE ON (on command line) while I opened my cobol program in edit mode. The TRACE on used to display all the PAPAs called while execution of the program. For some reasons my intertest is not working. So I am trying TRACE on option, so that I get the flow of my program for a given i/p record. But in this project it seems TRACE on is not working.
It would be really helpful If anybody can provide me the REXX routine for the same. |
|
Back to top |
|
|
Bill O'Boyle
CICS Moderator
Joined: 14 Jan 2008 Posts: 2501 Location: Atlanta, Georgia, USA
|
|
|
|
With the introduction of COBOL II, some 20+ years ago, the TRACE option (assuming that you're referring to READY TRACE) was removed.
The following link outlines features which were removed from OS/VS COBOL upon migration to VS COBOL II -
ibmmainframes.com/references/a10.html
Regards, |
|
Back to top |
|
|
shikhagupta33
New User
Joined: 11 Apr 2005 Posts: 7 Location: Bangalore
|
|
|
|
Oh! I did not know this. But I need TRACE on urgently. Does anybody have the REXX tool for that. Would u mind sharing that with me? |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19243 Location: Inside the Matrix
|
|
|
|
Hello,
The rexx trace is for trouble-shooting rexx code. I've not seen it used to trace cobol.
If your system has intertest, it would probably be a good thing to do to determine why it is not now working. Possibly working with the technical support people can get intertest working again.
If not and something must be worked with today, suggest you place some DISPLAY statements thru the code to manually track the code. |
|
Back to top |
|
|
shikhagupta33
New User
Joined: 11 Apr 2005 Posts: 7 Location: Bangalore
|
|
|
|
The TRACE ON can be keyed in on command line (while cobol code is opened in edit mode). The hit enter, it will put display statements in every para.
like
A000-PARA1.
DISPLAY " A000-PARA1."
MOVE A TO B.
---
---
---
B000-PARA2.
DISPLAY " B000-PARA2."
MOVE D TO F.
Then the pgm needs to be compiled to get the desired result. |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19243 Location: Inside the Matrix
|
|
|
|
Hello,
This TRACE sounds like a site-specific utiliity that inserts/removes a DISPLAY after each paragraph name.
You might look here for a similar tool that you could use on your system (Thanks to Anuj )
ibmmainframes.com/viewtopic.php?t=38498 |
|
Back to top |
|
|
shikhagupta33
New User
Joined: 11 Apr 2005 Posts: 7 Location: Bangalore
|
|
|
|
Thank you for the code. I will try it. |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6248 Location: Mumbai, India
|
|
|
|
Hi,
If you face any problem in using that, please let me know. |
|
Back to top |
|
|
Terry Heinze
JCL Moderator
Joined: 14 Jul 2008 Posts: 1248 Location: Richfield, MN, USA
|
|
|
|
The "USE FOR DEBUGGING ON ALL PROCEDURES" clause in Enterprise COBOL acts very similar to what READY TRACE did in OS/VS COBOL. See Programming Language Reference Manual, DEBUGGING Declarative. |
|
Back to top |
|
|
karz
New User
Joined: 04 Feb 2010 Posts: 39 Location: Mumbai
|
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
Anuj,
welcome to 99% of the problem of providing code to rookies - support! |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6248 Location: Mumbai, India
|
|
|
|
Well, that's why Indian gets most of the support projects - I, for one, sometimes feel - do the people like us have future in India in IT or should I move to some other country. It looks like, there is no more fun in IT around here - I'm disappointed. |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
rename it to something like ADDDISP
trace and derivatives are reserved words. |
|
Back to top |
|
|
karz
New User
Joined: 04 Feb 2010 Posts: 39 Location: Mumbai
|
|
|
|
Anuj, dont get disappointed..new starters do face such problems..and we woudl learn from experiences only... |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
my using the term rookies has nothing to do with ethnic background.
is only has to do with experience.
and don't read anything else into my comment. |
|
Back to top |
|
|
karz
New User
Joined: 04 Feb 2010 Posts: 39 Location: Mumbai
|
|
|
|
renamed the rexx to ADDDISP, did num OFF on my source and then did TSO ADDDISP...but it did not work |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6248 Location: Mumbai, India
|
|
|
|
Ok, when you say - it did not work; what exactly happened actually? |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
try leaving num std cob |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
also,
do all your paragraph/section names begin in column 8? |
|
Back to top |
|
|
karz
New User
Joined: 04 Feb 2010 Posts: 39 Location: Mumbai
|
|
|
|
yes..all my para names start from column 8..teh rexx does executes..i mean teh screen flashes for a sec just like when REXX executes..but then no displays are inserted.. |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
since this is an edit macro, you do not need (actually you should not)
type TSO macroname
simply type macroname on command line. |
|
Back to top |
|
|
|