Subversion Repositories DevTools

Rev

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

Rev 6190 Rev 6191
Line 27... Line 27...
27
'------------ ACCESS CONTROL ------------------
27
'------------ ACCESS CONTROL ------------------
28
%>
28
%>
29
<!--#include file="_access_control_login.asp"-->
29
<!--#include file="_access_control_login.asp"-->
30
<!--#include file="_access_control_general.asp"-->
30
<!--#include file="_access_control_general.asp"-->
31
<SCRIPT LANGUAGE="VBScript" RUNAT=SERVER SRC="class/classaspJSON.vbs"></SCRIPT>
31
<SCRIPT LANGUAGE="VBScript" RUNAT=SERVER SRC="class/classaspJSON.vbs"></SCRIPT>
32
<SCRIPT LANGUAGE="VBScript" RUNAT=SERVER SRC="common/base64encode.vbs"></SCRIPT> 
32
<SCRIPT LANGUAGE="VBScript" RUNAT=SERVER SRC="common/base64encode.vbs"></SCRIPT>
33
<SCRIPT LANGUAGE="VBScript" RUNAT=SERVER SRC="common/jiraIssues.vbs"></SCRIPT> 
33
<SCRIPT LANGUAGE="VBScript" RUNAT=SERVER SRC="common/jiraIssues.vbs"></SCRIPT>
34
<%
34
<%
35
'------------ Variable Definition -------------
35
'------------ Variable Definition -------------
36
Dim rsQry
36
Dim rsQry
37
Dim objRelCollectorA
37
Dim objRelCollectorA
38
Dim objRelCollectorB
38
Dim objRelCollectorB
Line 106... Line 106...
106
    NewTextFile.WriteLine("<script language=""JavaScript"" type=""text/javascript"">")
106
    NewTextFile.WriteLine("<script language=""JavaScript"" type=""text/javascript"">")
107
    NewTextFile.WriteLine("function MM_findObj(n, d) { //v4.0")
107
    NewTextFile.WriteLine("function MM_findObj(n, d) { //v4.0")
108
    NewTextFile.WriteLine("  var p,i,x;")
108
    NewTextFile.WriteLine("  var p,i,x;")
109
    NewTextFile.WriteLine("  if(!d) d=document; ")
109
    NewTextFile.WriteLine("  if(!d) d=document; ")
110
    NewTextFile.WriteLine("  if((p=n.indexOf(""?""))>0&&parent.frames.length) {")
110
    NewTextFile.WriteLine("  if((p=n.indexOf(""?""))>0&&parent.frames.length) {")
111
    NewTextFile.WriteLine("  	d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);")
111
    NewTextFile.WriteLine("    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);")
112
    NewTextFile.WriteLine("  }")
112
    NewTextFile.WriteLine("  }")
113
    NewTextFile.WriteLine("  if(!(x=d[n])&&d.all) x=d.all[n]; ")
113
    NewTextFile.WriteLine("  if(!(x=d[n])&&d.all) x=d.all[n]; ")
114
    NewTextFile.WriteLine("  for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];")
114
    NewTextFile.WriteLine("  for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];")
115
    NewTextFile.WriteLine("  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);")
115
    NewTextFile.WriteLine("  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);")
116
    NewTextFile.WriteLine("  if(!x && document.getElementById) x=document.getElementById(n); ")
116
    NewTextFile.WriteLine("  if(!x && document.getElementById) x=document.getElementById(n); ")
Line 189... Line 189...
189
            NewTextFile.WriteLine("</tr>")
189
            NewTextFile.WriteLine("</tr>")
190
 
190
 
191
            sqlstrA.MoveNext
191
            sqlstrA.MoveNext
192
        Next
192
        Next
193
        sqlstrA.Close()
193
        sqlstrA.Close()
194
        NewTextFile.WriteLine( "                        </table></blockquote></blockquote></blockquote> 		")
194
        NewTextFile.WriteLine( "                        </table></blockquote></blockquote></blockquote>")
195
    End If
195
    End If
196
    
196
 
197
    ' Must also handle Jira Issues
