<font size=2 face="sans-serif">I have this almost working (Ithink).</font>
<br>
<br><font size=2 face="sans-serif">sub list :Local {</font>
<br><font size=2 face="sans-serif">&nbsp; &nbsp; &nbsp; &nbsp; my
($self, $c, $page) = @_;</font>
<br><font size=2 face="sans-serif">&nbsp; &nbsp; &nbsp; &nbsp; $page
= $c-&gt;req-&gt;param('page') || 1;</font>
<br><font size=2 face="sans-serif">&nbsp; &nbsp; &nbsp; &nbsp; my
$rs = $c-&gt;model('ORANGES::Account')-&gt;search_rs(undef, { </font>
<br><font size=2 face="sans-serif">&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp; &nbsp; &nbsp; join =&gt; { servers =&gt; 'subs' },</font>
<br><font size=2 face="sans-serif">&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp; &nbsp; &nbsp; select =&gt; [ &nbsp;{ count =&gt; 'subsystem_id'
} ],</font>
<br><font size=2 face="sans-serif">&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp; &nbsp; &nbsp; as =&gt; [ qw/ num_subs / ],</font>
<br><font size=2 face="sans-serif">&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp; &nbsp; &nbsp; group_by =&gt; [ qw/ account_code subs.server_id
server_name server_type os_name &nbsp; / ],</font>
<br><font size=2 face="sans-serif">&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp; &nbsp; &nbsp; rows =&gt; 15,</font>
<br><font size=2 face="sans-serif">&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp; &nbsp; &nbsp; page =&gt; $page,</font>
<br><font size=2 face="sans-serif">&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp; &nbsp; &nbsp; order_by =&gt; ['account_code', 'server_name'],</font>
<br><font size=2 face="sans-serif">&nbsp; &nbsp; &nbsp; &nbsp; });</font>
<br><font size=2 face="sans-serif">&nbsp; &nbsp; &nbsp; &nbsp; $c-&gt;stash(rows
=&gt; $rs);</font>
<br><font size=2 face="sans-serif">&nbsp; &nbsp; &nbsp; &nbsp; $c-&gt;stash(pager
=&gt; $rs-&gt;pager());</font>
<br><font size=2 face="sans-serif">&nbsp; &nbsp; &nbsp; &nbsp; $c-&gt;stash-&gt;{'template'}=&gt;'server/list';</font>
<br><font size=2 face="sans-serif">}</font>
<br>
<br><font size=2 face="sans-serif">This gives me an error:</font>
<br>
<br><tt><font size=3>Couldn't render template &quot;server/list.tt2: undef
error - DBI Exception: DBD::DB2::db prepare_cached failed: [IBM][CLI Driver][DB2/AIX64]
SQL0206N &nbsp;&quot;NUM_SUBS&quot; is not valid in the context where it
is used. &nbsp;SQLSTATE=42703<br>
 [for Statement &quot;<br>
SELECT num_subs FROM (<br>
 &nbsp;SELECT num_subs, ORDER__BY__1, ORDER__BY__2, ROW_NUMBER() OVER(
&nbsp;ORDER BY ORDER__BY__1, ORDER__BY__2 ) AS rno__row__index FROM (<br>
 &nbsp; &nbsp;SELECT COUNT( subsystem_id ), account_code AS ORDER__BY__1,
server_name AS ORDER__BY__2 &nbsp;FROM HCDB_TEST.ACCOUNT me LEFT JOIN HCDB_TEST.SERVER
servers ON servers.account_id = me.account_id LEFT JOIN HCDB_TEST.SUBSYSTEM
subs ON subs.server_id = servers.server_id GROUP BY account_code, subs.server_id,
server_name, server_type, os_name<br>
 &nbsp;) me<br>
) me WHERE rno__row__index &gt;= ? AND rno__row__index &lt;= ?<br>
</font></tt>
<br>
<br><font size=2 face="sans-serif">But the SQL looks like it is getting
closer to what I need:</font>
<br>
<br><font size=2 face="sans-serif">SELECT</font>
<br><font size=2 face="sans-serif">&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp;s.server_id, &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;</font>
<br><font size=2 face="sans-serif">&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp;a.account_code,</font>
<br><font size=2 face="sans-serif">&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp;s.server_name,</font>
<br><font size=2 face="sans-serif">&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp;s.server_type,</font>
<br><font size=2 face="sans-serif">&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp;s.os_name,</font>
<br><font size=2 face="sans-serif">&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp;(select count(*) from server ss, subsserystem sb </font>
<br><font size=2 face="sans-serif">&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; where ss.server_id = sb.server_id </font>
<br><font size=2 face="sans-serif">&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; and ss.server_id = s.server_id) as num_subsystems
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; </font>
<br><font size=2 face="sans-serif">&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
FROM </font>
<br><font size=2 face="sans-serif">&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp;account a,</font>
<br><font size=2 face="sans-serif">&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp;server s</font>
<br><font size=2 face="sans-serif">&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
WHERE </font>
<br><font size=2 face="sans-serif">&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
and a.account_id = s.account_id</font>
<br><font size=2 face="sans-serif">&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
order by a.account_code, s.server_name&quot; <br>
</font>
<br><font size=2 face="sans-serif">I have exhausted all the docs I can
find and if I can't get this count of subsystems relater to servers to
work I will have to dump this as a feasible development platform. I'm really
hoping someone can come up with a concrete answer to do this. This is one
of those things never addressed directly in any of the docs. If I had a
example to work with I could figure it out, but I'm flying blind here.</font>