>>lnFields = allt(str(fcount("DirectAddress"))) >> >>Select DirectAddress.*, .T. as Direct, nSSC as Code; >>from DirectAddress; >>union select ResidueAddress.*, .F., Residue; >>from ResidueAddress; >>order by &lnFields desc; >>into Cursor AddressOrder nofilter >>>>HTH
>>>lnFields = fcount("DirectAddress") >>> >>>Select DirectAddress.*, .T. as Direct, nSSC as Code; >>>from DirectAddress; >>>union select ResidueAddress.*, .F., Residue; >>>from ResidueAddress; >>>order by Evaluate(lnFields) desc; >>>into Cursor AddressOrder nofilter >>>>>>Thanks in anticipation.