197
    ' Must also handle Jira Issues
198
    On Error Resume Next
198
    On Error Resume Next
199
 
199
 
200
    Dim issueInfo, el, key
200
    Dim issueInfo, el, key
201
    Set issueInfo = CreateObject( "Scripting.Dictionary" )
201
    Set issueInfo = CreateObject( "Scripting.Dictionary" )
Line 225... Line 225...
225
            NewTextFile.WriteLine("<td class='form_item'>"&el.item("priority")&"</td>")
225
            NewTextFile.WriteLine("<td class='form_item'>"&el.item("priority")&"</td>")
226
            NewTextFile.WriteLine("<td class='form_item'>"&el.item("status")&"</td>")
226
            NewTextFile.WriteLine("<td class='form_item'>"&el.item("status")&"</td>")
227
            NewTextFile.WriteLine("<td class='form_item'>"&el.item("resolution")&"</td>")
227
            NewTextFile.WriteLine("<td class='form_item'>"&el.item("resolution")&"</td>")
228
            NewTextFile.WriteLine("</tr>")
228
            NewTextFile.WriteLine("</tr>")
229
        Next
229
        Next
230
        NewTextFile.WriteLine( "                        </table></blockquote></blockquote></blockquote> 		")
230
        NewTextFile.WriteLine( "                        </table></blockquote></blockquote></blockquote>")
231
    Set issueInfo = nothing
231
    Set issueInfo = nothing
232
    End If
232
    End If
233
End Sub
233
End Sub
234
'--------------------------------------------------------------------------------------------------------------------------
234
'--------------------------------------------------------------------------------------------------------------------------
235
Sub LastPvIdA(a)
235
Sub LastPvIdA(a)
Line 617... Line 617...
617
 
617
 
618
If Request("btn") = "Swap Compare" Then
618
If Request("btn") = "Swap Compare" Then
619
    Call OpenInWindow ( ScriptName &"?rtagA="& parRtagB &"&rtagB="& parRtagA )
619
    Call OpenInWindow ( ScriptName &"?rtagA="& parRtagB &"&rtagB="& parRtagA )
620
End If
620
End If
621
 
621
 
622
If Request("btn") = "Hide" Then
622
If Request("btn") = "Refresh" Then
623
    ' Store filter in cookie
623
    ' Store filter in cookie
624
    Response.Cookies(enum_RELMGR_COOKIE_DOMAIN)(COOKIE_HIDE_DIFF_FILTER) = Request("difilter")
624
    Response.Cookies(enum_RELMGR_COOKIE_DOMAIN)(COOKIE_HIDE_DIFF_FILTER) = Request("difilter")
625
End If
625
End If
626
 
626
 
627
Call GetDiffFilterValues ( dDiffFilter )
627
Call GetDiffFilterValues ( dDiffFilter )
Line 673... Line 673...
673
    xmlHttp_Get(xmlHttp, url);
673
    xmlHttp_Get(xmlHttp, url);
674
}
674
}
675
 
675
 
676
function SetDisplay(name, mode)
676
function SetDisplay(name, mode)
677
{
677
{
678
	var o;
678
    var o;
679
	if (o = MM_findObj(name))
679
    if (o = MM_findObj(name))
680
	{
680
    {
681
		o.style.display = mode;
681
        o.style.display = mode;
682
	}
682
    }
683
}
683
}
684
 
684
 
685
function MergePackage ( pkga, pkgb, rowId )
685
function MergePackage ( pkga, pkgb, rowId )
686
{
686
{
687
    // Set merge hidden field with new value
687
    // Set merge hidden field with new value
Line 815... Line 815...
815
        }
815
        }
816
    }
816
    }
817
}
817
}
818
//-->
818
//-->
819
</script>
819
</script>
-
 
820
<style>
-
 
821
#filterTable td { background-color:#E4E9EC }
-
 
822
}
-
 
