Subversion Repositories DevTools

Rev

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

Rev 62 Rev 5356
Line 1... Line 1...
1 
<%@LANGUAGE="VBSCRIPT"%>
 1 
<%@LANGUAGE="VBSCRIPT"%>
2 
<%
 2 
<%
3 
'=====================================================
 3 
'=====================================================
4 
'|                                                   |
 4 
'|                                                   |
5 
'|				    	MEMBERS					     |
 5 
'|				    	MEMBERS					     |
6 
'|                       INDEX                 		 |
 6 
'|                       INDEX                 		 |
7 
'=====================================================
 7 
'=====================================================
8 
%>
 8 
%>
9 
<%
 9 
<%
10 
Option explicit
 10 
Option explicit
11 
' Good idea to set when using redirect
 11 
' Good idea to set when using redirect
12 
Response.Expires = 0	' always load the page, dont store
 12 
Response.Expires = 0	' always load the page, dont store
13 
%>
 13 
%>
14 
<!--#include file="common/config.asp"-->
 14 
<!--#include file="common/config.asp"-->
15 
<!--#include file="common/globals.asp"-->
 15 
<!--#include file="common/globals.asp"-->
16 
<!--#include file="common/formating.asp"-->
 16 
<!--#include file="common/formating.asp"-->
17 
<!--#include file="common/common_subs.asp"-->
 17 
<!--#include file="common/common_subs.asp"-->
18 
<%'Refresh parent window after the child window is closed
 18 
<%'Refresh parent window after the child window is closed
19 
'If QStrPar("refresh") = "true" Then
 19 
'If QStrPar("refresh") = "true" Then
20 
'	Response.Redirect( scriptName &"?done=done"& QSTR)	' Note: "done" parameter is required as QSTR cannot stant on its own.
 20 
'	Response.Redirect( scriptName &"?done=done"& QSTR)	' Note: "done" parameter is required as QSTR cannot stant on its own.
21 
'End If
 21 
'End If
22 
%>
 22 
%>
23 
<%
 23 
<%
24 
'------------ ACCESS CONTROL ------------------
 24 
'------------ ACCESS CONTROL ------------------
25 
%>
 25 
%>
26 
 
 26 
 
27 
<!--#include file="_access_control_general.asp"-->
 27 
<!--#include file="_access_control_general.asp"-->
28 
<%
 28 
<%
29 
'------------ Variable Definition -------------
 29 
'------------ Variable Definition -------------
30 
Dim rsTemp
 30 
Dim rsTemp
31 
'------------ Constants Declaration -----------
 31 
'------------ Constants Declaration -----------
32 
'------------ Variable Init -------------------
 32 
'------------ Variable Init -------------------
33 
'----------------------------------------------
 33 
'----------------------------------------------
34 
%>
 34 
%>
35 
<%
 35 
<%
36 
Function Get_Personal_Views ( NNuser_id )
 36 
Function Get_Personal_Views ( NNuser_id )
37 
	Get_Personal_Views = ReadFile( rootPath & "queries\personal_views_list.qry" )
 37 
	Get_Personal_Views = ReadFile( rootPath & "queries\personal_views_list.qry" )
38 
	Get_Personal_Views = Replace( Get_Personal_Views, "$USER_ID$", NNuser_id)
 38 
	Get_Personal_Views = Replace( Get_Personal_Views, "$USER_ID$", NNuser_id)
39 
End Function
 39 
End Function
40 
 
 40 
 
41 
Sub Remove_View_Settings ( NNuser_id )
 41 
Sub Remove_View_Settings ( NNuser_id )
42 
	OraSession.BeginTrans
 42 
	OraSession.BeginTrans
43 
	OraDatabase.ExecuteSQL " DELETE FROM view_settings vis WHERE vis.user_id = "& NNuser_id &" AND vis.view_id IN (SELECT vi.view_id FROM views vi WHERE vi.owner_id = "& NNuser_id &")"
 43 
	OraDatabase.ExecuteSQL " DELETE FROM view_settings vis WHERE vis.user_id = "& NNuser_id &" AND vis.view_id IN (SELECT vi.view_id FROM views vi WHERE vi.owner_id = "& NNuser_id &")"
44 
  	OraSession.CommitTrans
 44 
  	OraSession.CommitTrans
45 
End Sub
 45 
End Sub
46 
 
 46 
 
47 
Sub Insert_View_Settings ( NNuser_id, SSpersonalshow )
 47 
Sub Insert_View_Settings ( NNuser_id, SSpersonalshow )
48 
	If SSpersonalshow <> "" Then
 48 
	If SSpersonalshow <> "" Then
49 
	OraSession.BeginTrans
 49 
	OraSession.BeginTrans
50 
	OraDatabase.ExecuteSQL " INSERT INTO view_settings"&_
 50 
	OraDatabase.ExecuteSQL " INSERT INTO view_settings"&_
51 
						   " SELECT TO_NUMBER('"& NNuser_id &"') AS user_id, vi.view_id FROM views vi WHERE vi.view_id IN ("& SSpersonalshow &")"
 51 
						   " SELECT TO_NUMBER('"& NNuser_id &"') AS user_id, vi.view_id FROM views vi WHERE vi.view_id IN ("& SSpersonalshow &")"
52 
  	OraSession.CommitTrans
 52 
  	OraSession.CommitTrans
53 
	End If
 53 
	End If
54 
End Sub
 54 
End Sub
55 
%>
 55 
%>
56 
<%
 56 
<%
57 
'--- Process submition ---
 57 
'--- Process submition ---
58 
'If (QStrPar("action") <> "") Then
 58 
'If (QStrPar("action") <> "") Then
59 
	' All mendatory parameters FOUND
 59 
	' All mendatory parameters FOUND
60 
'	Call Remove_View_Settings ( objAccessControl.UserId )
 60 
'	Call Remove_View_Settings ( objAccessControl.UserId )
61 
'	Call Insert_View_Settings ( objAccessControl.UserId, Request("FRpersonalshow") )
 61 
'	Call Insert_View_Settings ( objAccessControl.UserId, Request("FRpersonalshow") )
62 
'End If
 62 
'End If
63 
%>
 63 
%>
64 
<html>
 64 
<html>
65 
<head>
 65 
<head>
66 
<title>Deployment Manager</title>
 66 
<title>Deployment Manager</title>
67 
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
 67 
<link rel="shortcut icon" href="<%=FavIcon%>"/>
68 
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
 68 
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
69 
<link rel="stylesheet" href="images/release_manager_style.css" type="text/css">
 69 
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
70 
<link rel="stylesheet" href="images/navigation.css" type="text/css">
 70 
<link rel="stylesheet" href="images/release_manager_style.css" type="text/css">
71 
<script language="JavaScript" src="images/common.js"></script>
 71 
<link rel="stylesheet" href="images/navigation.css" type="text/css">
72 
</head>
 72 
<script language="JavaScript" src="images/common.js"></script>
73 
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" >
 73 
</head>
74 
<!-- TIPS LAYERS -------------------------------------->
 74 
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" >
75 
<div id="formTipsLayer" style="position: absolute; z-index: 1000; visibility: hidden; left:0; top: 0; width: 10">&nbsp;</div>
 75 
<!-- TIPS LAYERS -------------------------------------->
76 
<!----------------------------------------------------->
 76 
<div id="formTipsLayer" style="position: absolute; z-index: 1000; visibility: hidden; left:0; top: 0; width: 10">&nbsp;</div>
77 
<!-- HEADER -->
 77 
<!----------------------------------------------------->
78 
<%If objAccessControl.UserLogedIn Then%>
 78 
<!-- HEADER -->
79 
<div id="Layer1" style="position:absolute; left:2; top:2; width:1px; height:1px; z-index:1"><a href="#"><img src="images/i_logout.gif" width="14" height="14" border="0" alt="Logout from <%=objAccessControl.UserName%> disabled" title="Logout from <%=objAccessControl.UserName%> disabled"></a></div>
 79 
<%If objAccessControl.UserLogedIn Then%>
80 
<%End If%>
 80 
<div id="Layer1" style="position:absolute; left:2; top:2; width:1px; height:1px; z-index:1"><a href="#"><img src="images/i_logout.gif" width="14" height="14" border="0" alt="Logout from <%=objAccessControl.UserName%> disabled" title="Logout from <%=objAccessControl.UserName%> disabled"></a></div>
81 
<table width="100%"  border="0" cellspacing="0" cellpadding="0">
 81 
<%End If%>
82 
  <tr>
 82 
<table width="100%"  border="0" cellspacing="0" cellpadding="0">
83 
    <td width="1%" background="images/bg_lite_blue.gif"><img src="images/p_header.gif" width="552" height="45"></td>
 83 
  <tr>
84 
    <td width="100%" background="images/bg_lite_blue.gif">&nbsp;</td>
 84 
    <td width="1%" background="images/bg_lite_blue.gif"><img src="images/p_header.gif" width="552" height="45"></td>
85 
    <td width="1%" rowspan="2" valign="bottom" background="images/bg_lite_blue.gif"><a href="Default.asp"><img src="images/dm_logo.gif" alt="Home" title="Home" width="241" height="69" border="0"></a></td>
 85 
    <td width="100%" background="images/bg_lite_blue.gif">&nbsp;</td>
86 
  </tr>
 86 
    <td width="1%" rowspan="2" valign="bottom" background="images/bg_lite_blue.gif"><a href="Default.asp"><img src="images/dm_logo.gif" alt="Home" title="Home" width="241" height="69" border="0"></a></td>
87 
  <tr>
 87 
  </tr>
88 
    <td background="images/p_header_bottom.gif"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
 88 
  <tr>
89 
		<%If objAccessControl.UserLogedIn Then%>
 89 
    <td background="images/p_header_bottom.gif"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
90 
        <tr>
 90 
		<%If objAccessControl.UserLogedIn Then%>
91 
          <div id="Layer1" style="position:absolute; left:2; top:2; width:1px; height:1px; z-index:1"><a href="_Logout.asp"><img src="images/i_logout.gif" width="14" height="14" border="0" alt="Logout from <%=objAccessControl.UserName%>" title="Logout from <%=objAccessControl.UserName%>"></a></div>
 91 
        <tr>
92 
		  <!--
 92 
          <div id="Layer1" style="position:absolute; left:2; top:2; width:1px; height:1px; z-index:1"><a href="_Logout.asp"><img src="images/i_logout.gif" width="14" height="14" border="0" alt="Logout from <%=objAccessControl.UserName%>" title="Logout from <%=objAccessControl.UserName%>"></a></div>
93 
          <td width="1%"><a href="CommingSoon.asp"><img src="icons/ni_new_product.gif" title="New product has arrived." width="18" height="18" hspace="2" border="0"></a></td>
 93 
		  <!--
94 
          <td width="1"><a href="CommingSoon.asp"><img src="icons/ni_notifier.gif" title="Email notification." width="18" height="18" hspace="2" border="0"></a></td>
 94 
          <td width="1%"><a href="CommingSoon.asp"><img src="icons/ni_new_product.gif" title="New product has arrived." width="18" height="18" hspace="2" border="0"></a></td>
95 
		  -->
 95 
          <td width="1"><a href="CommingSoon.asp"><img src="icons/ni_notifier.gif" title="Email notification." width="18" height="18" hspace="2" border="0"></a></td>
96
96 
		  -->
97 
          <td width="1" align="right"><img src="icons/ni_bar.gif" width="16" height="24"></td>
 97
98 
          <td width="100%" bgcolor="#FFFFFF">&nbsp;</td>
 98 
          <td width="1" align="right"><img src="icons/ni_bar.gif" width="16" height="24"></td>
99 
        </tr>
 99 
          <td width="100%" bgcolor="#FFFFFF">&nbsp;</td>
100 
		<%Else%>
 100 
        </tr>
101 
		<tr>
 101 
		<%Else%>
102 
          <td width="1" align="right"><img src="icons/ni_bar.gif" width="16" height="24"></td>
 102 
		<tr>
