Kbase P109246: 4GL sample code to retrieve the windows OS version
| Autor |
Progress Software Corporation - Progress |
| Acesso |
Público |
| Publicação |
19/01/2006 |
|
Status: Unverified
GOAL:
4GL sample code to retrieve the windows OS version
GOAL:
How to export the Operating System Version to a Text file to be checked at run time?
GOAL:
How to use a Operating System ver command to get a version of a windows Operating System using 4GL?
GOAL:
Using the ver command to retrieve the Operating System from the 4GL
FACT(s) (Environment):
Windows 32 Intel
FIX:
This sample code will return the Operating System version to a text file in way to be checked at run time.
DEFINE VARIABLE text-string AS CHARACTER FORMAT "x(76)".
OS-COMMAND SILENT ver > c:\version.txt.
INPUT FROM c:\version.txt.
DO WHILE TRUE:
IMPORT UNFORMATTED text-string.
IF TEXT-STRING NE "" THEN MESSAGE TEXT-STRING VIEW-AS ALERT-BOX INFORMATION.
END.
INPUT CLOSE.