823
</style>
820
</head>
824
</head>
821
<!-- HEADER -->
825
<!-- HEADER -->
822
<!--#include file="_header.asp"-->
826
<!--#include file="_header.asp"-->
823
<form name="FormName" method="post" action="<%=ScriptName%>">
827
<form name="FormName" method="post" action="<%=ScriptName%>">
824
    <!-- BODY ---->
828
    <!-- BODY ---->
Line 884... Line 888...
884
                    <%If (parRtagA <> "") Then%>
888
                    <%If (parRtagA <> "") Then%>
885
                        <tr>
889
                        <tr>
886
                            <td align="left"><a href="dependencies.asp?rtag_id=<%=parRtagA%>" class="body_txt_drk">Go To Release A &raquo;</a></td>
890
                            <td align="left"><a href="dependencies.asp?rtag_id=<%=parRtagA%>" class="body_txt_drk">Go To Release A &raquo;</a></td>
887
                        </tr>
891
                        </tr>
888
                    <%End If%>
892
                    <%End If%>
-
 
893
                                            <tr class="body_txt">
-
 
894
                                                <td>
-
 
895
                                                    <%If (parRtagA <> "") AND (parRtagB <> "")Then%>
-
 
896
                                                        <!-- DIFF FILTER +++++++++++++++++++++++++++++++++++++++++++ -->
-
 
897
                                                        <fieldset style="width:200px;">
-
 
898
                                                            <legend class="body_txt"><%=GetIsDiffFilterInUseIcon() %>&nbsp;Filter&nbsp;Results...</legend>
-
 
899
                                                            <table width="100%"  border="0" cellspacing="2" cellpadding="0" id=filterTable class="body_txt">
-
 
900
                                                                <tr >
-
 
901
                                                                    <td>&nbsp;</td>
-
 
902
                                                                <td colspan=1>Hide the marked change types.</td>
-
 
903
                                                                </tr>
-
 
904
                                                                <tr>
-
 
905
                                                                    <td width="1"><input name="difilter" type="checkbox" value="<%=enumDB_NUM_DIFF_UPDATED%>" <%=GetIsDiffFilterChecked(enumDB_NUM_DIFF_UPDATED)%>></td>
-
 
906
                                                                    <td width="50" nowrap class="form_field"><%=LIMG_UPDATED%>Updated</td>
-
 
907
                                                                </tr>
-
 
908
                                                                <tr>
-
 
909
                                                                    <td><input type="checkbox" name="difilter" value="<%=enumDB_NUM_DIFF_WARN%>" <%=GetIsDiffFilterChecked(enumDB_NUM_DIFF_WARN)%>></td>
-
 
910
                                                                    <td nowrap class="form_field"><%=LIMG_UPDATED%>Updated with Warning</td>
-
 
911
                                                                </tr>
-
 
912
                                                                <tr>
-
 
913
                                                                    <td><input type="checkbox" name="difilter" value="<%=enumDB_NUM_DIFF_NEW%>" <%=GetIsDiffFilterChecked(enumDB_NUM_DIFF_NEW)%>></td>
-
 
914
                                                                    <td nowrap class="form_field"><%=LIMG_ADDED%>Added</td>
-
 
915
                                                                </tr>
-
 
916
                                                                <tr>
-
 
917
                                                                    <td><input type="checkbox" name="difilter" value="<%=enumDB_NUM_DIFF_REMOVED%>" <%=GetIsDiffFilterChecked(enumDB_NUM_DIFF_REMOVED)%>></td>
-
 
918
                                                                    <td nowrap class="form_field"><%=LIMG_REMOVED%>Removed</td>
-
 
919
                                                                </tr>
-
 
920
                                                                <tr>
-
 
921
                                                                    <td><input type="checkbox" name="difilter" value="<%=enumDB_NUM_DIFF_RIPPLE%>" <%=GetIsDiffFilterChecked(enumDB_NUM_DIFF_RIPPLE)%>></td>
-
 
922
                                                                    <td nowrap class="form_field"><%=LIMG_RIPPLED%>Rippled</td>
-
 
923
                                                                </tr>
-
 
924
                                                                <tr>
-
 
