ACOS2便利ツール

ACOSからWeb(IIS)サーバーを起動
応用例として・・・
  • ・ジョブをスケジュール化することにより、サーバーサービスの利用時間を制限する。
  • ・ACOSからATコマンドを発行することにより、WindowsのスケジュールをACOSで一元管理する。
  • ・WindowsのバックアップをACOSで管理する。
などいろいろ
実行JCL参考例
\EXEC WEB,CRT=192.168.1.3;

JCL:WEBの内容

\MAC ID=(CRT=NIL);

\COMM ; ユーザ制御変数を定義
\DCV UCOS ,CHAR ,LEN=80;
\DCV UCWIN ,CHAR ,LEN=80;
\DCV UCDRV ,CHAR ,LEN=1 ;
\DCV UCDIR ,CHAR ,LEN=80;
\DCV UCTXT ,CHAR ,LEN=80;
\DCV UCBAT ,CHAR ,LEN=80;
\DCV UCVBS ,CHAR ,LEN=80;
\DCV UCJS ,CHAR ,LEN=80;
\DCV UCMON ,CHAR ,LEN=1 ;
\DCV UCSTY ,CHAR ,LEN=1 ;
\DCV UCCUR ,CHAR ,LEN=80;
\DCV UCCMD ,CHAR ,LEN=80;
\DCV UCADR ,CHAR ,LEN=16;
\DCV UCUID ,CHAR ,LEN=80;
\DCV UCPWD ,CHAR ,LEN=80;
\DCV UCFNM ,CHAR ,LEN=80;
\DCV UCSTS ,CHAR ,LEN=3 ;

\COMM ; WEBサーバーサービスを開始
\EXEC RPCOMM,ACT=ENV,CRT=&CRT ,PORT=8081 ;
\RRDRFT WSTN=&CRT ,DSTN=T,TUNIT=%UCDRV ,MODE=W, TFILE=%UCTXT ,FILE=EXCELTEXT,MEDIA=DS06,TEMP,RFM=V;

\COMM ; ファイル転送したテキストデータをEXCELで展開する。
\LET UCMON ,'Y';
\LET UCSTY ,'1';
\\LET UCCMD ,'cmd.exe /c net start "World Wide Web Publishing Service"';
\EXEC RPCOMM,ACT=RUN,CRT=&CRT ,PORT=8081 ;