Subversion Repositories DevTools

Rev

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

Rev 5930 Rev 6827
Line 591... Line 591...
591
'   rmDebug = rmDebug & ", GetEnvTab:" & GetEnvTab
591
'   rmDebug = rmDebug & ", GetEnvTab:" & GetEnvTab
592
End Function
592
End Function
593
'------------------------------------------------------------------------------------------------------------------------------------------------
593
'------------------------------------------------------------------------------------------------------------------------------------------------
594
Sub Display_Env_BaseView ( NNbase_view_id, SSbase_view, BBviewCollapsed, SScontents )
594
Sub Display_Env_BaseView ( NNbase_view_id, SSbase_view, BBviewCollapsed, SScontents )
595
%>
595
%>
596
<table width="100%"  border="0" cellspacing="0" cellpadding="0">
596
<table width="100%"  border="0" cellspacing="0" cellpadding="0" style="border-radius: 3px;border-style: solid;border-top-width: 3px;border-color: #dad7c8;">
597
   <tr>
597
   <tr>
598
      <td width="1" align="left" valign="top" bgcolor="#dad7c8"><img src="images/p_ctl.gif" width="3" height="3"></td>
-
 
599
      <td width="100%" bgcolor="#dad7c8"><img src="images/spacer.gif" width="1" height="1"></td>
-
 
600
      <td width="1" bgcolor="#dad7c8"><img src="images/spacer.gif" width="1" height="1"></td>
-
 
601
      <td width="1" align="right" valign="top" bgcolor="#dad7c8"><img src="images/p_ctr.gif" width="3" height="3"></td>
-
 
602
   </tr>
-
 
603
   <tr>
-
 
604
      <td align="left" valign="top" bgcolor="#dad7c8">&nbsp;</td>
598
      <td width="1" align="left" valign="top" bgcolor="#dad7c8">&nbsp;</td>
605
      <td bgcolor="#dad7c8"><SPAN id="SPANVIEW<%=NNbase_view_id%>" <%If BBviewCollapsed Then%>class="body_scol_thin"<%Else%>class="body_txt"<%End If%>>&nbsp;<b><%=SSbase_view%></b></SPAN></td>
599
      <td width="100%" bgcolor="#dad7c8"><SPAN id="SPANVIEW<%=NNbase_view_id%>" <%If BBviewCollapsed Then%>class="body_scol_thin"<%Else%>class="body_txt"<%End If%>>&nbsp;<b><%=SSbase_view%></b></SPAN></td>
606
      <td align="right" bgcolor="#dad7c8"><a href="javascript:;" title="Expand/Collapse View" onClick="RequestViewContent('<%=NNbase_view_id%>');"><img id="ENVIMG<%=NNbase_view_id%>" src="images/<%If BBviewCollapsed Then %>btn_max.gif<%Else%>btn_min.gif<%End If%>" border="0"></a></td>
600
      <td width="1" align="right" bgcolor="#dad7c8"><span title="Expand/Collapse View" onClick="RequestViewContent('<%=NNbase_view_id%>');"><img id="ENVIMG<%=NNbase_view_id%>" src="images/<%If BBviewCollapsed Then %>btn_max.gif<%Else%>btn_min.gif<%End If%>" border="0"></span></td>
607
      <td align="right" valign="top" bgcolor="#dad7c8">&nbsp;</td>
601
      <td width="1" align="right" valign="top" bgcolor="#dad7c8">&nbsp;</td>
608
   </tr>
602
   </tr>
609
</table>
603
</table>
610
<DIV id="ENVDIV<%=NNbase_view_id%>" class="envContent" <%If BBviewCollapsed Then %>style="display:none;"<%Else%>style="display:block;"<%End If%>>
604
<DIV id="ENVDIV<%=NNbase_view_id%>" class="envContent" <%If BBviewCollapsed Then %>style="display:none;"<%Else%>style="display:block;"<%End If%>>
611
   <%If NOT BBviewCollapsed Then %>
605
   <%If NOT BBviewCollapsed Then %>
612
      <%=SScontents%>
606
      <%=SScontents%>
