lncolor = RGB(0,0,0)
IF m_activecoll # 0
cfld = EVALUATE(FIELD(m_activecoll,"xtabresult")) && Change the name of the cursor (xtabresult) if you needIFTYPE("cfld") == "C"
.... colors (DOCASE listed before)
ENDIFENDIF
Is xtabresult alias exists?
Against Stupidity the Gods themselves Contend in Vain - Johann Christoph Friedrich von Schiller The only thing normal about database guys is their tables.