925
                                                                    <td><input type="checkbox" name="difilter" value="<%=enumDB_NUM_DIFF_NO_CHANGE%>" <%=GetIsDiffFilterChecked(enumDB_NUM_DIFF_NO_CHANGE)%>></td>
-
 
926
                                                                    <td nowrap class="form_field">Unchanged</td>
-
 
927
                                                                </tr>
-
 
928
                                                                <tr>
-
 
929
                                                                    <td><input type="checkbox" name="difilter" value="<%=enumDB_NUM_DIFF_PENDING%>" <%=GetIsDiffFilterChecked(enumDB_NUM_DIFF_PENDING)%>></td>
-
 
930
                                                                    <td nowrap class="form_field">Pending</td>
-
 
931
                                                                </tr>
-
 
932
                                                                <tr>
-
 
933
                                                                    <td>&nbsp;</td>
-
 
934
                                                                    <td><input name="btn" type="submit" class="form_btn" value="Refresh"></td>
-
 
935
                                                                </tr>
-
 
936
                                                            </table>
-
 
937
                                                        </fieldset>
-
 
938
                                                        <!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
-
 
939
                                                    <%End If%>
-
 
940
                                                </td>
-
 
941
                                                <td></td>
-
 
942
                                            </tr>
-
 
943
 
889
                </table>
944
                </table>
890
 
945
 
891
                <!-- SELECT RELEASE A END ---------------------------------------------->
946
                <!-- SELECT RELEASE A END ---------------------------------------------->
892
            </td>
947
            </td>
893
 
948
 
Line 931... Line 986...
931
                                                            <%
986
                                                            <%
932
                                                                Dim mergeMessage, mergeDisabled
987
                                                                Dim mergeMessage, mergeDisabled
933
                                                                mergeDisabled = " disabled"
988
                                                                mergeDisabled = " disabled"
934
                                                                If (parRtagA = "") Then
989
                                                                If (parRtagA = "") Then
935
                                                                    mergeMessage = "Select Release A"
990
                                                                    mergeMessage = "Select Release A"
936
                                                                ElseIf (parRtagB = "") Then  
991
                                                                ElseIf (parRtagB = "") Then
937
                                                                    mergeMessage = "Select Release B"
992
                                                                    mergeMessage = "Select Release B"
938
                                                                ElseIf NOT isMergable Then  
993
                                                                ElseIf NOT isMergable Then
939
                                                                    mergeMessage = "Release B cannot be modified"
994
                                                                    mergeMessage = "Release B cannot be modified"
940
                                                                Else
995
                                                                Else
941
                                                                    mergeDisabled = ""
996
                                                                    mergeDisabled = ""
942
                                                                End If
997
                                                                End If
943
                                                            %>
998
                                                            %>
Line 952... Line 1007...
952
                                                            </td>
1007
                                                            </td>
953
                                                        </tr>
1008
                                                        </tr>
954
                                                    </table>
1009
                                                    </table>
955
                                                </td>
1010
                                                </td>
956
                                            </tr>
1011
                                            </tr>
957
                                            <tr>
-
 
958
                                                <td>
-
 
959
                                                    <%If (parRtagA <> "") AND (parRtagB <> "")Then%>
-
 
960
                                                        <!-- DIFF FILTER +++++++++++++++++++++++++++++++++++++++++++ -->
-
 
961
                                                        <fieldset style="width:150px;">
-
 
962
                                                            <legend><a href="javascript:;" class="body_scol" onClick="ToggleDisplay('divDiffFilter');" ><%=GetIsDiffFilterInUseIcon() %>&nbsp;Filter&nbsp;Results...</a></legend>
-
 
963
                                                            <div name="divDiffFilter" id="divDiffFilter" class="body_txt" style="display:none;">
-
 
964
                                                                <br>
-
 
965
                                                                <table width="100%"  border="0" cellspacing="1" cellpadding="3">
-
 
966
                                                                    <tr>
-
 
967
                                                                        <td width="1" background="images/bg_action_norm.gif"><input name="difilter" type="checkbox" value="<%=enumDB_NUM_DIFF_UPDATED%>" <%=GetIsDiffFilterChecked(enumDB_NUM_DIFF_UPDATED)%>></td>
