LOCAL llReturn, luNet llReturn = DODEFAULT() IF llReturn AND ThisForm.txlUserID.TextBox.Enabled luNet = SYS(0) IF TYPE('luNet') # "N" AND RIGHT(luNet, 3) # "# 0" ThisForm.txlUserID.TextBox.Value = RIGHT(luNet, LEN(luNet) - ATC(" # ", luNet) - 2) ENDIF ENDIF RETURN llReturnHTH