Subversion Repositories DevTools

Rev

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

Rev 2 Rev 5150
Line 125... Line 125...
125
              <tr>
125
              <tr>
126
                <td align="right" nowrap background="images/bg_table_col.gif" class="body_col">Role</td>
126
                <td align="right" nowrap background="images/bg_table_col.gif" class="body_col">Role</td>
127
              </tr>
127
              </tr>
128
            </table></td>
128
            </table></td>
129
            <td width="70%" align="right" nowrap background="images/bg_table_col.gif" class="body_col">Description</td>
129
            <td width="70%" align="right" nowrap background="images/bg_table_col.gif" class="body_col">Description</td>
-
 
130
			<td width="1%" background="images/bg_table_col.gif" class="body_col">Set</td>
130
			<td width="1%" background="images/bg_table_col.gif"><img src="images/spacer.gif" width="16" height="16" hspace="2"></td>
131
			<td width="1%" background="images/bg_table_col.gif" class="body_col">Edit</td>
131
          </tr>
132
          </tr>
132
		  <%
133
		  <%
133
		  OraDatabase.Parameters.Add "APP_ID", parApp_id,	ORAPARM_INPUT, ORATYPE_NUMBER 
134
		  OraDatabase.Parameters.Add "APP_ID", parApp_id,	ORAPARM_INPUT, ORATYPE_NUMBER 
134
		  
135
		  
135
		  Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("GetRoleList.sql"), ORADYN_DEFAULT )
136
		  Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("GetRoleList.sql"), ORADYN_DEFAULT )
Line 138... Line 139...
138
          <tr>
139
          <tr>
139
		  	<td align="center"><input type="checkbox" name="role_id_list" value="<%=rsQry("role_id")%>"></td>
140
		  	<td align="center"><input type="checkbox" name="role_id_list" value="<%=rsQry("role_id")%>"></td>
140
            <td nowrap class="body_row"><a href="Role_General.asp?role_id=<%=rsQry("role_id")%>&<%=objPMod.ComposeURL%>" class="body_link" title="See Role Details"><%=LIMG_ROLE &  rsQry("role_name")%></a></td>
141
            <td nowrap class="body_row"><a href="Role_General.asp?role_id=<%=rsQry("role_id")%>&<%=objPMod.ComposeURL%>" class="body_link" title="See Role Details"><%=LIMG_ROLE &  rsQry("role_name")%></a></td>
141
            <td class="body_row"><%=rsQry("comments")%></td>
142
            <td class="body_row"><%=rsQry("comments")%></td>
142
			<td align="center"><a href="Role_Privileges.asp?role_id=<%=rsQry("role_id")%>&<%=objPMod.ComposeURL%>" title="See Role Permissions"><%=LIMG_CONTROL%></a></td>
143
			<td align="center"><a href="Role_Privileges.asp?role_id=<%=rsQry("role_id")%>&<%=objPMod.ComposeURL%>" title="See Role Permissions"><%=LIMG_CONTROL%></a></td>
-
 
144
			<td align="center"><a href="javascript:;" onClick="MM_openBrWindow('wEditRole.asp?role_id=<%=rsQry("role_id")%>&rfile=<%=SCRIPT_NAME%>&<%=objPMod.ComposeURL%>','Edit Role','scrollbars=yes,resizable=yes,width=600,height=350')" title='Edit Role'><%=LIMG_EDIT%></a></td>
143
          </tr>
145
          </tr>
144
		  <%rsQry.MoveNext%>
146
		  <%rsQry.MoveNext%>
145
		  
147
		  
146
		  <%If (NOT rsQry.BOF) AND (NOT rsQry.EOF) Then%>
148
		  <%If (NOT rsQry.BOF) AND (NOT rsQry.EOF) Then%>
147
          <tr>
149
          <tr>
148
            <td colspan="4" background="images/bg_table_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
150
            <td colspan="5" background="images/bg_table_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
149
          </tr>
151
          </tr>
150
		  <%End If%>
152
		  <%End If%>
151
		  
153
		  
152
		  <%
154
		  <%
153
		  WEnd
155
		  WEnd