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
 
suppressing printer carriage control characters in file

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CA Products
View previous topic :: :: View next topic  
Author Message
deepag02

New User


Joined: 23 Jul 2007
Posts: 20
Location: India

PostPosted: Tue Sep 11, 2007 5:43 pm    Post subject: suppressing printer carriage control characters in file
Reply with quote

hi all,

Is there any way i can suppress the printing of printer carriage control characters in a file?

Thanks in advance.

Deepa.
Back to top
View user's profile Send private message

William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3158
Location: Tucson AZ

PostPosted: Tue Sep 11, 2007 5:49 pm    Post subject:
Reply with quote

Don't output FBA?
A little more info would be nice.....
icon_confused.gif
Back to top
View user's profile Send private message
Devzee

Active Member


Joined: 20 Jan 2007
Posts: 684
Location: Hollywood

PostPosted: Tue Sep 11, 2007 7:20 pm    Post subject:
Reply with quote

Overwrite column 1 with spaces
Back to top
View user's profile Send private message
deepag02

New User


Joined: 23 Jul 2007
Posts: 20
Location: India

PostPosted: Wed Sep 12, 2007 6:08 pm    Post subject:
Reply with quote

Hi,

Sorry,I guess i was not clear on my question.My reqirement is that i need to generate a report with the count of messages extracted from a MQ.The counts are fine but i am also getting the printer carriage control characters in the 1st position but i dont want them.The file is defined as :

OUTFILE DD DSN=OFRT.COMBINE.PARSE.OUT2.NEW,
DISP=(,CATLG,DELETE),
UNIT=SYSDA,SPACE=(CYL,(3,2),RLSE),
DCB=(RECFM=FB,LRECL=500,BLKSIZE=5000)

Is there anyway i can prevent the printer carriage control characters from being printed in my report or will i have to reprocess this file to remove them such as over writing them with spaces.
Back to top
View user's profile Send private message
Devzee

Active Member


Joined: 20 Jan 2007
Posts: 684
Location: Hollywood

PostPosted: Wed Sep 12, 2007 6:57 pm    Post subject:
Reply with quote

How is this OUTFILE is generated? Is this generated thru SORT utility?
Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Wed Sep 12, 2007 6:58 pm    Post subject:
Reply with quote

What is the definition of what you are generating the report with? COBOL? SELECT & FD?
Back to top
View user's profile Send private message
Craq Giegerich

Senior Member


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

PostPosted: Thu Sep 13, 2007 7:07 am    Post subject:
Reply with quote

CICS Guy wrote:
What is the definition of what you are generating the report with? COBOL? SELECT & FD?


And what format of write are you using?
Back to top
View user's profile Send private message
deepag02

New User


Joined: 23 Jul 2007
Posts: 20
Location: India

PostPosted: Thu Sep 13, 2007 12:14 pm    Post subject:
Reply with quote

Hi,

I am creating this file as an o/p of eazytrieve which use report processing.

definition in eazytrieve:
FILE OUTFILE PRINTER FB(500 500)

report
REPORT RPT2 SUMMARY LINESIZE 132 PRINTER OUTFILE
SEQUENCE W-MESSAGE-COUNT
CONTROL W-MESSAGE-COUNT
LINE 'STATISTICS'
TERMINATION. PROC
DISPLAY 'TOTAL MESSAGES EXTRACTED IS ' W-MESSAGE-COUNT

in the job its defined as

OUTFILE DD DSN=OFRT.COMBINE.PARSE.OUT2.NEW,
DISP=(,CATLG,DELETE),
UNIT=SYSDA,SPACE=(CYL,(3,2),RLSE),
DCB=(RECFM=FB,LRECL=500,BLKSIZE=5000)

END-PROC
Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Thu Sep 13, 2007 1:14 pm    Post subject:
Reply with quote

deepag02 wrote:
FILE OUTFILE PRINTER FB(500 500)
Treat the output like a file instead of a printer....
Quote:
REPORT RPT2 SUMMARY LINESIZE 132 PRINTER OUTFILE
Replace the word PRINTER with the word FILE.....
I don't know, but that might help.....
Back to top
View user's profile Send private message
deepag02

New User


Joined: 23 Jul 2007
Posts: 20
Location: India

PostPosted: Thu Sep 13, 2007 2:43 pm    Post subject:
Reply with quote

hey that worked!!!!! i was able to get the messages but not the header,counts,tally etc now they have dissappeared when i gave
REPORT RPT2 SUMMARY LINESIZE 132 FILE OUTFILE
...the printer carriage control characters are removed.......

one more doubt i have two reports to be printed and i am printing in the same file so i have one more report stmt belowthe one shown.....
as
REPORT RPT SUMMARY LINESIZE 132 FILE OUTFILE

the first stmt is not showing any error but the above stmt is giving an error NOT A VALID FILE - OUTFILE
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Thu Sep 13, 2007 6:12 pm    Post subject:
Reply with quote

Might help to give the second a different name for OUTFILE and add a DD-statement for this new file.
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 -> CA Products All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts line 52: Name or string > 250 char... Ashishpanpaliya CLIST & REXX 5 Sat Oct 14, 2017 2:29 am
No new posts Execute JCL step based on the content... sprikitik JCL & VSAM 2 Tue Oct 03, 2017 10:03 am
This topic is locked: you cannot edit posts or make replies. PS file data should be passed as symb... d_sarlie JCL & VSAM 15 Tue Oct 03, 2017 5:18 am
No new posts Garbage on output file Hervey Martinez SYNCSORT 4 Wed Sep 27, 2017 12:50 am
No new posts File Aid tool to compare numeric data balaji81_k Compuware & Other Tools 2 Tue Sep 26, 2017 3:35 am

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