Subversion Repositories DevTools

Rev

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

Rev 5299 Rev 5354
Line 1... Line 1...
1
<%@LANGUAGE="VBSCRIPT"%>
1
<%@LANGUAGE="VBSCRIPT"%>
2
<%
2
<%
3
'=====================================================
3
'=====================================================
4
'|                                                   |
4
'|                                                   |
5
'|			          Application List				 |
5
'|			          Application List				 |
6
'|                                                   |
6
'|                                                   |
7
'=====================================================
7
'=====================================================
8
%>
8
%>
9
<%
9
<%
10
Option explicit
10
Option explicit
11
Response.Expires = 0
11
Response.Expires = 0
12
%>
12
%>
13
<!--#include file="common/globals.asp"-->
13
<!--#include file="common/globals.asp"-->
14
<!--#include file="common/config.asp"-->
14
<!--#include file="common/config.asp"-->
15
<!--#include file="common/common_subs.asp"-->
15
<!--#include file="common/common_subs.asp"-->
16
<%
16
<%
17
'------------ ACCESS CONTROL ------------------
17
'------------ ACCESS CONTROL ------------------
18
%>
18
%>
19
<!--#include file="_access_control_general.asp"-->
19
<!--#include file="_access_control_general.asp"-->
20
<%
20
<%
21
'------------ VARIABLE DEFINITION -------------
21
'------------ VARIABLE DEFINITION -------------
22
Dim rsQry
22
Dim rsQry
23
Dim parApp_id
23
Dim parApp_id
24
Dim objAppCollector
24
Dim objAppCollector
25
'------------ CONSTANTS DECLARATION -----------
25
'------------ CONSTANTS DECLARATION -----------
26
'------------ VARIABLE INIT -------------------
26
'------------ VARIABLE INIT -------------------
27
parApp_id = Request("app_id")
27
parApp_id = Request("app_id")
28
Set objAppCollector = CreateObject("Scripting.Dictionary")
28
Set objAppCollector = CreateObject("Scripting.Dictionary")
29
'------------ CONDITIONS ----------------------
29
'------------ CONDITIONS ----------------------
30
'----------------------------------------------
30
'----------------------------------------------
31
%>
31
%>
32
<%
32
<%
33
'------------ RUN BEFORE PAGE RENDER ----------
33
'------------ RUN BEFORE PAGE RENDER ----------
34
Call GetApplicationDetails ( parApp_id, objAppCollector )
34
Call GetApplicationDetails ( parApp_id, objAppCollector )
35
objPMod.PersistInQryString ("app_id")
35
objPMod.PersistInQryString ("app_id")
36
objPMod.PersistInQryString ("tree")
36
objPMod.PersistInQryString ("tree")
37
'----------------------------------------------
37
'----------------------------------------------
38
%>
38
%>
39
<html>
39
<html>
40
<head>
40
<head>
41
<title>Access Manager</title>
41
<title>Access Manager</title>
42
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
42
<link rel="shortcut icon" href="<%=FavIcon%>"/>
43
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
43
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
44
<link href="scripts/access_manager.css" rel="stylesheet" type="text/css">
44
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
45
</head>
45
<link href="scripts/access_manager.css" rel="stylesheet" type="text/css">
46
 
46
</head>
47
<body bgcolor="#FFFFFF" leftmargin="0" topmargin="0">
47
 
48
<!-- HEADER ++++++++++++++++++++++ -->
48
<body bgcolor="#FFFFFF" leftmargin="0" topmargin="0">
49
<!--#include file="_header.asp"-->
49
<!-- HEADER ++++++++++++++++++++++ -->
50
<!-- +++++++++++++++++++++++++++++ -->
50
<!--#include file="_header.asp"-->
51
<table width="100%"  border="0" cellspacing="0" cellpadding="0">
51
<!-- +++++++++++++++++++++++++++++ -->
52
  <tr>
