Subversion Repositories DevTools

Rev

Rev 21 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 21 Rev 29
Line 133... Line 133...
133
		  currProd_id = ""
133
		  currProd_id = ""
134
		  While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
134
		  While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
135
		  ProcId = rsQry("prod_id")
135
		  ProcId = rsQry("prod_id")
136
		  ProcName = rsQry("pkg_health_tag")
136
		  ProcName = rsQry("pkg_health_tag")
137
		  Interface = rsQry("is_interface")
137
		  Interface = rsQry("is_interface")
-
 
138
		  If	NOT	IsNull(rsQry("cmd_interface"))	Then
-
 
139
			  RunAs	=	Replace(rsQry("cmd_interface"), "'", "'" )
-
 
140
		  Else
138
		  RunAs = rsQry("cmd_interface")
141
			RunAs	=	rsQry("cmd_interface")
-
 
142
		  End	If
-
 
143
					  
139
		  Owner = rsQry("pkg_owner")
144
		  Owner = rsQry("pkg_owner")
140
%>	  
145
%>	  
141
      <tr>
146
      <tr>
142
        <td><div align="left"><span class="body_row"><%=rsQry("pkg_health_tag")%></span></div></td>
147
        <td><div align="left"><span class="body_row"><%=rsQry("pkg_health_tag")%></span></div></td>
143
        <td><div align="left"><span class="body_row"><%=rsQry("pkg_name")%></span></div></td>
148
        <td><div align="left"><span class="body_row"><%=rsQry("pkg_name")%></span></div></td>
144
        <td><div align="left"><span class="body_row"><%=rsQry("cmd_interface")%></span></div></td>
149
        <td><div align="left"><span class="body_row"><%=rsQry("cmd_interface")%></span></div></td>
145
        <td><div align="left"><span class="body_row"><%=rsQry("is_interface")%></span></div></td>
150
        <td><div align="left"><span class="body_row"><%=rsQry("is_interface")%></span></div></td>
146
        <td><div align="left"><span class="body_row"><%=rsQry("pkg_owner")%></span></div></td>
151
        <td><div align="left"><span class="body_row"><%=rsQry("pkg_owner")%></span></div></td>
147
		<td align="left" valign="top" bgcolor="#FAFAF6"><%Call objBtnControl.Render  ( Array("btnEditProc", "btnRemoveProc") )%></td>		
152
		<td align="left" valign="top" bgcolor="#FAFAF6"><%Call objBtnControl.Render  ( Array("btnEditProc", "btnRemoveProc") )%></td>		
148
 
-
 
149
      </tr>
153
      </tr>
150
	  <%rsQry.MoveNext%>
154
	  <%rsQry.MoveNext%>
151
		  
155
		  
152
		  <%If (NOT rsQry.BOF) AND (NOT rsQry.EOF) Then%>
156
		  <%If (NOT rsQry.BOF) AND (NOT rsQry.EOF) Then%>
153
          <tr>
157
          <tr>