SAS 8.1 で文字タイプ番号でTrueTypeFontを使用する方法

[質問]

SAS 6.x ではフォント管理ユーティリティを使ってTrueTypeFontを登録し、文字タイプ番号を使ってフォントを指定していました。ところがSAS 8.1 ではフォント管理ユーティリティがありません。SAS 6.x のプログラムはどのようにしたら使えるでしょう か。

[回答]

SAS 8.1 では「フォント管理ユーティリティ」は無くなりました。これはプログラム内でTrueTypeFontの名称を記述すれば、そのまま使用していただくことが可能になったためです。
SAS 6.x と同様に文字タイプ番号でTrueTypeFontを使用する場合、次の様なプログラムを実行していただくことで、文字タイプ番号を登録できます。
（プログラム WIN、WINPRTM、WINPRTG、WINPRTCグラフィックドライバに、'MSゴシック'と'MS明朝'を登録する例）

libname gdevice0 'c:\sas\sasuser' ; 
proc gdevice c=gdevice0.devices nofs ;
   copy win     from=sashelp.devices;
   copy winprtm from=sashelp.devices;
   copy winprtg from=sashelp.devices;
   copy winprtc from=sashelp.devices;
   modify win                          /* WIN */
   charrec=(1,1,1,'ＭＳ ゴシック','Y')
   charrec=(2,1,1,'ＭＳ 明朝','Y');
   modify winprtm                      /* WINPRTM */
   charrec=(1,1,1,'ＭＳ ゴシック','Y')
   charrec=(2,1,1,'ＭＳ 明朝','Y');
   modify winprtg                      /* WINPRTG */
   charrec=(1,1,1,'ＭＳ ゴシック','Y')
   charrec=(2,1,1,'ＭＳ 明朝','Y');
   modify winprtc                      /* WINPRTC */
   charrec=(1,1,1,'ＭＳ ゴシック','Y')
   charrec=(2,1,1,'ＭＳ 明朝','Y');
quit;