Line 941... Line 935...
941
                     Response.write "<td width='1'><img src='images/abtn_add_pkg_off.gif' alt='Add package to this release' width='26' height='26' hspace='1' border='0'></td>"
935
                     Response.write "<td width='1'><img src='images/abtn_add_pkg_off.gif' alt='Add package to this release' width='26' height='26' hspace='1' border='0'></td>"
942
                  End If
936
                  End If
943
 
937
 
944
                  If (pkgInfoHash.Item("dlocked") <> "Y") AND (Request("pv_id") <> "") Then
938
                  If (pkgInfoHash.Item("dlocked") <> "Y") AND (Request("pv_id") <> "") Then
945
                     If  (objAccessControl.UserLogedIn) AND ( (objAccessControl.UserName = pkgInfoHash.Item("creator")) OR (canActionControlInProject("DestroyPackageFromRelease")) ) Then
939
                     If  (objAccessControl.UserLogedIn) AND ( (objAccessControl.UserName = pkgInfoHash.Item("creator")) OR (canActionControlInProject("DestroyPackageFromRelease")) ) Then
946
                        Response.write "<td width='1'><a href='javascript:;' title='Destroy the selected Package Version' onClick=""MM_openVixIFrame('_destroy_package.asp?rtag_id=" & Request("rtag_id") & "&bfile="&ScriptName & "&pkg_id=" & pkgInfoHash.Item("pkg_id") & "&pv_id=" & Request("pv_id") & "','Destroy Package Version');"">"
940
                        Response.write "<td width='1' title='Destroy the selected Package Version' onClick=""MM_openVixIFrame('_destroy_package.asp?rtag_id=" & Request("rtag_id") & "&bfile="&ScriptName & "&pkg_id=" & pkgInfoHash.Item("pkg_id") & "&pv_id=" & Request("pv_id") & "','Destroy Package Version');"">"
947
                        Response.Write "<img src='icons/i_destroy_package.gif' width='26' height='26' hspace='1' border='0'></td>"
941
                        Response.Write "<img src='icons/i_destroy_package.gif' width='26' height='26' hspace='1' border='0'></td>"
948
                     Else
942
                     Else
949
                        Response.write "<td width='1'><img title='Destroy the selected Package Version' src='icons/i_destroy_package_off.gif' width='26' height='26' hspace='1' border='0'></td>"
943
                        Response.write "<td width='1'><img title='Destroy the selected Package Version' src='icons/i_destroy_package_off.gif' width='26' height='26' hspace='1' border='0'></td>"
950
                     End If
944
                     End If
951
                  End If
945
                  End If
Line 976... Line 970...
976
                     Response.write "<td width='1'><a href='"& RefreshedURL("enable", parPview, Request("pv_id"), Request("rtag_id")) &"' title='Click to switch to Deployment View'><img src='icons/DeploymentView.gif'  width='25' height='25' hspace='1' border='0'></a></td>"
970
                     Response.write "<td width='1'><a href='"& RefreshedURL("enable", parPview, Request("pv_id"), Request("rtag_id")) &"' title='Click to switch to Deployment View'><img src='icons/DeploymentView.gif'  width='25' height='25' hspace='1' border='0'></a></td>"
977
                  End If
971
                  End If
978
 
972
 
979
                  Response.write "<td width='1'><img src='images/spacer.gif' width='7' height='25'></td>"
973
                  Response.write "<td width='1'><img src='images/spacer.gif' width='7' height='25'></td>"
980
 
974
 
981
                  Response.write "<td width='1'><a href='javascript:;' title='SDK Managment' onClick='ToggleDisplay(""DIV_RELEASE_SDK"",""SPAN_RELEASE_SDK"",""SPAN_RELEASE_SDK_ON""); ' ><SPAN name='SPAN_RELEASE_SDK' id='SPAN_RELEASE_SDK' style='display:block;'><img src='images/abtn_link_release.gif' width='25' height='25' border='0' hspace='1' ></SPAN><SPAN name='SPAN_RELEASE_SDK_ON' id='SPAN_RELEASE_SDK_ON' style='display:none;'><img src='images/abtn_link_release_on.gif' width='25' height='25' border='0' hspace='1' ></SPAN></a></td>"
