Subversion Repositories DevTools

Rev

Rev 5512 | Details | Compare with Previous | Last modification | View Log | RSS feed

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