Progress - Obtener nombre de maquina

 
Vista:

Obtener nombre de maquina

Publicado por Juan Carlos C. (4 intervenciones) el 09/12/2002 20:25:42
Que instrucción de progress puedo utilizar para cargar a una variable el nombre de la maquina en la que estoy trabajando en mi red ?
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Obtener nombre de maquina

Publicado por Gustavo Ferrer (115 intervenciones) el 10/12/2002 14:01:18
Revisa la sentencia USERID ó con estas instruciones

{windows.i}

/* el windows.i lo puedes conjseguir en cualquier pagina de progress si no lo consigues avisame para enviartelo, el mismo es muy util para otra funciones
*/

DEF VAR NAME AS CHAR NO-UNDO.
DEFINE VARIABLE Vls AS CHARACTER NO-UNDO.

RUN WinUserName(OUTPUT NAME).
Vls = NAME.
DISPLAY vls FORMAT "x(20)".

PROCEDURE WinUserName :
DEFINE OUTPUT PARAMETER NAME AS CHAR.

DEF VAR nr AS INTEGER NO-UNDO INITIAL 100.
DEF VAR ReturnValue AS INTEGER NO-UNDO.
NAME = FILL(" ", nr).
RUN GetUserName{&A} IN hpApi (INPUT-OUTPUT NAME,
INPUT-OUTPUT nr,
OUTPUT ReturnValue).
END PROCEDURE.

Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Obtener nombre de maquina

Publicado por BettyLu (16 intervenciones) el 06/09/2011 22:49:48
HOla... me puedes orientar donde conseguir la rutina windows.i?... no la encuentro y busco en paginas de progress....

si fueras tan amable te lo agradeceria muchisimo...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar