Subversion Repositories DevTools

Rev

Rev 3930 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
3930 dpurdie 1
<%@LANGUAGE="VBSCRIPT"%>
2
<%
3
'=====================================================
4
'|                                                   |
5
'|				    	MEMBERS					     |
6
'|        MY ROLES - Access Details                  |
7
'=====================================================
8
%>
9
<%
10
Option explicit
11
' Good idea to set when using redirect
12
Response.Expires = 0	' always load the page, dont store
13
%>
14
<!--#include file="common/conf.asp"-->
15
<!--#include file="common/globals.asp"-->
16
<!--#include file="common/formating.asp"-->
17
<!--#include file="common/qstr.asp"-->
18
<!--#include file="common/common_subs.asp"-->
19
<%
20
'------------ ACCESS CONTROL ------------------
21
%>
22
<!--#include file="_access_control_login.asp"-->
23
<!--#include file="_access_control_general.asp"-->
24
<%
25
'------------ Variable Definition -------------
26
Dim rsTemp
27
Dim rsQry
28
Dim sqlQuery
29
Dim parProj
30
 
31
'------------ Constants Declaration -----------
32
'------------ Variable Init -------------------
33
parProj = QStrPar("proj_id")
34
 
35
'----------------------------------------------
36
 
37
Function chkbox( value )
38
    chkbox = "<input type='checkbox' disabled"
39
    If value Then chkbox = chkbox & " checked=yes"
40
    chkbox = chkbox & "/>"
41
End Function
42
 
3931 dpurdie 43
'----------------------------------------------
44
' Display the text (HTML allowed) as a tooltip
45
Function ToolTip(text)
46
    ToolTip = "<a href='#' class='tooltip'><img src='images/i_help.gif' style='height:12px;width:12px;border-width:0;'><span><i></i>"
47
    ToolTip = ToolTip & text
48
    ToolTip = ToolTip & "</span></a>"
49
End Function
50
 
3930 dpurdie 51
%>
52
<html>
53
<head>
54
<title>Release Manager</title>
55
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
56
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
57
<link rel="stylesheet" href="images/release_manager_style.css" type="text/css">
58
<link rel="stylesheet" href="images/navigation.css" type="text/css">
59
<script language="JavaScript" src="images/common.js"></script>
60
<script language="JavaScript">
61
// Refresh this page with the specified project
62
function updatePage(proj_id){
63
    window.location.replace("members_my_access_details.asp?proj_id=" + proj_id);
64
}
65
</script>
3931 dpurdie 66
<style type="text/css">
67
    /* a.tooltip {outline:none;text-decoration:none;border-bottom:dotted 1px blue;}*/
68
    a.tooltip strong {line-height:30px;}
69
    a.tooltip > span 
70
    {
71
	    width:200px;
72
	    padding: 10px 20px;
73
	    margin-top: 20px;
74
	    margin-left: -85px;
75
	    opacity: 0;
76
	    visibility: hidden;
77
	    z-index: 10;	   
78
	    position: absolute;
79
 
80
        font-family:tahoma,sans-serif;
81
        font-size:11px;
82
        font-style:normal;
83
        font-weight:normal;
84
        white-space: normal;
85
        text-align: left;
86
 
87
	    -webkit-border-radius: 3px;
88
	    -moz-border-radius: 3px;
89
	    -o-border-radius: 3px;
90
	    border-radius: 3px;
91
 
92
 
93
        -webkit-box-shadow: 2px 2px 2px #999;
94
	    -moz-box-shadow: 2px 2px 2px #999;		
95
	    box-shadow: 2px 2px 2px #999;	    
96
 
97
	    -webkit-transition-property:opacity, margin-top, visibility, margin-left;
98
	    -webkit-transition-duration:0.4s, 0.3s, 0.4s, 0.3s;  
99
	    -webkit-transition-timing-function: ease-in-out, ease-in-out, ease-in-out, ease-in-out;
100
 
101
	    -moz-transition-property:opacity, margin-top, visibility, margin-left;
102
	    -moz-transition-duration:0.4s, 0.3s, 0.4s, 0.3s;  
103
	    -moz-transition-timing-function: ease-in-out, ease-in-out, ease-in-out, ease-in-out;
104
 
105
	    -o-transition-property:opacity, margin-top, visibility, margin-left;
106
	    -o-transition-duration:0.4s, 0.3s, 0.4s, 0.3s;  
107
	    -o-transition-timing-function: ease-in-out, ease-in-out, ease-in-out, ease-in-out;
108
 
109
	    transition-property:opacity, margin-top, visibility, margin-left;
110
	    transition-duration:0.4s, 0.3s, 0.4s, 0.3s;  
111
	    transition-timing-function: ease-in-out, ease-in-out, ease-in-out, ease-in-out;
112
    }
113
 
114
	a.tooltip:hover > span