975
                  Response.write "<td width='1' title='SDK Managment' onClick='ToggleDisplay(""DIV_RELEASE_SDK"",""SPAN_RELEASE_SDK"",""SPAN_RELEASE_SDK_ON""); ' ><SPAN name='SPAN_RELEASE_SDK' id='SPAN_RELEASE_SDK' style='display:block;'><img src='images/abtn_link_release.gif' width='25' height='25' border='0' hspace='1' ></SPAN><SPAN name='SPAN_RELEASE_SDK_ON' id='SPAN_RELEASE_SDK_ON' style='display:none;'><img src='images/abtn_link_release_on.gif' width='25' height='25' border='0' hspace='1' ></SPAN></td>"
982
 
976
 
983
                  Response.write "<td width='1'><img src='images/spacer.gif' width='7' height='25'></td>"
977
                  Response.write "<td width='1'><img src='images/spacer.gif' width='7' height='25'></td>"
984
 
978
 
985
                  Response.write "<td width='1'><a href='javascript:;' title='Advanced Search...' onClick='ToggleAdvancedSearch(); ' ><SPAN name='SPAN_ADVANCED_SEARCH' id='SPAN_ADVANCED_SEARCH' style='display:block;'><img src='images/abtn_advanced_search.gif' width='25' height='25' border='0' hspace='1' ></SPAN><SPAN name='SPAN_ADVANCED_SEARCH_ON' id='SPAN_ADVANCED_SEARCH_ON' style='display:none;'><img src='images/abtn_advanced_search_on.gif' width='25' height='25' border='0' hspace='1' ></SPAN></a></td>"
979
                  Response.write "<td width='1' title='Advanced Search...' onClick='ToggleAdvancedSearch(); ' ><SPAN name='SPAN_ADVANCED_SEARCH' id='SPAN_ADVANCED_SEARCH' style='display:block;'><img src='images/abtn_advanced_search.gif' width='25' height='25' border='0' hspace='1' ></SPAN><SPAN name='SPAN_ADVANCED_SEARCH_ON' id='SPAN_ADVANCED_SEARCH_ON' style='display:none;'><img src='images/abtn_advanced_search_on.gif' width='25' height='25' border='0' hspace='1' ></SPAN></td>"
986
 
980
 
987
                  If ( (parDview <> "enable") AND ( (CInt(nEnvTab) = enumENVTAB_PLANNED) OR (Request("envtab") = enumENVTAB_PLANNED) ) ) Then
981
                  If ( (parDview <> "enable") AND ( (CInt(nEnvTab) = enumENVTAB_PLANNED) OR (Request("envtab") = enumENVTAB_PLANNED) ) ) Then
988
                     If objAccessControl.UserLogedIn Then
982
                     If objAccessControl.UserLogedIn Then
989
                        If ( ReleaseMode = enumDB_RELEASE_IN_OPEN_MODE ) OR _
983
                        If ( ReleaseMode = enumDB_RELEASE_IN_OPEN_MODE ) OR _
990
                                canActionControlInProject("ApproveForAutoBuild") OR _
984
                                canActionControlInProject("ApproveForAutoBuild") OR _
Line 1024... Line 1018...
1024
 
1018
 
1025
                  %>
1019
                  %>
1026
                  <fieldset>
1020
                  <fieldset>
1027
                     <legend class="body_colb"><img src="images/i_mglass.gif" width="17" height="17" border="0" align="absmiddle">&nbsp;Advanced Search</legend>
1021
                     <legend class="body_colb"><img src="images/i_mglass.gif" width="17" height="17" border="0" align="absmiddle">&nbsp;Advanced Search</legend>
1028
                     <input name="searchtype" id="searchtype1" type="radio" value="1" <%=FindPackageCheck%>>
1022
                     <input name="searchtype" id="searchtype1" type="radio" value="1" <%=FindPackageCheck%>>
1029
                     <a href="javascript:;" onClick="MM_findObj('searchtype1').checked=true;" class="body_txt">Find a Package</a><br>
