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

Reduce Spool be removing display statement.


IBM Mainframe Forums -> COBOL Programming
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Adnan Khambaty

New User


Joined: 26 Feb 2008
Posts: 2
Location: Mumbai

PostPosted: Wed Jun 10, 2009 7:00 pm
Reply with quote

Hi,
I Have a query, where my program A is calling Program B.
Say if there is some error then Program B Displays that error... and this error is displayed in my spool.. Since there is huge data. the Display in my spool is also huge. As Program B is being used by almost 80 other program hence i cant change remove the display statement from the Program...
Is there any alternative where in i can remove the display coming from Program B without any major modifications..
Back to top
View user's profile Send private message
Craq Giegerich

Senior Member


Joined: 19 May 2007
Posts: 1512
Location: Virginia, USA

PostPosted: Wed Jun 10, 2009 7:15 pm
Reply with quote

You could assign sysout for that step to a class that would be discarded, but then you might lose messages that you need.
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


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

PostPosted: Thu Jun 11, 2009 6:23 am
Reply with quote

Hello,

You might also consider writing that sysout to dasd.

Suggest maybe the huge number of errors be dealt with so that there will be less to display. . .
Back to top
View user's profile Send private message
Adnan Khambaty

New User


Joined: 26 Feb 2008
Posts: 2
Location: Mumbai

PostPosted: Thu Jun 11, 2009 9:56 am
Reply with quote

Thanks all for the response...

But basically i wanted to eliminate all the Display coming from the Program B.. Writing the sysout to dasd is okie.. but i wont be getting the display from my Main Program into sysout..

EG:
Main Program A-
Call Program B
If error "Display ERROR"
Return to main program.
Display " Successful complete"
END PROGRAM.

In the above example i dont want to Display Statement "
Display ERROR" to be dispalyed in Sysout. But i want "Successful complete" to be dispalyed in sysout.

Thanks for help in advance.........!
Back to top
View user's profile Send private message
Anuj Dhawan

Superior Member


Joined: 22 Apr 2006
Posts: 6250
Location: Mumbai, India

PostPosted: Thu Jun 11, 2009 2:17 pm
Reply with quote

What version control tool do you use? If that is change-man -- best solution would be to get a "copy" of "Program B" in some package, keep only those DISPLAYs which you need and in JCL override the STEPLIB to point to this "new library".

Even if that's Endeavour, it should be doable in a similar fashion, I believe.
Back to top
View user's profile Send private message
Anuj Dhawan

Superior Member


Joined: 22 Apr 2006
Posts: 6250
Location: Mumbai, India

PostPosted: Thu Jun 11, 2009 2:20 pm
Reply with quote

Quote:
In the above example i dont want to Display Statement "
Display ERROR" to be dispalyed in Sysout. But i want "Successful complete" to be dispalyed in sysout.
There is no magic you can implement here -- DISPLAY would do what it is supposed to do; if control reaches to "error message" it will display error unless you remove/comment-out that DISPLAY statement from the program.
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 -> COBOL Programming

 


Similar Topics
Topic Forum Replies
No new posts Parallelization in CICS to reduce res... CICS 4
No new posts Search string in job at regular Spool... CLIST & REXX 0
No new posts JOIN STATEMENT PERFORMANCE. DFSORT/ICETOOL 12
No new posts How to display the leading zeros of a... DB2 7
No new posts Capturing logs from spool dd JCL & VSAM 6
Search our Forums:

Back to Top