Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

How do I print Legal Size forms using fujitsu cobol v3.0

Status
Not open for further replies.

juvi4

Programmer
Jan 30, 2001
1
0
0
US
I am unable to print anything other than standard 8 1/2 x 11" paper when what I must print is legal size (8 1/2 x 14".) I can't seem to figure out what is missing? Is there a clause in my FD for the report file which controls paper size. Is there an option I'm omitting? I used to program mainframes (a long time ago) and simply counted print lines and ejected a page when necessary.

Fujitsu cobol v3.0
Windows 98
HP932c printer.

Thank you very much, Juvi4
 
Have you tried this? Just adjust your linage to fit..

You may also need to modify your window settings for your printer.


SELECT PRINT-FIL-HD
ASSIGN TO VARYING PRNT-HD-NAM
FILE STATUS IS PRNT-FIL-HD-STAT.

DATA DIVISION.

FILE SECTION.

FD PRINT-FIL-HD
LABEL RECORDS ARE OMITTED
LINAGE IS 66 LINES
WITH FOOTING AT 62.
01 PRINT-LINE-HD PIC X(132).

WORKING-STORAGE SECTION.


01 PRNT-HD-NAM.
03 PRNT-HD-NAM1.
05 PRNT-FIL-NAM1 PIC X(06) VALUE "DRBPRT".
05 PRNT-FIL-NAM2 PIC X(02) VALUE SPACES.
05 PRNT-FIL-NAM3-EXT PIC X(04) VALUE ".PRT".
03 PRNT-FIL-NAM4-TYPE PIC X(03) VALUE "".

01 PRNT-FIL-HD-STAT PIC X(02) VALUE SPACES.
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top