lechusg 16 de Marzo del 2004
La siguiente instrucción te devuelve el nombre de la PC y el del usuario en la forma "PC # usuario"
SYS(0)
para separalos hace lo siguiente:
cInfo = SYS(0)
nPos = AT("#",cInfo)
cNombrePC = LEFT(cInfo, nPos - 1)
cUsuario = SUBSTR(cInfo, nPos + 1)