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
 

 

How to code DISPLAY in COBOL to see a record in SYSOUT (JCL)

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
Jonnala

New User


Joined: 22 Sep 2006
Posts: 12

PostPosted: Fri Sep 22, 2006 7:54 pm    Post subject: How to code DISPLAY in COBOL to see a record in SYSOUT (JCL)
Reply with quote

Hi,

Suppose I want to see a record called EMP-REC of EMP file in SYSOUT of the JCL.

How should I code in COBOL?? (UPON is not working)
Can any one of U please help me out ??

I tried in below way, but it's not working,

in COBOL program PGM1,
DISPLAY EMP-REC UPON BY SYSOUT.

In JCL,
//STEP010 STEP PGM=PGM1
//DD1.....
//DD2...
//SYSOUT DD SYSOUT=*

Regards,
Srikar

but in the above JOB's spool am not able to find SYSOUT.
Back to top
View user's profile Send private message

mmwife

Super Moderator


Joined: 30 May 2003
Posts: 1592

PostPosted: Sat Sep 23, 2006 8:13 pm    Post subject:
Reply with quote

Hi Jonnala,

Just code:
Code:

DISPLAY EMP-REC

I like to code it this way:
Code:

DISPLAY '>' EMP-REC '<' 

The >< shows you where the rec begins/ends. Sometimes the rec contains unprintable chars, so you may think it starts/ends at the wrong place.

If you see spaces in the spool rec enter "hex on" in the cmd line that will show you the hex chars of the chars you may think are spaces.

Use "hex off" to return to normal display.
Back to top
View user's profile Send private message
Jonnala

New User


Joined: 22 Sep 2006
Posts: 12

PostPosted: Sun Oct 08, 2006 10:56 pm    Post subject: Re: How to code DISPLAY in COBOL to see a record in SYSOUT (
Reply with quote

Thanks for your responce.

But you are not answered my query.
Back to top
View user's profile Send private message
guptae

Moderator


Joined: 14 Oct 2005
Posts: 1187
Location: Bangalore,India

PostPosted: Mon Oct 09, 2006 9:52 am    Post subject:
Reply with quote

Hi,

Did u give //SYSPRINT DD SYSOUT=* in ur jcl
Back to top
View user's profile Send private message
Jonnala

New User


Joined: 22 Sep 2006
Posts: 12

PostPosted: Mon Oct 09, 2006 9:56 am    Post subject:
Reply with quote

Yes Ekta
Back to top
View user's profile Send private message
guptae

Moderator


Joined: 14 Oct 2005
Posts: 1187
Location: Bangalore,India

PostPosted: Mon Oct 09, 2006 10:09 am    Post subject:
Reply with quote

HI,

Would u please copy ur jcl here.
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
No new posts RULES(NOEVENPACK) in cobol jackzhang75 COBOL Programming 5 Wed Mar 29, 2017 12:47 am
No new posts Record Not found in AlX but record re... mukun264 COBOL Programming 7 Fri Mar 24, 2017 9:28 am
No new posts Count the length of the record & ... sreekusr DFSORT/ICETOOL 4 Thu Mar 23, 2017 7:52 pm
No new posts JCL to Set Return code based on DB2 S... vinu78 DB2 17 Mon Mar 13, 2017 9:47 pm
No new posts Display FTP Session Count within TSO Yolanda Harvey TSO/ISPF 3 Fri Mar 10, 2017 10:31 pm


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