52
<table width="100%"  border="0" cellspacing="0" cellpadding="0">
53
    <td width="1%" valign="top" background="images/bg_bage_pane.gif">
53
  <tr>
54
	<!-- TREE NAVIGATOR ++++++++++++++++++++++++++++++++++++++++++++ -->
54
    <td width="1%" valign="top" background="images/bg_bage_pane.gif">
55
	<!--#include file="_treeNavigator.asp"-->  
55
	<!-- TREE NAVIGATOR ++++++++++++++++++++++++++++++++++++++++++++ -->
56
	<!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
56
	<!--#include file="_treeNavigator.asp"-->  
57
	</td>
57
	<!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
58
    <td width="1" background="images/bg_drk_gray_border.gif"><img src="images/spacer.gif" width="1" height="600"></td>
58
	</td>
59
    <td width="100%" valign="top"><table width="100%"  border="0" cellspacing="0" cellpadding="9">
59
    <td width="1" background="images/bg_drk_gray_border.gif"><img src="images/spacer.gif" width="1" height="600"></td>
60
      <tr>
60
    <td width="100%" valign="top"><table width="100%"  border="0" cellspacing="0" cellpadding="9">
61
        <td background="images/bg_drk_bage_pane.gif">
61
      <tr>
62
		  <table width="100%"  border="0" cellspacing="0" cellpadding="0">
62
        <td background="images/bg_drk_bage_pane.gif">
63
            <tr>
63
		  <table width="100%"  border="0" cellspacing="0" cellpadding="0">
64
              <td nowrap class="body_txt"></td>
64
            <tr>
65
              <td align="right" nowrap class="section_ttl">Applications</td>
65
              <td nowrap class="body_txt"></td>
66
            </tr>
66
              <td align="right" nowrap class="section_ttl">Applications</td>
67
          </table>
67
            </tr>
68
		</td>
68
          </table>
69
      </tr>
69
		</td>
70
	  <tr>
70
      </tr>
71
        <td class="menu_crumbttl"><img src="images/i_application_lrg.gif" width="18" height="18" hspace="4" align="absmiddle"><strong><%=objAppCollector.Item ("application_name")%></strong></td>
71
	  <tr>
72
      </tr>
72
        <td class="menu_crumbttl"><img src="images/i_application_lrg.gif" width="18" height="18" hspace="4" align="absmiddle"><strong><%=objAppCollector.Item ("application_name")%></strong></td>
73
      <tr>
73
      </tr>
74
        <td>
74
      <tr>
75
		 <!-- DETAILS ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
75
        <td>
76
		 
76
		 <!-- DETAILS ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
77
		 <!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
77
		 
78
         <table width="80%"  border="0" cellspacing="0" cellpadding="10">
78
		 <!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
79
           <tr>
79
         <table width="80%"  border="0" cellspacing="0" cellpadding="10">
80
             <td><table width="100%"  border="0" cellspacing="5" cellpadding="0">
80
           <tr>
81
               <tr>
81
             <td><table width="100%"  border="0" cellspacing="5" cellpadding="0">
82
                 <td colspan="2" class="section_ttl">Users</td>
82
               <tr>
83
                 </tr>
83
                 <td colspan="2" class="section_ttl">Users</td>
84
               <tr background="images/bg_drk_bage_pane.gif">
84
                 </tr>
85
                 <td colspan="2"><img src="images/spacer.gif" width="1" height="1"></td>
85
               <tr background="images/bg_drk_bage_pane.gif">
86
                 </tr>
86
                 <td colspan="2"><img src="images/spacer.gif" width="1" height="1"></td>
87
               <tr>
87
                 </tr>
88
                 <td width="1%" valign="top"><img src="images/i_big_folder.gif" width="43" height="37"></td>
88
               <tr>
89
                 <td width="100%" valign="top" class="body_row"><a href="UserList.asp?tree=<%=Request("tree") &"_"& arrAppProperties( inxTNid + (nNumberofProperties * 0) )%><%=objPMod.ComposeURLWithout("tree")%>" class="body_link">Manage Users for this Application</a><br>
