FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Re: report with tdatabase condition - resolved !!
Posts: 7317
Joined: Thu Oct 18, 2012 07:17 PM
Re: report with tdatabase condition - resolved !!
Posted: Fri Apr 30, 2021 05:16 PM

I wish insert the shadow of this column it ::oPrenota:datapayed not empty

COLUMN TITLE "CLIENTE " DATA ::oPrenota:GUEST SHADOW

how I can resolve ?

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
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: report with tdatabase condition
Posted: Sat May 01, 2021 07:57 AM

Silvio,

Try it this way:

COLUMN oCol TITLE "CLIENTE " DATA ::oPrenota:GUEST SHADOW

ACTIVATE REPORT ... ON STARTLINE oCol:lShadow := ! Empty( ::oPrenota:datapayed )

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 7317
Joined: Thu Oct 18, 2012 07:17 PM
Re: report with tdatabase condition
Posted: Sat May 01, 2021 03:32 PM

Antonio,
give me this error

Error description: Error BASE/1003 Variabile inesistente: OCOL

Stack Calls

Called from: source\spiaggia\PSituaz.prg => (b)TREPSITUAZIONE_ACTIVATE( 81 )

I sent you a test

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
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: report with tdatabase condition
Posted: Sun May 02, 2021 02:16 PM

A "local oCol" is missing

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 7317
Joined: Thu Oct 18, 2012 07:17 PM
Re: report with tdatabase condition
Posted: Sun May 02, 2021 04:11 PM
Antonio Linares wrote:A "local oCol" is missing


I put this local variable and it make error same

Code (fw): Select all Collapse
METHOD Activate() CLASS TRepSituazione
   local oCol

   IF  ::lActivate

   ::oReport:bSkip := { || ::oPrenota:skip(1) }

   ACTIVATE REPORT ::oReport WHILE !::oPrenota:eof()     ;
              ON STARTLINE oCol:lShadow := ! Empty( ::oPrenota:DATAPAYED )

ENDIF

   ::oFont:End()

   ::oPrenota:SETFILTER("")
   ::oPrenota:Close()

   RETURN NIL
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
Posts: 7317
Joined: Thu Oct 18, 2012 07:17 PM
Re: report with tdatabase condition - resolved !!
Posted: Sun May 02, 2021 04:16 PM
Corrected

ACTIVATE REPORT ::oReport WHILE !::eof() ;
ON STARTLINE ::aColumns[ 3 ]:= ! Empty( ::DATAPAYED )
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

Continue the discussion