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 
'|			          Control General				 |
 5 
'|			          Control General				 |
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 
<!--#include file="common/_control_common.asp"-->
 16 
<!--#include file="common/_control_common.asp"-->
17 
<%
 17 
<%
18 
'------------ ACCESS CONTROL ------------------
 18 
'------------ ACCESS CONTROL ------------------
19 
%>
 19 
%>
20 
<!--#include file="_access_control_general.asp"-->
 20 
<!--#include file="_access_control_general.asp"-->
21 
<%
 21 
<%
22 
'------------ VARIABLE DEFINITION -------------
 22 
'------------ VARIABLE DEFINITION -------------
23 
Dim sNode
 23 
Dim sNode
24 
Dim rsQry
 24 
Dim rsQry
25 
'------------ CONSTANTS DECLARATION -----------
 25 
'------------ CONSTANTS DECLARATION -----------
26 
'------------ VARIABLE INIT -------------------
 26 
'------------ VARIABLE INIT -------------------
27 
'------------ CONDITIONS ----------------------
 27 
'------------ CONDITIONS ----------------------
28 
'----------------------------------------------
 28 
'----------------------------------------------
29 
%>
 29 
%>
30 
<%
 30 
<%
31 
'------------ RUN BEFORE PAGE RENDER ----------
 31 
'------------ RUN BEFORE PAGE RENDER ----------
32 
Call GetControlDetails ( parObj_id, parApp_id, objObjCollector )
 32 
Call GetControlDetails ( parObj_id, parApp_id, objObjCollector )
33 
'----------------------------------------------
 33 
'----------------------------------------------
34 
%>
 34 
%>
35 
<html>
 35 
<html>
36 
<head>
 36 
<head>
37 
<title>Access Manager</title>
 37 
<title>Access Manager</title>
38 
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
 38 
<link rel="shortcut icon" href="<%=FavIcon%>"/>
39 
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
 39 
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
40 
<link href="scripts/access_manager.css" rel="stylesheet" type="text/css">
 40 
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
41 
<script language="JavaScript" src="scripts/common.js"></script>
 41 
<link href="scripts/access_manager.css" rel="stylesheet" type="text/css">
42 
</head>
 42 
<script language="JavaScript" src="scripts/common.js"></script>
43 
 
 43 
</head>
44 
<body bgcolor="#FFFFFF" leftmargin="0" topmargin="0">
 44 
 
45 
<!-- HEADER ++++++++++++++++++++++ -->
 45 
<body bgcolor="#FFFFFF" leftmargin="0" topmargin="0">
46 
<!--#include file="_header.asp"-->
 46 
<!-- HEADER ++++++++++++++++++++++ -->
47 
<!-- +++++++++++++++++++++++++++++ -->
 47 
<!--#include file="_header.asp"-->
48 
<table width="100%"  border="0" cellspacing="0" cellpadding="0">
 48 
<!-- +++++++++++++++++++++++++++++ -->
49 
  <tr>
 49 
<table width="100%"  border="0" cellspacing="0" cellpadding="0">
50 
    <td width="1%" valign="top" background="images/bg_bage_pane.gif">
 50 
  <tr>
51 
	<!-- TREE NAVIGATOR ++++++++++++++++++++++++++++++++++++++++++++ -->
 51 
    <td width="1%" valign="top" background="images/bg_bage_pane.gif">
52 
	<!--#include file="_treeNavigator.asp"-->
52 
	<!-- TREE NAVIGATOR ++++++++++++++++++++++++++++++++++++++++++++ -->
53 
	<!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
 53 
	<!--#include file="_treeNavigator.asp"-->
54 
	</td>
 54 
	<!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
55 
    <td width="1" background="images/bg_drk_gray_border.gif"><img src="images/spacer.gif" width="1" height="600"></td>
 55 
	</td>