1023
                     <span onClick="MM_findObj('searchtype1').checked=true;" class="body_txt">Find a Package</span><br>
1030
                     <input name="searchtype" id="searchtype2" type="radio" value="2" <%=FindFileCheck%>>
1024
                     <input name="searchtype" id="searchtype2" type="radio" value="2" <%=FindFileCheck%>>
1031
                     <a href="javascript:;" onClick="MM_findObj('searchtype2').checked=true;" class="body_txt">Find a File</a><br><br>
1025
                     <span onClick="MM_findObj('searchtype2').checked=true;" class="body_txt">Find a File</span><br><br>
1032
                     <%If CInt(nEnvTab) = enumENVTAB_WORK_IN_PROGRESS Then%>
1026
                     <%If CInt(nEnvTab) = enumENVTAB_WORK_IN_PROGRESS Then%>
1033
                        Find in Work In Progress<br>
1027
                        Find in Work In Progress<br>
1034
                     <%ElseIf CInt(nEnvTab) = enumENVTAB_PLANNED Then%>
1028
                     <%ElseIf CInt(nEnvTab) = enumENVTAB_PLANNED Then%>
1035
                        Find in Pending<br>
1029
                        Find in Pending<br>
1036
                     <%ElseIf  CInt(nEnvTab) = enumENVTAB_RELEASED Then%>
1030
                     <%ElseIf  CInt(nEnvTab) = enumENVTAB_RELEASED Then%>
Line 1177... Line 1171...
1177
               <!-- BULK OPR CONTROLS ++++++++++++++++++++++ -->
1171
               <!-- BULK OPR CONTROLS ++++++++++++++++++++++ -->
1178
                <%Dim cb_selectall_display, cb_disabled
1172
                <%Dim cb_selectall_display, cb_disabled
1179
                  If nEnvTab <> 1 Then cb_selectall_display = " style=display:none"
1173
                  If nEnvTab <> 1 Then cb_selectall_display = " style=display:none"
1180
                  If NOT objAccessControl.UserLogedIn Then cb_disabled = " disabled"%>
1174
                  If NOT objAccessControl.UserLogedIn Then cb_disabled = " disabled"%>
1181
                <input id="cb_selectall" type="checkbox" title="Toggle all checkboxes" onclick="toggletick(this);"<%=cb_selectall_display%><%=cb_disabled%> style="position: relative;left: 5px;float: left;">
1175
                <input id="cb_selectall" type="checkbox" title="Toggle all checkboxes" onclick="toggletick(this);"<%=cb_selectall_display%><%=cb_disabled%> style="position: relative;left: 5px;float: left;">
1182
                <a href="javascript:;" title="Minimise/Restore all populated Views" onclick="toggleAllViews();"><img id="cb_minall" src="images/btn_min.gif" style="float: right;position: relative;left: -4;top: 3;"></a>
1176
                <span title="Minimise/Restore all populated Views" onclick="toggleAllViews();"><img id="cb_minall" src="images/btn_min.gif" style="float: right;position: relative;left: -4;top: 3;"></span>
1183
                <a href="javascript:;" title="Close Populated Views" onclick="closeAllViews();"><img src="images/btn_remove.gif" style="float: right;position: relative;left: -4;"></a>
1177
                <span title="Close Populated Views" onclick="closeAllViews();"><img src="images/btn_remove.gif" style="float: right;position: relative;left: -4;"></span>
1184
                <a href="javascript:;" title="Open and Populate all Views" onclick="openAllViews();"><img src="images/btn_expand.gif" style="float: right;position: relative;left: -4; top:2;"></a>
1178
                <span title="Open and Populate all Views" onclick="openAllViews();"><img src="images/btn_expand.gif" style="float: right;position: relative;left: -4; top:2;"></span>
1185
               <!-- END BULK OPR CONTROLS ++++++++++++++++++++++ -->
1179
               <!-- END BULK OPR CONTROLS ++++++++++++++++++++++ -->
1186
               <%
1180
               <%
1187
               Dim tempTimer
1181
               Dim tempTimer
1188
               tempTimer = Timer
1182
               tempTimer = Timer
1189
               %>
1183
               %>