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")); }