このルーチンは、ACCEPT FROM SYSTEM-INFO 文で戻されるよりも詳しいシステム情報を提供します。
| WINVERSION-DATA 集団項目 (次のとおり) |  
					 01  WINVERSION-DATA. 
    03  WIN-MAJOR-VERSION     PIC X COMP-X. 
    03  WIN-MINOR-VERSION     PIC X COMP-X. 
    03  WIN-PLATFORM          PIC X COMP-X. 
        88  PLATFORM-WIN-31   VALUE 1. 
        88  PLATFORM-WIN-95   VALUE 2. 
        88  PLATFORM-WIN-9X   VALUE 2. 
        88  PLATFORM-WIN-NT   VALUE 3. 
    03  WIN-WORDSIZE          PIC X COMP-X. 
        88  WIN-WORDSIZE-16   VALUE 1. 
        88  WIN-WORDSIZE-32   VALUE 2. 
        88  WIN-WORDSIZE-64   VALUE 3. 
    03  WIN-BUILDNUMBER                 PIC X(4) COMP-X. 
    03  WIN-CSDVERSION                  PIC X(128). 
    03  WIN-SERVICEPACK-MAJOR           PIC X COMP-X. 
    03  WIN-SERVICEPACK-MINOR           PIC X COMP-X. 
    03  WIN-SUITEMASK                   PIC X(4) COMP-X. 
    03  WIN-PRODUCTTYPE                 PIC X COMP-X. 
        88 WIN-NT-WORKSTATION           VALUE 1. 
        88 WIN-NT-DOMAIN-CONTROLLER     VALUE 2. 
        88 WIN-NT-SERVER                VALUE 3. 
 
					 WINVERSION-DATA は COPY ライブラリ winvers.def にあります。  | 
 
				
WIN$VERSION から戻ると、WINVERSION-DATA に含まれるすべてのデータ要素に情報が挿入されます。WIN$VERSION を呼び出す際にホスト マシンが Windows や Windows NT ではない場合、フィールドはゼロに設定されます。
次のリストに、各 WINVERSION-DATA フィールドの説明を示します。特定のフィールドで使用できる値のリストについては、Microsoft の「Operating System Version」Web ページを参照してください。