LOL, John ---
Seriously, I don't usually do multiple expressions in the same line for ledgibility but I have been known to get psychotic with IIF() statements.
>LOL! Now, now John. Let's not get carried away here. I hate to be the next person to debug your app if you really write production code like that. Although it's very, very tight, debugging's got to be an adventure! :))
>
>(P.S. This is not in any way my opinion about your coding style, which I have no idea)
>
>>Hi John ---
>>
>>Yes, I know about the tag switch in SEEK, but I thought it might make the code less obvious; better to show the ORDER clause in the use so it'd be readily apparent....sort of a difference between tutorial code and production code. If this was production code it might be:
>>
>>USE userlist
>>RETU SEEK(SUBS(SYS(0),AT("#",SYS(0)),2,15),"userlist","username")
------------------------------------------------
John Koziol, ex-MVP, ex-MS, ex-FoxTeam. Just call me "X"
"When the going gets weird, the weird turn pro" - Hunter Thompson (Gonzo) RIP 2/19/05