-
 
968
                                                                        <td width="50" nowrap background="images/bg_action_norm.gif" class="form_field"><%=LIMG_UPDATED%>Updated</td>
-
 
969
                                                                    </tr>
-
 
970
                                                                    <tr>
-
 
971
                                                                        <td background="images/bg_action_norm.gif"><input type="checkbox" name="difilter" value="<%=enumDB_NUM_DIFF_WARN%>" <%=GetIsDiffFilterChecked(enumDB_NUM_DIFF_WARN)%>></td>
-
 
972
                                                                        <td nowrap background="images/bg_action_norm.gif" class="form_field"><%=LIMG_UPDATED%>Updated with Warning</td>
-
 
973
                                                                    </tr>
-
 
974
                                                                    <tr>
-
 
975
                                                                        <td background="images/bg_action_norm.gif"><input type="checkbox" name="difilter" value="<%=enumDB_NUM_DIFF_NEW%>" <%=GetIsDiffFilterChecked(enumDB_NUM_DIFF_NEW)%>></td>
-
 
976
                                                                        <td nowrap background="images/bg_action_norm.gif" class="form_field"><%=LIMG_ADDED%>Added</td>
-
 
977
                                                                    </tr>
-
 
978
                                                                    <tr>
-
 
979
                                                                        <td background="images/bg_action_norm.gif"><input type="checkbox" name="difilter" value="<%=enumDB_NUM_DIFF_REMOVED%>" <%=GetIsDiffFilterChecked(enumDB_NUM_DIFF_REMOVED)%>></td>
-
 
980
                                                                        <td nowrap background="images/bg_action_norm.gif" class="form_field"><%=LIMG_REMOVED%>Removed</td>
-
 
981
                                                                    </tr>
-
 
982
                                                                    <tr>
-
 
983
                                                                        <td background="images/bg_action_norm.gif"><input type="checkbox" name="difilter" value="<%=enumDB_NUM_DIFF_RIPPLE%>" <%=GetIsDiffFilterChecked(enumDB_NUM_DIFF_RIPPLE)%>></td>
-
 
984
                                                                        <td nowrap background="images/bg_action_norm.gif" class="form_field"><%=LIMG_RIPPLED%>Rippled</td>
-
 
985
                                                                    </tr>
-
 
986
                                                                    <tr>
-
 
987
                                                                        <td background="images/bg_action_norm.gif"><input type="checkbox" name="difilter" value="<%=enumDB_NUM_DIFF_NO_CHANGE%>" <%=GetIsDiffFilterChecked(enumDB_NUM_DIFF_NO_CHANGE)%>></td>
-
 
988
                                                                        <td nowrap background="images/bg_action_norm.gif" class="form_field">Unchanged</td>
-
 
989
                                                                    </tr>
-
 
990
                                                                    <tr>
-
 
991
                                                                        <td background="images/bg_action_norm.gif"><input type="checkbox" name="difilter" value="<%=enumDB_NUM_DIFF_PENDING%>" <%=GetIsDiffFilterChecked(enumDB_NUM_DIFF_PENDING)%>></td>
-
 
992
                                                                        <td nowrap background="images/bg_action_norm.gif" class="form_field">Pending</td>
-
 
993
                                                                    </tr>
-
 
994
                                                                    <tr>
-
 
995
                                                                        <td background="images/bg_action_norm.gif">&nbsp;</td>
-
 
996
                                                                        <td background="images/bg_action_norm.gif"><input name="btn" type="submit" class="form_btn" value="Hide"></td>
-
 
997
                                                                    </tr>
-
 
998
                                                                </table>
-
 
999
                                                            </div>
-
 
1000
                                                        </fieldset>
-
 
1001
                                                        <!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
-
 
1002
                                                    <%End If%>
-
 
1003
                                                </td>
-
 
1004
                                                <td></td>
-
 
1005
                                            </tr>
-
 
1006
                                        </table>
1012
                                        </table>
1007
 
1013
 
1008
                                        <%
