次のコードは、login および logoff リソースアクションの完全なサンプルです。このサンプルは、Top Secret リソースを使用する、ある特定の顧客の環境に合わせた内容になっています。したがって、コマンド、プロンプト、コマンドシーケンスなどのテキストは、配備環境によって異なる可能性があります。これらのリソースアクションは、XML 内の Javascript をラップします。
<ResourceAction name=’ACME Login Action’> <ResTypeAction restype=’TopSecret’> <act> var TSO_MORE = " ***"; var TSO_PROMPT = " READY"; var TS_PROMPT = " ?"; hostAccess.waitForString("ENTER YOUR APPLICATION NAME"); hostAccess.sendKeys("tso[enter]"); hostAccess.waitForString("ENTER USERID– "); hostAccess.sendKeys(user + "[enter]"); hostAccess.waitForString("TSO/E LOGON"); hostAccess.sendKeys(password); hostAccess.sendKeys("[enter]"); var pos = hostAccess.searchText(" -Nomail", false); if (pos != 0) { hostAccess.setCursorPos(pos); hostAccess.sendKeys("S"); } pos = hostAccess.searchText(" -Nonotice", false); if (pos != 0) { hostAccess.setCursorPos(pos); hostAccess.sendKeys("S"); } hostAccess.sendKeys("[enter]"); hostAccess.waitForStringAndInput(TSO_MORE); hostAccess.sendKeys("[enter]"); hostAccess.waitForStringAndInput(TSO_MORE); hostAccess.sendKeys("[enter]"); hostAccess.waitForStringAndInput("ISPF"); hostAccess.sendKeys("=x[enter]"); hostAccess.waitForString(TSO_PROMPT); var resp =hostAccess.doCmd("PROFILE NOPROMPT MSGID NOINTERCOM NOPAUSE NOWTPMSG PLANGUAGE(ENU) SLANGUAGE(ENU) NOPREFIX[enter]", TSO_PROMPT, TSO_MORE); hostAccess.waitForStringAndInput("ENTER LOGON:"); hostAccess.sendKeys(system + "[enter]"); hostAccess.waitForStringAndInput("USER-ID....."); hostAccess.sendKeys(user + "[tab]" + password); hostAccess.sendKeys("[enter]"); var stringsToHide = new java.util.ArrayList(); stringsToHide.add(password.decryptToString()); hostAccess.waitForString("==>", stringsToHide); hostAccess.waitForInput(); hostAccess.sendKeys("[pf6]"); hostAccess.waitForInput(); </act> </ResTypeAction> </ResourceAction>