Luc, although it might occur to you spontaneously||naturally, it's
possible to "get crazy" with the zebra stripe functionality.

 

In my volunteer/parent work coaching cross country kids, I developed a
couple of "Top Secret" comparative performance report that changes
zebra-gray color to a school-specific color based on the value of the
SchoolID field in the runners record.  What that means, in simple terms
is, when one of my 'SAA' runners appears in the report, the box color is
changed to blue.

 

Specifically, here's my 'On Before Generate' EEP (with "enhanced"
comments):

 

--**********************************************************

--*** "WHERE_ARE_OUR_RUNNERS.EEP" **************************

--**********************************************************

--*** On_Before_Generate routine extending ZEBRA-stripes ***

--*** to visually accentuate where our kids finished     ***

--*** among all the competitors in a given race.         ***

--**********************************************************

 

--*************************************

--*** ComponentID = rcshp_ZebraBox, ***

--*** defined & located on report.  ***

--*** Default color = custom_gray   ***

--*************************************

PROPERTY rcshp_ZebraBox BRUSH_COLOR '[R192,G192,B192]'

 

--*** ZEBRA STRIPE *****************************

--*** vPositionCounter, defined in report,   ***

--*** uses stored value of runner's position ***

--*** at finish of race (based on WHERE ...  ***

--**********************************************

--*** Is counter variable ODD||EVEN?         ***

--**********************************************

IF (MOD(.vPositionCounter,2)) = 1 THEN

   --*** Make shape-box visible, i.e. gray  ***

   PROPERTY rcshp_ZebraBox VISIBLE 'TRUE'

ELSE

   --*** Make shape-box invisible, ="white" ***

   PROPERTY rcshp_ZebraBox VISIBLE 'FALSE'

ENDIF

 

--*************************************

--*** WHEN IT'S ONE OF OUR KIDS *******

--*************************************

--*** St. Agnes Girl ******************

IF vNameOfSchoolCD = 'SAA' THEN

   --*** Paint shape-box BLUE ***

   PROPERTY rcshp_ZebraBox BRUSH_COLOR '[R120,G140,B255]'

   PROPERTY rcshp_ZebraBox VISIBLE 'TRUE'

ENDIF

 

--*** St. Dominic Boy ******************

IF vNameOfSchoolCD = 'SDS' THEN

   --*** Paint shape-box PURPLE ***

   PROPERTY rcshp_ZebraBox BRUSH_COLOR '[R190,G140,B255]'

   PROPERTY rcshp_ZebraBox VISIBLE 'TRUE'

ENDIF

 

RETURN

 

Now, all that shown, you might imagine how much "fun" this can be, even
to the point silliness.

 

I would add that, if such nuance of hue were required in an
app'||report, it would probably be better to define its location in the
appropriate table(s) in the database, store the [RGB] values
accordingly, then assign them to a (report) variable as needed.
(Obviously, I don't always practice what I preach ...)

 

HTH,

Steve in Memphis

 

 

 

 

From: [email protected] [mailto:[email protected]] On Behalf Of Luc
Delcoigne
Sent: Wednesday, June 30, 2010 9:14am 09:14
To: RBASE-L Mailing List
Subject: [RBASE-L] - zebra stripes on reports

 

HI, 

 

i have a report and I want to print the detail lines with a "zebra"
stripe pattern, in a color of my choice.

How to do this is obvious for forms, but I haven't sorted out yet how to
do this on a report.

 

I suppose it will also be something simple......

 

Any help would be welcome...

 

Luc delcoigne

Reply via email to