<%!
/* */
struct icm_thr_info_type
{
  string status;
  string rq_type;
  string protocol;
  int rq_count;
  int conn;
  int guid;
  string thr_id;
};

%>

<%
int    rc;
string browser, appl;

struct icm_thr_info_type main_thr;
struct icm_thr_info_type watchdog_thr;
struct icm_thr_info_type signal_thr;
struct icm_thr_info_type proxy_thr;
struct icm_thr_info_type mplx_thr;
struct icm_thr_info_type jsess_thr;

browser = __icm_get_browser_type();
appl    = __icm_get_system_property ("app_name");

__icm_get_thr_info(main_thr, -1);
__icm_get_thr_info(watchdog_thr, -2);
__icm_get_thr_info(signal_thr, -3);
__icm_get_thr_info(proxy_thr, -4);
__icm_get_thr_info(mplx_thr, -5);
__icm_get_thr_info(jsess_thr, -6);
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
  <html>
    <head>
      <link rel=stylesheet type="text/css" href="../public/css/controls_<%=browser%>.css">
      <link rel=stylesheet type="text/css" href="../public/css/sapbsp.css">
      <title><%=appl%> Monitor</title>
    </head>
    <body class="sapBdy">
      <table border="0" cellspacing="0" cellpadding="0" class="sapTbvAlt" width="100%">
	<tr>
	  <td class="sapTbvCellAlt" Colspan="1">
	    <b><i><%=appl%> Core Thread Status </i></b>
	  </td>
	  <td class="sapTbvCellAlt" Colspan="1">&nbsp;</td>
	  <td class="sapTbvCellAlt" align="right">
	    <a href="javascript:parent.frames['main'].location.reload()" class="sapBtnEmph"><nobr>Refresh</nobr></a>
	  </td>
	</tr>
      </table>
      <table cellspacing=1 width="100%" class="sapTbvAlt">
	<tr>
	  <td class="sapTbvCellAlt">
	    <i>Name</i>
	  </td>
	  <td class="sapTbvCellAlt">
	    <i>Thread ID</i>
	  </td>
	  <td class="sapTbvCellAlt">
	    <i>No. of Requests</i>
	  </td>
	  <td class="sapTbvCellAlt">
	    <i>Protocol</i>
	  </td>
	  <td class="sapTbvCellAlt">
	    <i>Status</i>
	  </td>
	  <td class="sapTbvCellAlt">
	    <i>Request Type</i>
	  </td>
	</tr>
	<tr>
	  <td class="sapTbvCellStd">MAIN</td>
	  <td class="sapTbvCellStd"><%= main_thr.thr_id %></td>
	  <td class="sapTbvCellStd"><%= main_thr.rq_count %></td>
	  <td class="sapTbvCellStd"><%= main_thr.protocol %></td>
	  <td class="sapTbvCellStd"><%= main_thr.status %></td>
	  <td class="sapTbvCellStd"><%= main_thr.rq_type %></td>
	</tr>
	<tr>
	  <td class="sapTbvCellStd">WATCHDOG</td>
	  <td class="sapTbvCellStd"><%= watchdog_thr.thr_id %></td>
	  <td class="sapTbvCellStd"><%= watchdog_thr.rq_count %></td>
	  <td class="sapTbvCellStd"><%= watchdog_thr.protocol %></td>
	  <td class="sapTbvCellStd"><%= watchdog_thr.status %></td>
	  <td class="sapTbvCellStd"><%= watchdog_thr.rq_type %></td>
	</tr>
<%
    if (signal_thr.status != "") {
%>
	<tr>
	  <td class="sapTbvCellStd">SIGNAL</td>
	  <td class="sapTbvCellStd"><%= signal_thr.thr_id %></td>
	  <td class="sapTbvCellStd"><%= signal_thr.rq_count %></td>
	  <td class="sapTbvCellStd"><%= signal_thr.protocol %></td>
	  <td class="sapTbvCellStd"><%= signal_thr.status %></td>
	  <td class="sapTbvCellStd"><%= signal_thr.rq_type %></td>
	</tr>
<%
    }
    if (appl != "SAP Web Dispatcher") {
      if (proxy_thr.status != "") {
%>
	<tr>
	  <td class="sapTbvCellStd">PROXY</td>
	  <td class="sapTbvCellStd"><%= proxy_thr.thr_id %></td>
	  <td class="sapTbvCellStd"><%= proxy_thr.rq_count %></td>
	  <td class="sapTbvCellStd"><%= proxy_thr.protocol %></td>
	  <td class="sapTbvCellStd"><%= proxy_thr.status %></td>
	  <td class="sapTbvCellStd"><%= proxy_thr.rq_type %></td>
	</tr>
<%
      }
      if (mplx_thr.status != "") {
%>
	<tr>
	  <td class="sapTbvCellStd">MPLX</td>
	  <td class="sapTbvCellStd"><%= mplx_thr.thr_id %></td>
	  <td class="sapTbvCellStd"><%= mplx_thr.rq_count %></td>
	  <td class="sapTbvCellStd"><%= mplx_thr.protocol %></td>
	  <td class="sapTbvCellStd"><%= mplx_thr.status %></td>
	  <td class="sapTbvCellStd"><%= mplx_thr.rq_type %></td>
	</tr>
<%
      }
      if (jsess_thr.status != "") {
%>
	<tr>
	  <td class="sapTbvCellStd">JSESS</td>
	  <td class="sapTbvCellStd"><%= jsess_thr.thr_id %></td>
	  <td class="sapTbvCellStd"><%= jsess_thr.rq_count %></td>
	  <td class="sapTbvCellStd"><%= jsess_thr.protocol %></td>
	  <td class="sapTbvCellStd"><%= jsess_thr.status %></td>
	  <td class="sapTbvCellStd"><%= jsess_thr.rq_type %></td>
	</tr>
<%
      }
    }
%>
      </table>
    </table>
    </body>
  </html>
