Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist 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 IEW2456E error when link-editing a C ... Senthilraj JCL & VSAM 0 Fri Oct 13, 2017 3:12 pm
No new posts Copy 4 byte of data from the last rec... arunsoods DFSORT/ICETOOL 9 Fri Oct 06, 2017 12:15 pm
No new posts display the sign only if the value is... useit DFSORT/ICETOOL 3 Wed Oct 04, 2017 5:53 pm
No new posts Assembler Macro Copybook converted to... Ziquilix PL/I & Assembler 4 Tue Sep 26, 2017 3:07 am
No new posts Speed-up/reduce CPU use of code prino PL/I & Assembler 0 Tue Sep 26, 2017 12:05 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us