103 
          <td width="100%" bgcolor="#FFFFFF">&nbsp;</td>
 103 
          <td width="1" align="right"><img src="icons/ni_bar.gif" width="16" height="24"></td>
104 
        </tr>
 104 
          <td width="100%" bgcolor="#FFFFFF">&nbsp;</td>
105 
		<%End If%>
 105 
        </tr>
106 
    </table></td>
 106 
		<%End If%>
107 
    <td align="right" bgcolor="#FFFFFF"><%=ProgressBar()%></td>
 107 
    </table></td>
108 
  </tr>
 108 
    <td align="right" bgcolor="#FFFFFF"><%=ProgressBar()%></td>
109 
</table>
 109 
  </tr>
110 
<!-- BODY ---->
 110 
</table>
111 
<table width="100%" border="0" cellspacing="0" cellpadding="0">
 111 
<!-- BODY ---->
112 
  <tr>
112 
<table width="100%" border="0" cellspacing="0" cellpadding="0">
113 
    <td width="1%" background="images/bg_member_dark.gif" valign="top">
113 
  <tr>
114 
      <!-- MEMBERS MENU ---------------------------------------------->
 114 
    <td width="1%" background="images/bg_member_dark.gif" valign="top">
115 
	  <!--#include file="members_menu_def.asp"-->
 115 
      <!-- MEMBERS MENU ---------------------------------------------->
116 
	  <%Call Member_Menu( "" )%>
 116 
	  <!--#include file="members_menu_def.asp"-->
117 
      <!--  MEMBERS MENU END ------------------------------------------>
 117 
	  <%Call Member_Menu( "" )%>
118 
    </td>
 118 
      <!--  MEMBERS MENU END ------------------------------------------>
119 
    <td width="1%" valign="top" background="images/bg_member_light.gif"><a href="default.asp" class="form_txt_link"><img src="images/i_home.gif" width="13" height="12" border="0" align="absmiddle">Exit</a></td>
 119 
    </td>
120 
    <td rowspan="2" valign="top" width="1%" background="images/bg_member_light.gif" nowrap>
120 
    <td width="1%" valign="top" background="images/bg_member_light.gif"><a href="default.asp" class="form_txt_link"><img src="images/i_home.gif" width="13" height="12" border="0" align="absmiddle">Exit</a></td>
121 
      <!------------------------------------------->
 121 
    <td rowspan="2" valign="top" width="1%" background="images/bg_member_light.gif" nowrap>
122 
      <br>
 122 
      <!------------------------------------------->
123 
      <!-------------------------------------------------------->
 123 
      <br>
124 
    </td>
 124 
      <!-------------------------------------------------------->
125 
    <td rowspan="2" valign="bottom" width="100%" background="images/bg_member_light.gif" align="right"><img src="images/bg_img_view.gif" width="249" height="144" vspace="10" hspace="10"></td>
 125 
    </td>
126 
  </tr>
 126 
    <td rowspan="2" valign="bottom" width="100%" background="images/bg_member_light.gif" align="right"><img src="images/bg_img_view.gif" width="249" height="144" vspace="10" hspace="10"></td>
127 
  <tr>
127 
  </tr>
128 
    <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>
 128 
  <tr>
129 
    <td background="images/bg_member_light.gif" valign="top"><img src="images/h_trsp_dot.gif" width="100" height="400"></td>
 129 
    <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>
130 
  </tr>
 130 
    <td background="images/bg_member_light.gif" valign="top"><img src="images/h_trsp_dot.gif" width="100" height="400"></td>
131 
</table>
 131 
  </tr>
132 
<!-- FOOTER -->
 132 
</table>
133 
<!--#include file="_footer.asp"-->
 133 
<!-- FOOTER -->
134 
</body>
 134 
<!--#include file="_footer.asp"-->
135 
</html>
 135 
</body>
136 
<%
 136 
</html>
137 
Call Destroy_All_Objects
 137 
<%
- 
 
 138 
Call Destroy_All_Objects
138 
%>
 139 
%>
139 

            140