56 
    <td width="100%" valign="top"><table width="100%"  border="0" cellspacing="0" cellpadding="9">
 56 
    <td width="1" background="images/bg_drk_gray_border.gif"><img src="images/spacer.gif" width="1" height="600"></td>
57 
      <tr>
 57 
    <td width="100%" valign="top"><table width="100%"  border="0" cellspacing="0" cellpadding="9">
58 
        <td background="images/bg_drk_bage_pane.gif">
 58 
      <tr>
59 
		  <table width="100%"  border="0" cellspacing="0" cellpadding="0">
 59 
        <td background="images/bg_drk_bage_pane.gif">
60 
            <tr>
 60 
		  <table width="100%"  border="0" cellspacing="0" cellpadding="0">
61 
              <td nowrap class="body_txt"></td>
 61 
            <tr>
62 
              <td align="right" nowrap class="section_ttl"><%=PARENT_TITLE%></td>
 62 
              <td nowrap class="body_txt"></td>
63 
            </tr>
 63 
              <td align="right" nowrap class="section_ttl"><%=PARENT_TITLE%></td>
64 
          </table>
 64 
            </tr>
65 
		</td>
 65 
          </table>
66 
      </tr>
 66 
		</td>
67 
	  <tr>
 67 
      </tr>
68 
        <td class="menu_crumbttl"><%Call RenderTitle ( objObjCollector )%></td>
 68 
	  <tr>
69 
      </tr>
 69 
        <td class="menu_crumbttl"><%Call RenderTitle ( objObjCollector )%></td>
70 
      <tr>
 70 
      </tr>
71 
        <td>
 71 
      <tr>
72 
		 <!-- DETAILS ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
 72 
        <td>
73 
		 	<!-- TAB CONTROLS ++++++++++++++++++++++ -->
 73 
		 <!-- DETAILS ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
74 
			<!--#include file="_tabs_definition.asp"-->
 74 
		 	<!-- TAB CONTROLS ++++++++++++++++++++++ -->
75 
			<%
 75 
			<!--#include file="_tabs_definition.asp"-->
76 
			Set objTabControl = New TabControl
 76 
			<%
77 
			objTabControl.TemplateDoc = ReadFile( Server.MapPath("controls/ERGTabStyleMac/mac_style.html") ) ' Supply tab style definition
 77 
			Set objTabControl = New TabControl
78 
			objTabControl.TabStyle = "StyleMac"
 78 
			objTabControl.TemplateDoc = ReadFile( Server.MapPath("controls/ERGTabStyleMac/mac_style.html") ) ' Supply tab style definition
79 
			objTabControl.AddTabDefnition ( arrControl )
 79 
			objTabControl.TabStyle = "StyleMac"
80 
			objTabControl.SelectByName ( "General" )
 80 
			objTabControl.AddTabDefnition ( arrControl )
81 
			objTabControl.Render ()
 81 
			objTabControl.SelectByName ( "General" )
82 
			%>
 82 
			objTabControl.Render ()
83 
			<!-- END OF TAB CONTROLS +++++++++++++++ -->
 83 
			%>
84 
		 <table width="100%"  border="0" cellspacing="0" cellpadding="0">
 84 
			<!-- END OF TAB CONTROLS +++++++++++++++ -->
85 
          <tr>
 85 
		 <table width="100%"  border="0" cellspacing="0" cellpadding="0">
86 
            <td width="1" background="images/bg_gray_border.gif"><img src="images/spacer.gif" width="1" height="500"></td>
 86 
          <tr>
87 
            <td width="100%" valign="top">
 87 
            <td width="1" background="images/bg_gray_border.gif"><img src="images/spacer.gif" width="1" height="500"></td>
88 
			  <table width="100%"  border="0" cellspacing="10" cellpadding="0">
 88 
            <td width="100%" valign="top">
89 
                <tr>
 89 
			  <table width="100%"  border="0" cellspacing="10" cellpadding="0">
90 
                  <td class='body_txt'>
 90 
                <tr>
