Try this
DEF VAR cmess AS CHAR NO-UNDO.
DEF VAR cgenuuid AS CHAR NO-UNDO.
INPUT THROUGH genuuid.
IMPORT cmess.
IMPORT cgenuuid.
DISPLAY cgenuuid FORMAT "X(70)".
INPUT CLOSE.
or this from Windows
DEF VAR cFile AS CHAR NO-UNDO.
DEF VAR cCommand AS CHAR NO-UNDO.
DEF VAR cgenuuid AS CHAR NO-UNDO.
ASSIGN cFile = "C:\temp\genuuid.txt"
cCommand = "genuuid > "
+ cFile.
DOS SILENT VALUE(cCommand).
INPUT FROM VALUE(cFile).
IMPORT cgenuuid.
INPUT CLOSE.
MESSAGE cgenuuid VIEW-AS ALERT-BOX.