「NONMEMコントロールファイルをSASから制御」の編集履歴（バックアップ）一覧はこちら

「NONMEMコントロールファイルをSASから制御」(2006/08/11 (金) 22:23:21) の最新版変更点

追加された行は緑色になります。

削除された行は赤色になります。

 %LET CTRL_IN =c-sim-template.txt; *** コントロールファイルのテンプレート ***;
 %LET CTRL_OUT=c-sim.txt; *** 出力コントロールファイル ***;
 
 %LET OUTPUT=output.txt; *** NONMEM の出力ファイル名 ***;
 
 %LET NMFE5 =nmfe5;
 
 %LET SEED  =260199; *** 乱数の種 ***;
 
 *** コントロールファイルのテンプレートを読み込む ***;
 DATA CfileTemplate;
   INFILE "&CTRL_IN" DLM="\";
   LENGTH str $80;
   INPUT str;
 RUN;
 
 *** $SIM 部分を書き換え ***;
 DATA CfileOUT;
   SET CfileTemplate;
   IF SUBSTR(str, 1, 4) = "$SIM" THEN DO;
     str = "$SIM (" || "&SEED" || ")";
   END;
 RUN;
 
 *** 書き出し ***;
 DATA _NULL_;
   SET CfileOUT;
   FILE "&CTRL_OUT";
   PUT str;
 RUN;
 
 *** NONMEM 実行 ***;
 OPTIONS NOXWAIT;
 X "&NMFE5 &CTRL_OUT &OUTPUT";