89
                 <td width="1%" valign="top"><img src="images/i_big_folder.gif" width="43" height="37"></td>
90
                   Here you can add or remove user to this application, <br>
90
                 <td width="100%" valign="top" class="body_row"><a href="UserList.asp?tree=<%=Request("tree") &"_"& arrAppProperties( inxTNid + (nNumberofProperties * 0) )%><%=objPMod.ComposeURLWithout("tree")%>" class="body_link">Manage Users for this Application</a><br>
91
                   with option to view brief user details.</td>
91
                   Here you can add or remove user to this application, <br>
92
               </tr>
92
                   with option to view brief user details.</td>
93
             </table></td>
93
               </tr>
94
             <td><table width="100%"  border="0" cellspacing="5" cellpadding="0">
94
             </table></td>
95
               <tr>
95
             <td><table width="100%"  border="0" cellspacing="5" cellpadding="0">
96
                 <td colspan="2" class="section_ttl">Roles</td>
96
               <tr>
97
               </tr>
97
                 <td colspan="2" class="section_ttl">Roles</td>
98
               <tr background="images/bg_drk_bage_pane.gif">
98
               </tr>
99
                 <td colspan="2"><img src="images/spacer.gif" width="1" height="1"></td>
99
               <tr background="images/bg_drk_bage_pane.gif">
100
               </tr>
100
                 <td colspan="2"><img src="images/spacer.gif" width="1" height="1"></td>
101
               <tr>
101
               </tr>
102
                 <td width="1%" valign="top"><img src="images/i_big_folder.gif" width="43" height="37"></td>
102
               <tr>
103
                 <td width="100%" valign="top" class="body_row"><a href="RoleList.asp?tree=<%=Request("tree") &"_"& arrAppProperties( inxTNid + (nNumberofProperties * 1) )%><%=objPMod.ComposeURLWithout("tree")%>" class="body_link">Manage Roles for this Application</a><br>
103
                 <td width="1%" valign="top"><img src="images/i_big_folder.gif" width="43" height="37"></td>
104
                   Manage roles and permissions for this application,<br> 
104
                 <td width="100%" valign="top" class="body_row"><a href="RoleList.asp?tree=<%=Request("tree") &"_"& arrAppProperties( inxTNid + (nNumberofProperties * 1) )%><%=objPMod.ComposeURLWithout("tree")%>" class="body_link">Manage Roles for this Application</a><br>
105
                   then assign them to the users. </td>
105
                   Manage roles and permissions for this application,<br> 
106
               </tr>
106
                   then assign them to the users. </td>
107
             </table></td>
107
               </tr>
108
           </tr>
108
             </table></td>
109
           <tr>
109
           </tr>
110
             <td><table width="100%"  border="0" cellspacing="5" cellpadding="0">
110
           <tr>
111
               <tr>
111
             <td><table width="100%"  border="0" cellspacing="5" cellpadding="0">
112
                 <td colspan="2" class="section_ttl">Actions</td>
112
               <tr>
113
               </tr>
113
                 <td colspan="2" class="section_ttl">Actions</td>
114
               <tr background="images/bg_drk_bage_pane.gif">
114
               </tr>
115
                 <td colspan="2"><img src="images/spacer.gif" width="1" height="1"></td>
115
               <tr background="images/bg_drk_bage_pane.gif">
116
               </tr>
116
                 <td colspan="2"><img src="images/spacer.gif" width="1" height="1"></td>
117
               <tr>
117
               </tr>
118
                 <td width="1%" valign="top"><img src="images/i_big_folder.gif" width="43" height="37"></td>
118
               <tr>
