Bruce,

> Sometimes life is so obvious it sneaks up on you.

Look in the SAMPLES\HRF\BASICS directory, and look at CUSTTABL.PRG, and run
the application to see the results.

This is how you might do it in XbHAL:

    USE Customer
    WHILE !EOF()
       cColr := iif( lChgClr := !lChgClr, '#cccccc#, '#9999ff' )
       ROW bgColor=(cColr)
          CELL ? CUSTOMER->CUSTNO
          CELL ? CUSTOMER->MR_MRS
          CELL ? CUSTOMER->LASTNAME
          CELL ? CUSTOMER->FIRSTNAME
          CELL ? CUSTOMER->ZIP
          CELL ? CUSTOMER->STREET
          CELL ? CUSTOMER->CITY
          CELL ? CUSTOMER->PHONE
          CELL ? CUSTOMER->FAX
       SKIP 1
    ENDDO
    CLOSE ALL

Regards,

Phil Ide

***************************************
* Xbase++ FAQ, Libraries and Sources: *
* goto: http://www.idep.org.uk/xbase  *
***************************************

Why isn't there another word for thesaurus?