Caché 専用のシステム/ツールおよびユーティリティ - InterSystems ...

^%ZSTART ルーチンと ^%ZSTOP ルーチンによる 開 始 動 作 と 停 止 動 作 のカスタマイズJOB ;; JOB'd process beginsnew EntryPoint, Itemsset EntryPoint = "JOB"set Items = $LISTBUILD($$$BgnSet, $ZDATETIME($HOROLOG, 3))do WriteLog^%ZSSUtil($$$ME, EntryPoint, Items)quitCALLIN ;; a process enters via CALLIN interfacenew EntryPoint, Itemsset EntryPoint = "CALLIN"set Items = $LISTBUILD($$$BgnSet, $ZDATETIME($HOROLOG, 3))do WriteLog^%ZSSUtil($$$ME, EntryPoint, Items)quit各 ラベルの 説 明 を 以 下 に 示 します。^%ZSTARTこのルーチンはまず QUIT コマンドを 実 行 します。エントリ・ポイントの 1 つから 実 行 を 開 始 するのではなく、ルーチンとして 呼 び 出 す 方 が 良 好 な 結 果 を 得 ることができるためです。このルーチンも、そのルーチン 自 体 の 名 前 、 開 始 文 字 列 および 空 文 字 列 に 対 し、 指 定 された 定 数 (マクロとして) を 定 義 します。SYSTEM^%ZSTARTこのサブルーチンは、 呼 び 出 しルーチン 名 、エントリ・ポイント、 呼 び 出 された 日 付 時 刻 で 構 成 された 文 字 列 を作 成 します。その 後 、WriteConsole^%ZSSUtil を 呼 び 出 してオペレータのコンソール・ログに 配 置 します。その 後 、 表 示 する 名 前 と 値 の 組 み 合 わせのリストを 作 成 します。これを WriteLog^%ZSSUtil に 渡 し、ローカル・ログ・ファイルに 配 置 します。その 後 、 呼 び 出 し 元 に 戻 ります。LOGIN^%ZSTART、JOB^%ZSTART、および CALLIN^%ZSTARTこれらのサブルーチンは、オペレータのコンソール・ログに 情 報 を 置 きません。その 代 わり、 呼 び 出 す 際 に 識 別するための 簡 単 な 項 目 のリストを 作 成 し、WriteLog^%ZSSUtil を 使 用 して 記 録 します。2.2.5.3 ^%ZSTOPこのルーチンは、 実 際 に Caché に 呼 び 出 されるエントリ・ポイントを 含 み、^%ZSSUtil のサブルーチンを 使 用 します。この例 は、^%ZSTART の 例 と 似 ています。 詳 細 は、 前 のセクションを 参 照 してください。%ZSTOP ; User shutdown routine.#Define ME "ZSTOP"#Define EndSet "End"#Define Empty ""; cannot be invoked directlyquitSYSTEM ; Cache stoppingnew EntryPointset EntryPoint = "SYSTEM"; record termination in the console logdo WriteConsole^%ZSSUtil((EntryPoint_ "^%"_ $$$ME_ " called @ "_ $ZDATETIME($HOROLOG, 3))); write the standard log informationdo Logit(EntryPoint, $$$ME)quitLOGIN ; a user logs out of Cachenew EntryPointCaché 専 用 のシステム/ツールおよびユーティリティ 23