Subversion Repositories DevTools

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
2 rsolanki 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
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
39
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
40
<link href="scripts/access_manager.css" rel="stylesheet" type="text/css">
5299 dpurdie 41
<script language="JavaScript" src="scripts/common.js"></script>
2 rsolanki 42
</head>
43
 
44
<body bgcolor="#FFFFFF" leftmargin="0" topmargin="0">
45
<!-- HEADER ++++++++++++++++++++++ -->
46
<!--#include file="_header.asp"-->
47
<!-- +++++++++++++++++++++++++++++ -->
48
<table width="100%"  border="0" cellspacing="0" cellpadding="0">
49
  <tr>
50
    <td width="1%" valign="top" background="images/bg_bage_pane.gif">
51
	<!-- TREE NAVIGATOR ++++++++++++++++++++++++++++++++++++++++++++ -->
52
	<!--#include file="_treeNavigator.asp"-->  
53
	<!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
54
	</td>
55
    <td width="1" background="images/bg_drk_gray_border.gif"><img src="images/spacer.gif" width="1" height="600"></td>
56
    <td width="100%" valign="top"><table width="100%"  border="0" cellspacing="0" cellpadding="9">
57
      <tr>
58
        <td background="images/bg_drk_bage_pane.gif">
59
		  <table width="100%"  border="0" cellspacing="0" cellpadding="0">
60
            <tr>
61
              <td nowrap class="body_txt"></td>
62
              <td align="right" nowrap class="section_ttl"><%=PARENT_TITLE%></td>
63
            </tr>
64
          </table>
65
		</td>
66
      </tr>
67
	  <tr>
68
        <td class="menu_crumbttl"><%Call RenderTitle ( objObjCollector )%></td>
69
      </tr>
70
      <tr>
71
        <td>
72
		 <!-- DETAILS ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
73
		 	<!-- TAB CONTROLS ++++++++++++++++++++++ -->
74
			<!--#include file="_tabs_definition.asp"-->
75
			<%
76
			Set objTabControl = New TabControl
77
			objTabControl.TemplateDoc = ReadFile( Server.MapPath("controls/ERGTabStyleMac/mac_style.html") ) ' Supply tab style definition
78
			objTabControl.TabStyle = "StyleMac"
79
			objTabControl.AddTabDefnition ( arrControl )
80
			objTabControl.SelectByName ( "General" )
81
			objTabControl.Render ()
82
			%>
83
			<!-- END OF TAB CONTROLS +++++++++++++++ -->
84
		 <table width="100%"  border="0" cellspacing="0" cellpadding="0">
85
          <tr>
86
            <td width="1" background="images/bg_gray_border.gif"><img src="images/spacer.gif" width="1" height="500"></td>
87
            <td width="100%" valign="top">
88
			  <table width="100%"  border="0" cellspacing="10" cellpadding="0">
89
                <tr>
5299 dpurdie 90
                  <td class='body_txt'>
2 rsolanki 91
				  <!-- TAB DETAILS +++++++++++++++++++++++++++++ -->
5299 dpurdie 92
                  <%=objObjCollector.Item ("obj_description")%>
2 rsolanki 93
				  <!-- +++++++++++++++++++++++++++++++++++++++++ -->
94
				  </td>
95
                </tr>
5299 dpurdie 96
                <tr>
97
                    <td>
98
                    <% If canActionControl("canCreateActions") Then%>
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')">
100
                        Edit Action <%=LIMG_EDIT%>
101
                    </button>
102
                    <%Else%>
103
                    <span class="form_btn_dis" >
104
                        Edit Action <%=LIMG_EDIT_OFF%>
105
                    </span>
106
                    <%End If%>
107
				  </td>
108
                </tr>
2 rsolanki 109
              </table>
110
			</td>
111
            <td width="1" background="images/bg_gray_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
112
          </tr>
113
         </table>
114
         <table width="100%"  border="0" cellspacing="0" cellpadding="0">
115
           <tr>
116
             <td background="images/bg_gray_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
117
           </tr>
118
         </table>
119
		 <!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
120
         <br></td>
121
      </tr>
122
    </table></td>
123
  </tr>
124
</table>
125
<!-- FOOTER ++++++++++++++++++++++ -->
126
<!--#include file="_footer.asp"-->
127
<!-- +++++++++++++++++++++++++++++ -->
128
</body>
129
</html>
130
<%
131
'------------ RUN AFTER PAGE RENDER -----------
132
'----------------------------------------------
133
%>
134
<!--#include file="common/globals_destructor.asp"-->