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