Re: print line greater than 132?

Michael, 

It looks like you are using the default print file QPRINT. You will need to
create a new print file to use that has the required length you want for the
report. 

CRTPRTF FILE(QTEMP/TESTPRT) PAGESIZE(66 133)

Once created you can use the ovrprtf command in your cl to point to the new
print file or you can reference it on you select statement. 

Hope this helps. 

Jerry Thomas

-----Original Message-----
From: cobol400-l-bounces@xxxxxxxxxxxx
[mailto:cobol400-l-bounces@xxxxxxxxxxxx] On Behalf Of Michael Rosinger
Sent: Thursday, November 02, 2006 5:01 AM
To: cobol400-l@xxxxxxxxxxxx
Subject: [COBOL400-L] print line greater than 132?

List,

I am feverishly working on migrating and converting several COBOL programs 
from VSE (mainframe) to iSeries. One problem I've come up against is a 
program that produces a report with a print line greater than 132. COBOL/ILE

allows it and it compiles fine, but at run-time I get a message about 
truncation and I see in the report that the print line truncated at 132 
characters.

Here are the COBOL definitions:

000990 INPUT-OUTPUT SECTION.
001000 FILE-CONTROL.
001010     SELECT PRINT-FILE1 ASSIGN TO PRINTER-QPRINT.
001020 EJECT
001030 DATA DIVISION.
001040 FILE SECTION.
001050 SKIP3
001060 FD PRINT-FILE1
001090     RECORD CONTAINS 133 CHARACTERS.

So what do I need to do to get a program to print a report with a print line

wider than 132?  TIA!