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
 

 

Reduce Spool be removing display statement.

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
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    Post subject: Reduce Spool be removing display statement.
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    Post subject:
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

Site Director


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

PostPosted: Thu Jun 11, 2009 6:23 am    Post subject:
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    Post subject:
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

Senior Member


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

PostPosted: Thu Jun 11, 2009 2:17 pm    Post subject:
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

Senior Member


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

PostPosted: Thu Jun 11, 2009 2:20 pm    Post subject:
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    IBMMAINFRAMES.com Support Forums -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
This topic is locked: you cannot edit posts or make replies. SDSF multiple spool datasets extracte... PJAlarcon CLIST & REXX 1 Fri Apr 21, 2017 10:50 pm
No new posts Count the length of the record & ... sreekusr DFSORT/ICETOOL 4 Thu Mar 23, 2017 7:52 pm
No new posts Display FTP Session Count within TSO Yolanda Harvey TSO/ISPF 3 Fri Mar 10, 2017 10:31 pm
No new posts To display values of multiple rows in... vinu78 DB2 2 Thu Mar 09, 2017 1:20 pm
No new posts REXX cdoe to purge a JOB from spool a... Sulabh Agrawal CLIST & REXX 11 Thu Mar 09, 2017 11:36 am


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