119
                 <td width="100%" valign="top" class="body_row"><a href="ControlList.asp?tree=<%=Request("tree") &"_"& arrAppProperties( inxTNid + (nNumberofProperties * 2) )%><%=objPMod.ComposeURLWithout("tree")%>" class="body_link">Manage Actions for this Application </a><br>
119
                 <td width="1%" valign="top"><img src="images/i_big_folder.gif" width="43" height="37"></td>
120
                   Use action objects within application's source code<br>
120
                 <td width="100%" valign="top" class="body_row"><a href="ControlList.asp?tree=<%=Request("tree") &"_"& arrAppProperties( inxTNid + (nNumberofProperties * 2) )%><%=objPMod.ComposeURLWithout("tree")%>" class="body_link">Manage Actions for this Application </a><br>
121
                   to control access.</td>
121
                   Use action objects within application's source code<br>
122
               </tr>
122
                   to control access.</td>
123
             </table></td>
123
               </tr>
124
             <td>
124
             </table></td>
125
			 
125
             <td>
126
			 <table width="100%"  border="0" cellspacing="5" cellpadding="0">
126
			 
127
               <tr>
127
			 <table width="100%"  border="0" cellspacing="5" cellpadding="0">
128
                 <td colspan="2" class="section_ttl">Pages</td>
128
               <tr>
129
               </tr>
129
                 <td colspan="2" class="section_ttl">Pages</td>
130
               <tr background="images/bg_drk_bage_pane.gif">
130
               </tr>
131
                 <td colspan="2"><img src="images/spacer.gif" width="1" height="1"></td>
131
               <tr background="images/bg_drk_bage_pane.gif">
132
               </tr>
132
                 <td colspan="2"><img src="images/spacer.gif" width="1" height="1"></td>
133
               <tr>
133
               </tr>
134
                 <td width="1%" valign="top"><img src="images/i_big_folder.gif" width="43" height="37"></td>
134
               <tr>
135
                 <td width="100%" valign="top" class="body_row"><!-- <a href="PageList.asp?tree=<%'Request("tree") &"_"& arrAppProperties( inxTNid + (nNumberofProperties * 3) )%><%=objPMod.ComposeURLWithout("tree")%>" class="body_link">Manage Pages for this Application</a><br> -->
135
                 <td width="1%" valign="top"><img src="images/i_big_folder.gif" width="43" height="37"></td>
136
                   Define application web pages for<br>
136
                 <td width="100%" valign="top" class="body_row"><!-- <a href="PageList.asp?tree=<%'Request("tree") &"_"& arrAppProperties( inxTNid + (nNumberofProperties * 3) )%><%=objPMod.ComposeURLWithout("tree")%>" class="body_link">Manage Pages for this Application</a><br> -->
137
                   page access control. </td>
137
                   Define application web pages for<br>
138
               </tr>
138
                   page access control. </td>
139
             </table>
139
               </tr>
140
			 
140
             </table>
141
			 </td>
141
			 
142
           </tr>
142
			 </td>
143
         </table>
143
           </tr>
144
         <br></td>
144
         </table>
145
      </tr>
145
         <br></td>
146
    </table></td>
146
      </tr>
147
  </tr>
147
    </table></td>
148
</table>
148
  </tr>
149
<!-- FOOTER ++++++++++++++++++++++ -->
149
</table>
150
<!--#include file="_footer.asp"-->
150
<!-- FOOTER ++++++++++++++++++++++ -->
151
<!-- +++++++++++++++++++++++++++++ -->
151
<!--#include file="_footer.asp"-->
152
</body>
152
<!-- +++++++++++++++++++++++++++++ -->
153
</html>
153
</body>
154
<%
154
</html>
155
'------------ RUN AFTER PAGE RENDER -----------
155
<%
156
'----------------------------------------------
156
'------------ RUN AFTER PAGE RENDER -----------
157
%>
157
'----------------------------------------------
-
 
158
%>
158
<!--#include file="common/globals_destructor.asp"-->
159
<!--#include file="common/globals_destructor.asp"-->
159
160