View previous topic :: View next topic
|
Author |
Message |
Delip
New User
Joined: 13 Sep 2007 Posts: 46 Location: Bangalore
|
|
|
|
Hi,
Is it possible to bring the pagenumber to the left side of the report.As of now,by default the pagenumber is displaying in the right. |
|
Back to top |
|
|
G-Johnson
New User
Joined: 12 Mar 2007 Posts: 20 Location: USA
|
|
|
|
I'm not aware of a way to move it, but you can try the idea below.
The NOPAGE option on the report line will cause the generated page number to not display. You can move PAGE-COUNT field to a WS field which can be part of your a HEADING. |
|
Back to top |
|
|
Delip
New User
Joined: 13 Sep 2007 Posts: 46 Location: Bangalore
|
|
|
|
Thank you.Is PAGE-COUNT command there in Easytrieve? |
|
Back to top |
|
|
G-Johnson
New User
Joined: 12 Mar 2007 Posts: 20 Location: USA
|
|
|
|
My mistake...use PAGE-NUMBER. I'm unsure if you can use that field as part of your heading, or if you'll need to create a WS field in the heading and move PAGE-NUMBER into it. |
|
Back to top |
|
|
Delip
New User
Joined: 13 Sep 2007 Posts: 46 Location: Bangalore
|
|
|
|
Hi,
I am getting error when i give like this
TITLE 1 COL 1 'PAGE ' PAGE-NUMBER
*******B082 NAME IS UNDEFINED - PAGE-NUMBER
Can you chek this |
|
Back to top |
|
|
G-Johnson
New User
Joined: 12 Mar 2007 Posts: 20 Location: USA
|
|
|
|
My bad...use PAGE-COUNT...the below worked for me.
REPORT RPT1 PRINTER RPT1 NOPAGE
TITLE 1 'PAGE' PAGE-COUNT
LINE 01 M-SUB |
|
Back to top |
|
|
Delip
New User
Joined: 13 Sep 2007 Posts: 46 Location: Bangalore
|
|
|
|
still no luck.Am I missing anything or is it some setting issue?Any idea?
REPORT TEMP NOADJUST PRINTER OFFLINE LINESIZE 132 +
NODATE NOPAGE
SEQUENCE TKLR-DATE TKLR-WORKER
CONTROL TKLR-DATE NEWPAGE NOPRINT TKLR-WORKER NOPRINT
TITLE 1 'PAGE ' PAGE-COUNT
*******B082 NAME IS UNDEFINED - PAGE-COUNT |
|
Back to top |
|
|
G-Johnson
New User
Joined: 12 Mar 2007 Posts: 20 Location: USA
|
|
|
|
not without seeing your code...below is an example of the one I got to work...it's a compile, line, and go
//PS00 EXEC PGM=EZTPA00,REGION=4096K
//SYSOUT DD SYSOUT=*
//SYSSNAP DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//*
//EZTVFM DD UNIT=SYSDA,SPACE=(CYL,(20,20))
//FILEMED DD DSN=your.file,
// DISP=SHR,BUFNO=100
//RPT1 DD SYSOUT=*
//SYSIN DD *
FILE FILEMED
M-SUB 4 9 A HEADING ('SUBMITTER')
FILE RPT1 PRINTER
JOB INPUT FILEMED
IF FILEMED:RECORD-COUNT > 200
STOP
END-IF
PRINT RPT1
*
REPORT RPT1 PRINTER RPT1 NOPAGE
TITLE 1 'PAGE' PAGE-COUNT
LINE 01 M-SUB |
|
Back to top |
|
|
|