1014
                                        <%
1009
                                        ' Successfull Merge
1015
                                        ' Successfull Merge
1010
                                        If (Request("btn") = "Merge") Then
1016
                                        If (Request("btn") = "Merge") Then
Line 1167... Line 1173...
1167
                                                                Else
1173
                                                                Else
1168
                                                                    btnMerge = LIMG_MERGE
1174
                                                                    btnMerge = LIMG_MERGE
1169
                                                                End If
1175
                                                                End If
1170
                                                            End If
1176
                                                            End If
1171
                                                        End If
1177
                                                        End If
-
 
1178
 
-
 
1179
                                                        If btnMerge = LIMG_MERGE_WARN Then
-
 
1180
                                                            changeType = "UW"
-
 
1181
                                                        End If
1172
                                                    End If
1182
                                                    End If
1173
 
1183
 
1174
                                                    ' -------- END GROUP ------------------------
1184
                                                    ' -------- END GROUP ------------------------
1175
                                                    %>
1185
                                                    %>
1176
                                                    <%
1186
                                                    <%
Line 1257... Line 1267...
1257
                                                            If isaSdk Then pkgBDisplayControl = FALSE
1267
                                                            If isaSdk Then pkgBDisplayControl = FALSE
1258
                                                            %>
1268
                                                            %>
1259
                                                            <td bgcolor="#F5F5F5">
1269
                                                            <td bgcolor="#F5F5F5">
1260
                                                                <%If pkgBDisplayControl Then%>
1270
                                                                <%If pkgBDisplayControl Then%>
1261
                                                                    <DIV id="IMGREMOVE<%=rowId%>" ><a href="javascript:;" onClick="RemovePackage( '<%=rsQry("pv_id_a")%>', '<%=rsQry("pv_id_b")%>', '<%=rowId%>' );"><%=btnRemove%></a></DIV>
1271
                                                                    <DIV id="IMGREMOVE<%=rowId%>" ><a href="javascript:;" onClick="RemovePackage( '<%=rsQry("pv_id_a")%>', '<%=rsQry("pv_id_b")%>', '<%=rowId%>' );"><%=btnRemove%></a></DIV>
1262
                                                                <%ElseIf isaSdk Then %> 
1272
                                                                <%ElseIf isaSdk Then %>
1263
                                                                    <DIV ><%=LIMG_SDK%></DIV>
1273
                                                                    <DIV ><%=LIMG_SDK%></DIV>
1264
                                                                <%End If%>
1274
                                                                <%End If%>
1265
                                                            </td>
1275
                                                            </td>
1266
 
1276
 
1267
                                                            <td class="body_row" nowrap>
1277
                                                            <td class="body_row" nowrap>
1268
                                                                <DIV id="PVB<%=rowId%>" 
1278
                                                                <DIV id="PVB<%=rowId%>"
1269
                                                                     style="background:<%=colorB%>; padding:5px;" 
1279
                                                                     style="background:<%=colorB%>; padding:5px;"
1270
                                                                     data_color="<%=colorB%>"
1280
                                                                     data_color="<%=colorB%>"
1271
                                                                     data_pkg="<%=rsQry("pkg_name_b") &" "& rsQry("pkg_version_b")%>"
1281
                                                                     data_pkg="<%=rsQry("pkg_name_b") &" "& rsQry("pkg_version_b")%>"
1272
                                                                     >
1282
                                                                     >
1273
                                                                    <%=rsQry("pkg_name_b") &" "& rsQry("pkg_version_b")%>
1283
                                                                    <%=rsQry("pkg_name_b") &" "& rsQry("pkg_version_b")%>
1274
                                                                    <%If ChangeType = "APS" Then%>
1284
                                                                    <%If ChangeType = "APS" Then%>
Line 1591... Line 1601...
1591
%>
1601
%>
1592
<!-- FOOTER -->
1602
<!-- FOOTER -->
1593
<!--#include file="_footer.asp"-->
1603
<!--#include file="_footer.asp"-->
1594
</body>
1604
</body>
1595
</html>
1605
</html>
-
 
1606