<b>
* this method provides the colored cells for the grdStages
* they match the colors of the pages from the stack ticket

lparameter pnRecno

do case
   case ( pnRecno = 1 )            && Yard
      return rgb( 255, 255, 255 )
   case ( pnRecno = 2 )            && Pre Dryer
      return rgb( 255, 255, 0 )
   case ( pnRecno = 3 )            && Kiln
      return rgb( 255, 128, 255 )
   case ( pnRecno = 4 )            && Cooling Shed
      return rgb( 255, 128, 0 )
   case ( pnRecno = 5 )            && Plant
      return rgb( 255, 255, 164 )
   otherwise
      return rgb( 192, 192, 192 )
endcase
<b>