Available in:
Apps (win)
Apps (char)
Reportwriter
RPC
Standalone PL
X
X
X
X
X
int os_id()
#define os_unix 0 /* All Unix derivatives */ #define os_windows 1 /* Windows */ #define os_mvs 2 /* MVS (OS/390) */ #define os_vms 3 /* OpenVMS */
{
prompt ( decode(os_id(), os_unix, "Unix",
os_windows, "Windows",
os_mvs, "MVS",
os_vms, "VMS",
"undefined"));
}