115
	{
116
		opacity: 1;
117
		text-decoration:none;
118
		visibility: visible;
119
		overflow: visible;
120
		margin-top:25px;
121
		display: inline;
122
		margin-left: -60px;		
123
	}
124
 
125
    /* Display the ^ as a part of the tooltip. Needs <i></i> */
126
	a.tooltip span i {
127
 
128
		width: 15px;
129
		height: 15px;
130
		margin-left: 20px;
131
		margin-top: -19px;
132
 
133
		display: block;
134
		position: absolute;
135
 
136
		-webkit-transform: rotate(-45deg);
137
		-moz-transform: rotate(-45deg);
138
		-o-transform: rotate(-45deg);
139
		transform: rotate(-45deg);
140
 
141
		-webkit-box-shadow: inset -1px 1px 0 #fff;
142
		-moz-box-shadow: inset 0 1px 0 #fff;
143
		-o-box-shadow: inset 0 1px 0 #fff;
144
		box-shadow: inset 0 1px 0 #fff;
145
 
146
		display: none\0/;
147
		*display: none;
148
	}
149
 
150
a.tooltip > span {
151
	color: #000000; 
152
 
153
	background: #FBF5E6;
154
	background: -moz-linear-gradient(top, #FBF5E6 0%, #FFFFFF 100%);
155
	background: -webkit-gradient(linear, left top, left bottom, color-stop(0%,#FBF5E6), color-stop(100%,#FFFFFF));
156
	filter: progid:DXImageTransform.Microsoft.gradient( startColorstr='#FBF5E6', endColorstr='#FFFFFF',GradientType=0 );
157
 
158
	border: 1px solid #CFB57C;	     
159
}    
160
 
161
a.tooltip span i {
162
	background: #FBF5E6;
163
	border-top: 1px solid #CFB57C;
164
	border-right: 1px solid #CFB57C;
165
}    
166
</style>
3930 dpurdie 167
</head>
168
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" >
169
<!-- TIPS LAYERS -------------------------------------->
170
<div id="formTipsLayer" style="position: absolute; z-index: 1000; visibility: hidden; left:0; top: 0; width: 10">&nbsp;</div>
171
<!----------------------------------------------------->
172
<!-- HEADER -->
173
<!--#include file="_header.asp"-->
174
<!-- BODY ---->
175
<table width="100%" border="0" cellspacing="0" cellpadding="0">
176
  <tr> 
177
    <td width="1%" background="images/bg_member_dark.gif" valign="top"> 
178
      <!-- MEMBERS MENU ---------------------------------------------->
179
	  <!--#include file="members_menu_def.asp"-->
180
	  <%Call Member_Menu( "my_roles" )%>
181
      <!--  MEMBERS MENU END ------------------------------------------>
182
    </td>
183
    <td width="1%" valign="top" background="images/bg_member_light.gif"><a href="index.asp" class="form_txt_link"><img src="images/i_home.gif" width="13" height="12" border="0" align="absmiddle">Exit</a></td>
184
    <td rowspan="2" valign="top" width="70%" background="images/bg_member_light.gif" nowrap>
185
      <!------------------------------------------->
186
      <br>
187
      <span class="mmb_ttl">My Access Details</span><br>
188
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
189
	  <form>
190
        <tr> 
191
          <td width="1%">&nbsp;</td>
192
          <td align="right"><img src="images/h_trsp_dot.gif" width="500" height="30"></td>
193
          <td width="1%">&nbsp;</td>
194
        </tr>
195
        <tr> 
196
          <td align="left" valign="top" width="1%" background="images/bg_member_dark.gif"><img src="images/h_trsp_dot.gif" width="13" height="13"></td>
3931 dpurdie 197
           <td background="images/bg_member_dark.gif" align="left" class="wform_ttl">&nbsp;</td>
3930 dpurdie 198
          <td align="right" valign="top" width="1%" background="images/bg_member_dark.gif">&nbsp;</td>
199
        </tr>
200
        <tr> 
201
          <td width="1%" bgcolor="#FFFFFF"><img src="images/h_trsp_dot.gif" width="10" height="100"></td>
202
          <td bgcolor="#FFFFFF" valign="top" class="form_item">
203
          <table class="full_table">
204
          <tr class="form_item">
205
          <td>You have access to do:</td>
206
          <td align="right">
207
                 <select name="projA" class="form_item" onChange="updatePage(this.value)" >
208
                    <option value="">-- Select Project --</option>
209
                    <%
210
                    OraDatabase.Parameters.Add "PROJ_ID",    parProj,   ORAPARM_INPUT, ORATYPE_NUMBER
211
                    Set rsQry = OraDatabase.DbCreateDynaset( GetQuery("ProjectsCombo.sql"), cint(0))
212
                    OraDatabase.Parameters.Remove "PROJ_ID"
213
                    While ((NOT rsQry.BOF) AND (NOT rsQry.EOF))%>
214
                       <option value="<%=rsQry("proj_id")%>" <%=rsQry("selected")%>><%=rsQry("proj_name")%></option>
215
                       <%rsQry.MoveNext
216
                    WEnd
217
                    rsQry.Close
218
                    Set rsQry = Nothing
219
                    %>
220
                 </select>
221
          </td>
222
          </table>
223
              <table width="100%" border="0" cellspacing="1" cellpadding="2">
3931 dpurdie 224
                <tr background="images/bg_form_lightbluedark.gif" class="form_field" style="white-space:nowrap">
225
                  <td><b>Action&nbsp;</b><%=ToolTip("The internal name of the access control")%></td>
226
                  <td><b>Description</b><%=ToolTip("A description of the access control item")%></td>
227
                  <td colspan=2 align="center"><b>Access</b><%=ToolTip("<h4>Project Independent Permissions</h4>These are the basic permissions before project specific control elements have been applied.")%></td>
228
                  <td colspan=2 align="center"><b>Data</b><%=ToolTip("<h4>Project Specific Permissions</h4>These are the permissions after project-specfic control elements have been applied.")%></td>
3930 dpurdie 229
                </tr>
230
                <tr background="images/bg_form_lightbluedark.gif" class="form_field">
231
                  <td colspan=2></td>
3931 dpurdie 232
                  <td><b>Active</b><%=ToolTip("The associated action should be available.<br>Controls do not need to visible for an action to be available.")%></td>
233
                  <td><b>Visible</b><%=ToolTip("The associated action may have a control button that is shown to the user.<br>If the action is not active then the action should not be available to the user.")%></td>
3930 dpurdie 234
                  <td><b>Active</b></td>
235
                  <td><b>Visible</b></td>
236
                </tr>
237
				<%
238
                sqlQuery = "select obj_name, obj_description " &_
239
                            "from control_objects co " &_
240
                            "where co.app_id = :APP_ID " &_
241
                            "order by UPPER(co.obj_name)"
242
 
243
				OraDatabase.Parameters.Add "APP_ID",   APPLICATION_ID, ORAPARM_INPUT, ORATYPE_NUMBER
244
				Set rsTemp = OraDatabase.DbCreateDynaset(sqlQuery, cint(0))
245
				OraDatabase.Parameters.Remove "APP_ID"
246
			    While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))
247
				%>
248
				<tr background="images/bg_form_lightgray.gif" class="form_item">
249
                  <td nowrap><%=rsTemp("obj_name")%></td>
250
                  <td><%=rsTemp("obj_description")%></td>
251
                  <td align="right"><%=chkbox(objAccessControl.IsActive(rsTemp("obj_name")))%></td>
252
                  <td><%=chkbox(objAccessControl.IsVisible(rsTemp("obj_name")))%></td>
253
                  <%If parProj <> "" Then %>
254
                    <td align="right"><%=chkbox(objAccessControl.IsDataActive ("PROJECTS", DB_PROJ_ID, rsTemp("obj_name")))%></td>
255
                    <td><%=chkbox(objAccessControl.IsDataVisible ("PROJECTS", DB_PROJ_ID, rsTemp("obj_name")))%></td>
256
                  <%End If%>
257
                </tr>
258
				<%rsTemp.MoveNext
259
	    	    WEnd
260
				rsTemp.Close()
261
				Set rsTemp = nothing
262
				%>
263
              </table>
264
			  <br><br>
265
			</td>
266
          <td width="1%" background="images/lbox_bgside_white.gif">&nbsp;</td>
267
        </tr>
268
        <tr> 
269
          <td width="1%" background="images/bg_member_dark.gif" valign="bottom"><img src="images/h_trsp_dot.gif" width="13" height="13"></td>
270
          <td background="images/bg_member_dark.gif"></td>
271
          <td width="1%" background="images/bg_member_dark.gif" valign="bottom" align="right"><img src="images/h_trsp_dot.gif" width="13" height="13"></td>
272
        </tr>
273
		</form>
274
      </table>
275
      <!-------------------------------------------------------->
276
    </td>
277
    <td rowspan="2" valign="bottom" width="100%" background="images/bg_member_light.gif" align="right"></td>
278
  </tr>
279
  <tr> 
280
    <td valign="bottom" align="center" background="images/bg_member_dark.gif"><img src="images/img_members.gif" width="81" height="57" vspace="20" hspace="30"></td>
281
    <td background="images/bg_member_light.gif" valign="top"><img src="images/h_trsp_dot.gif" width="100" height="400"></td>
282
  </tr>
283
</table>
284
<!-- FOOTER -->
285
<!--#include file="_footer.asp"-->
286
</body>
287
</html>
288
<%
289
Call Destroy_All_Objects
290
%>