Hitachi

JP1 Version 12 JP1/Script(Windows(R)用)


8.10.4 GetExecStatus (実行ファイルの実行状態を取得する)

機能

Exec,およびNetExecコマンドから終了待ちをしない指定で呼び出した実行ファイルの現在の実行状態を取得します。

形式
GetExecStatus ( 〔ExecId〕 )
指定項目
ExecId

Exec,およびNetExecコマンドから終了待ちをしない指定で呼び出した実行ファイルの識別子を文字列,または値を格納した変数名で指定します。この識別子は,Exec,およびNetExecコマンド実行時に_EXEC_ID_予約変数に格納される値です。

この値は省略できます。省略した場合,現在の_EXEC_ID_予約変数に格納されている値を仮定します。

説明

Exec,およびNetExecコマンドから終了待ちをしない指定で呼び出した実行ファイルの現在の実行状態を取得します。コマンドが正常に実行された場合は実行状態を,エラーが発生した場合は長さ0の文字列("")を,コマンドの実行結果として返します。

実行状態として返される値は次のどれかになります。

意味

EXEC_RUNNING

実行ファイルは実行中です。

EXEC_STOPPED

実行ファイルは実行中ではありません。

' Execコマンドから終了待ちをしない指定で呼び出した実行ファイルの処理が
' 終了してから,次のExecコマンドの処理を行う。
Dim  exec1_ID
prm1 = _SCF_+"Result.TXT"
If  Exec ( _SCF_+"Sum.SPT" ,False ,prm1 )  Then
  exec1_ID = _EXEC_ID_
  :
End
While  GetExecStatus ( exec1_ID ) = EXEC_RUNNING
  Sleep ( 100 )
End While
Exec ( _WIN_+"NOTEPAD.EXE" ,True ,prm1)
対象バージョン

JP1/Script 06-00以降