Report with a blank page after each printed one.

Posts: 723

Joined: Tue Sep 04, 2007 08:45 AM

Report with a blank page after each printed one.
Posted: Sat Jan 03, 2015 09:42 AM

Guys:

With the following code:

ACTIVATE REPORT oRep ON STARTLINE oRep:NewLine()

Every even page is blank. Odd pages have the printed records.
What I'm trying to accomplish is to have a double spaced report.
Removing the ON STARLINE .... the reports prints without blank pages.

Any clues ?

Silvio.Falconi

Posts: 7318

Joined: Thu Oct 18, 2012 07:17 PM

Re: Report with a blank page after each printed one.
Posted: Sat Jan 03, 2015 10:53 AM

do you have try the rep samples ?

then ..
starline ..NewLine make a white page

I use it only for the group sample :

ACTIVATE REPORT oReport ;
WHILE Test->State = "A" ;
FOR Test->Salary > 1000 ;
ON STARTGROUP oReport:NewLine() ;
ON END MessageBeep()

Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)

I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com

Silvio.Falconi

Posts: 7318

Joined: Thu Oct 18, 2012 07:17 PM

Re: Report with a blank page after each printed one.
Posted: Sat Jan 03, 2015 11:04 AM

i TRIED WITH LAST FWH :

Code (fw): Select all Collapse

#include "FiveWin.ch"
#include "report.ch"

STATIC oReport

Function Rep12()

     LOCAL oFont1, oFont2

     DEFINE FONT oFont1 NAME "ARIAL" SIZE 0,-10
     DEFINE FONT oFont2 NAME "ARIAL" SIZE 0,-10 BOLD

     USE TEST NEW
      index on state tag state to test


     REPORT oReport TITLE  "*** Fivewin Report ***"      ,;
                           "States begining with an A"   ,;
                           "and Salary greater than 1000" ;
          FONT oFont1, oFont2 ;
          PREVIEW

     COLUMN TITLE "St"         DATA Test->State

     COLUMN TITLE "First Name", "Last Name" ;
            DATA  Test->First, Test->Last

     COLUMN TITLE "Street", "City"  ;
            DATA  Test->Street, Test->City

     COLUMN TITLE "   Salary"  ;
            DATA  Test->Salary ;
            TOTAL              ;
            RIGHT              ;
            PICTURE "9,999,999";
            FONT 2             ;
            SIZE 9

     GROUP ON Test->State ;
           FOOTER "Total State "+oReport:aGroups[1]:cValue+ ;
                  " ("+ltrim(str(oReport:aGroups[1]:nCounter))+")" ;
           FONT 2


     END REPORT

     oReport:CellView()

     ACTIVATE REPORT oReport                 ;
          WHILE Test->State = "A"            ;
          FOR Test->Salary > 1000            ;
             ON STARTLINE       oReport:NewLine()    ;
          ON STARTGROUP oReport:NewLine()    ;
          ON END MessageBeep()

     CLOSE TEST

     oFont1:Release()
     oFont2:Release()

RETURN NIL

HERE NOT MAKE WHITE PAGES , THIS THE RESULT

Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)

I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com

FiveTech Support Forums

Continue the discussion