Subversion Repositories DevTools

Rev

Rev 6778 | Rev 6784 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6778 Rev 6783
Line 22... Line 22...
22
<!--#include file="_access_control_login_optional.asp"-->
22
<!--#include file="_access_control_login_optional.asp"-->
23
<!--#include file="_access_control_general.asp"-->
23
<!--#include file="_access_control_general.asp"-->
24
<%
24
<%
25
'------------ Variable Definition -------------
25
'------------ Variable Definition -------------
26
Dim rsQry
26
Dim rsQry
27
Dim styleAlt1
-
 
28
Dim styleAlt2
-
 
29
Dim styleNow
-
 
30
 
-
 
31
styleAlt1="class='body_rowg1'"
-
 
32
styleAlt2="class='body_rowg2'"
-
 
33
styleNow = styleAlt1
-
 
34
'----------------------------------------------
-
 
35
%>
-
 
36
<%
-
 
37
' Toggle row style between the two alternative styles
-
 
38
Sub ToggleStyleNow
-
 
39
   If styleNow = styleAlt1 Then
-
 
40
      styleNow = styleAlt2
-
 
41
   Else
-
 
42
      styleNow = styleAlt1
-
 
43
   End If
-
 
44
End Sub
-
 
45
'--------------------------------------------------------------------------------------------------------------------------
-
 
46
%>
-
 
47
<%
-
 
48
'------------ RUN BEFORE PAGE RENDER ----------
27
'------------ RUN BEFORE PAGE RENDER ----------
49
'----------------------------------------------
-
 
50
%>
-
 
51
<%
-
 
52
'------------------------------------------------------------------------------
28
'------------------------------------------------------------------------------
53
Sub SidePanelContent
29
Sub SidePanelContent
54
%>
30
%>
55
<%
31
<%
56
End Sub
32
End Sub
Line 79... Line 55...
79
                   </tr>
55
                   </tr>
80
 
56
 
81
                   <!-- Status Table Body -->
57
                   <!-- Status Table Body -->
82
                    <%
58
                    <%
83
                    Set rsQry = OraDatabase.DbCreateDynaset( GetQuery("ReplicaStatus.sql"), cint(0))
59
                    Set rsQry = OraDatabase.DbCreateDynaset( GetQuery("ReplicaStatus.sql"), cint(0))
84
                    Dim showWarn, showWarnText
60
                    Dim showWarn, showWarnText, hasProjectReplication
85
                    While ((NOT rsQry.BOF) AND (NOT rsQry.EOF))
61
                    While ((NOT rsQry.BOF) AND (NOT rsQry.EOF))
86
                        %><tr class="body_rowg2"><%
62
                        %><tr class="body_rowg2"><%
87
 
63
 
88
                        Dim enabledControl
64
                        Dim enabledControl
89
                        enabledControl = "<input type='checkbox' disabled "& IIF(rsQry("ENABLED") =  "Y", "checked","")  &" >"
65
                        enabledControl = "<input type='checkbox' disabled "& IIF(rsQry("ENABLED") =  "Y", "checked","")  &" >"
Line 101... Line 77...
101
                                    showWarn = true
77
                                    showWarn = true
102
                                Else
78
                                Else
103
                                    replicationMode = "Normal"
79
                                    replicationMode = "Normal"
104
                                    showWarn = false
80
                                    showWarn = false
105
                                End If
81
                                End If
-
 
82
                                hasProjectReplication = false
106
                            %>
83
                            %>
107
                                <td class="body_row" nowrap><a href=admin_blat_machines.asp?server_id=<%=rsQry("blat_id")%>><%=rsQry("blat_display_name")%></a></td>
84
                                <td class="body_row" nowrap><a href=admin_blat_machines.asp?server_id=<%=rsQry("blat_id")%>><%=rsQry("blat_display_name")%></a></td>
108
                                <td><%=enabledControl%></td>
85
                                <td><%=enabledControl%></td>
109
                                <td class="body_row" nowrap colspan=3><%=replicationMode%></td>
86
                                <td class="body_row" nowrap colspan=3><%=replicationMode%></td>
110
                            <%
87
                            <%
Line 115... Line 92...
115
                                <td><%=enabledControl%></td>
92
                                <td><%=enabledControl%></td>
116
                                <td class="body_row" nowrap colspan=3>Full Archive Replication</td>
93
                                <td class="body_row" nowrap colspan=3>Full Archive Replication</td>
117
                            <%
94
                            <%
118
 
95
 
119
                            ' Project Entry
96
                            ' Project Entry
120
                            Case 2%>
97
                            Case 2
-
 
98
                                hasProjectReplication = true
-
 
99
                                %>
121
                                <td></td>
100
                                <td></td>
122
                                <td><%=enabledControl%></td>
101
                                <td><%=enabledControl%></td>
123
                                <td class="body_row" nowrap>Project
102
                                <td class="body_row" nowrap>Project
124
                                    <%If showWarn Then%>
103
                                    <%If showWarn Then%>
125
                                        <img src='images/s_warning.gif' width='14' height='13' border='0' title='<%=showWarnText%>' style='vertical-align: bottom;'>
104
                                        <img src='images/s_warning.gif' width='14' height='13' border='0' title='<%=showWarnText%>' style='vertical-align: bottom;'>
Line 142... Line 121...
142
                                        <img src='images/s_warning.gif' width='14' height='13' border='0' title='<%=showWarnText%>' style='vertical-align: bottom;'>
121
                                        <img src='images/s_warning.gif' width='14' height='13' border='0' title='<%=showWarnText%>' style='vertical-align: bottom;'>
143
                                    <%End If%>    
122
                                    <%End If%>    
144
                                    <%If noReplicaTxt <> "" Then%>
123
                                    <%If noReplicaTxt <> "" Then%>
145
                                        <img src='images/s_warning.gif' width='14' height='13' border='0' title='<%=noReplicaTxt%>' style='vertical-align: bottom;'>
124
                                        <img src='images/s_warning.gif' width='14' height='13' border='0' title='<%=noReplicaTxt%>' style='vertical-align: bottom;'>
146
                                    <%End If%>
125
                                    <%End If%>
-
 
126
                                    <%If hasProjectReplication Then%>
-
 
127
                                        <img src='images/s_warning.gif' width='14' height='13' border='0' title='Covered by Project Replication' style='vertical-align: bottom;'>
-
 
128
                                    <%End If%>
147
                                </td>
129
                                </td>
148
                                <td class="body_row" nowrap><a href=form_project_replication.asp?proj_id=<%=rsQry("PROJ_ID")%>><%=rsQry("PROJ_NAME")%></a></td>
130
                                <td class="body_row" nowrap><a href=form_project_replication.asp?proj_id=<%=rsQry("PROJ_ID")%>><%=rsQry("PROJ_NAME")%></a></td>
149
                                <td class="body_row" nowrap><%=ReleaseIcon(rsQry("OFFICIAL"))%>
131
                                <td class="body_row" nowrap><%=ReleaseIcon(rsQry("OFFICIAL"))%>
150
                                <a href=form_release_replication.asp?rtag_id=<%=rsQry("RTAG_ID")%>><%=rsQry("RTAG_NAME")%></a></td>
132
                                <a href=form_release_replication.asp?rtag_id=<%=rsQry("RTAG_ID")%>><%=rsQry("RTAG_NAME")%></a></td>
151
                            <%
133
                            <%