91 
				  <!-- TAB DETAILS +++++++++++++++++++++++++++++ -->
 91 
                  <td class='body_txt'>
92 
                  <%=objObjCollector.Item ("obj_description")%>
 92 
				  <!-- TAB DETAILS +++++++++++++++++++++++++++++ -->
93 
				  <!-- +++++++++++++++++++++++++++++++++++++++++ -->
 93 
                  <%=objObjCollector.Item ("obj_description")%>
94 
				  </td>
 94 
				  <!-- +++++++++++++++++++++++++++++++++++++++++ -->
95 
                </tr>
 95 
				  </td>
96 
                <tr>
 96 
                </tr>
97 
                    <td>
 97 
                <tr>
98 
                    <% If canActionControl("canCreateActions") Then%>
 98 
                    <td>
99 
                    <button class="form_btn" onclick="MM_openBrWindow('wEditControl.asp?rmode=1&rfile=<%=SCRIPT_NAME%>&<%=objPMod.ComposeURL%>','Edit Action','scrollbars=yes,resizable=yes,width=600,height=350')">
 99 
                    <% If canActionControl("canCreateActions") Then%>
100 
                        Edit Action <%=LIMG_EDIT%>
 100 
                    <button class="form_btn" onclick="MM_openBrWindow('wEditControl.asp?rmode=1&rfile=<%=SCRIPT_NAME%>&<%=objPMod.ComposeURL%>','Edit Action','scrollbars=yes,resizable=yes,width=600,height=350')">
101 
                    </button>
 101 
                        Edit Action <%=LIMG_EDIT%>
102 
                    <%Else%>
 102 
                    </button>
103 
                    <span class="form_btn_dis" >
 103 
                    <%Else%>
104 
                        Edit Action <%=LIMG_EDIT_OFF%>
 104 
                    <span class="form_btn_dis" >
105 
                    </span>
 105 
                        Edit Action <%=LIMG_EDIT_OFF%>
106 
                    <%End If%>
 106 
                    </span>
107 
				  </td>
 107 
                    <%End If%>
108 
                </tr>
 108 
				  </td>
109 
              </table>
 109 
                </tr>
110 
			</td>
 110 
              </table>
111 
            <td width="1" background="images/bg_gray_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
 111 
			</td>
112 
          </tr>
 112 
            <td width="1" background="images/bg_gray_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
113 
         </table>
 113 
          </tr>
114 
         <table width="100%"  border="0" cellspacing="0" cellpadding="0">
 114 
         </table>
115 
           <tr>
 115 
         <table width="100%"  border="0" cellspacing="0" cellpadding="0">
116 
             <td background="images/bg_gray_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
 116 
           <tr>
117 
           </tr>
 117 
             <td background="images/bg_gray_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
118 
         </table>
 118 
           </tr>
119 
		 <!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
 119 
         </table>
120 
         <br></td>
 120 
		 <!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
121 
      </tr>
 121 
         <br></td>
122 
    </table></td>
 122 
      </tr>
123 
  </tr>
 123 
    </table></td>
124 
</table>
 124 
  </tr>
125 
<!-- FOOTER ++++++++++++++++++++++ -->
 125 
</table>
126 
<!--#include file="_footer.asp"-->
 126 
<!-- FOOTER ++++++++++++++++++++++ -->
127 
<!-- +++++++++++++++++++++++++++++ -->
 127 
<!--#include file="_footer.asp"-->
128 
</body>
 128 
<!-- +++++++++++++++++++++++++++++ -->
129 
</html>
 129 
</body>
130 
<%
 130 
</html>
131 
'------------ RUN AFTER PAGE RENDER -----------
 131 
<%
132 
'----------------------------------------------
 132 
'------------ RUN AFTER PAGE RENDER -----------
133 
%>
 133 
'----------------------------------------------
- 
 
 134 
%>
134 
<!--#include file="common/globals_destructor.asp"-->
 135 
<!--#include file="common/globals_destructor.asp"-->
135 

            136