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

ASG-SMARTTEST : Disable displays in cobol while debugging...


IBM Mainframe Forums -> All Other Mainframe Topics
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
NOWAR

New User


Joined: 20 Feb 2007
Posts: 11
Location: Houthalen, Belgium

PostPosted: Mon Oct 15, 2007 6:04 pm
Reply with quote

Hey,

I'm debugging a cobol program in ASG-SMARTTEST 7.3 (OS : Z/OS 1.8) and in this cobol-source you have severals display-statements, which normally displays information in the sysout of the job. But if you debug the program by PF4 (go run), you see for each display-statement the displayed line on de console, and everytime a console-screen is full you must press enter to go further and that is not fine. Is there a way that you must not press enter every time the screen is full. Is there an command (or set an function) that the enter must not press manual everytime ?

Thanks a lot
Back to top
View user's profile Send private message
shreevamsi

Active User


Joined: 23 Feb 2006
Posts: 305
Location: Hyderabad,India

PostPosted: Fri Jan 18, 2008 3:58 pm
Reply with quote

Did u try commenting out
SOURCE-COMPUTER. IBM-30XX WITH DEBUGGING MODE. for
*SOURCE-COMPUTER. IBM-30XX.
Back to top
View user's profile Send private message
NOWAR

New User


Joined: 20 Feb 2007
Posts: 11
Location: Houthalen, Belgium

PostPosted: Wed Jan 23, 2008 11:58 am
Reply with quote

I didn't try that. But a friend at work told me to change the sysout in the JCL to the X-class.
So in the jcl (or in the generated clist) you must write SYSOUT=X
Than the dislays are not displayed anymore at the console, only in the spool. And this is working.
In the next post I will give an example. I hope that somebody could use this information.
Back to top
View user's profile Send private message
NOWAR

New User


Joined: 20 Feb 2007
Posts: 11
Location: Houthalen, Belgium

PostPosted: Wed Jan 23, 2008 12:26 pm
Reply with quote

Here is a example :

//PEAPB*** EXEC ***,PGMNAM='PEAPB***',
// PGMPAR='200700150N1N'
//OVERLAY1 DD DSN=...,
// DISP=(,CATLG,KEEP),
// UNIT=DISK,
// SPACE=(CYL,(10,4),RLSE),
// RECFM=FB,LRECL=256,BLKSIZE=0
//SYSOUT DD SYSOUT=X (--> this statement is important for smartest. This will not display the display-statements on the console but on the spool)
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: Wed Jan 23, 2008 8:47 pm
Reply with quote

Hello,

Thank you for posting your solution icon_smile.gif

Keep in mind that SYSOUT=X may be specific to your system - other systems may use a different sysout class.
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 -> All Other Mainframe Topics

 


Similar Topics
Topic Forum Replies
No new posts Replace each space in cobol string wi... COBOL Programming 3
No new posts COBOL -Linkage Section-Case Sensitive COBOL Programming 1
No new posts COBOL ZOS Web Enablement Toolkit HTTP... COBOL Programming 0
No new posts Calling DFSORT from Cobol, using OUTF... DFSORT/ICETOOL 5
No new posts Generate random number from range of ... COBOL Programming 3
Search our Forums:

Back to Top