Subversion Repositories DevTools

Rev

Rev 13 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 13 Rev 17
Line 43... Line 43...
43
	<a href="rep_unit_tests_per_package.asp?repnum=<%=repNum%>&group=<%=SSgroup%>" class="txt_linked">more...</a><br><br><hr size="1" noshade color="#DAD7C8">
43
	<a href="rep_unit_tests_per_package.asp?repnum=<%=repNum%>&group=<%=SSgroup%>" class="txt_linked">more...</a><br><br><hr size="1" noshade color="#DAD7C8">
44
	<strong>All Packages With out-of-sync Dependencies</strong><br>
44
	<strong>All Packages With out-of-sync Dependencies</strong><br>
45
	List of all packages with dependencies out-of-sync with the release environment.<br> 
45
	List of all packages with dependencies out-of-sync with the release environment.<br> 
46
	In escence, these are the packages which has versions in "latest" column of their dependencies.<br>
46
	In escence, these are the packages which has versions in "latest" column of their dependencies.<br>
47
	Not available yet.<br><br><hr size="1" noshade color="#DAD7C8">
47
	Not available yet.<br><br><hr size="1" noshade color="#DAD7C8">
48
	<%Case "Release_History"%>
48
	<%Case "Bom_History"%>
49
	<%repNum = 9%>
49
	<%repNum = 9%>
50
	<strong>Build History</strong><br>
50
	<strong>BOM History Tracker</strong><br>
51
	Use this report to find which packages have been officially released within specified date range.<br>
51
	Use this report to find what changes occured in a BOM within specified date range.<br>
52
	<a href="rep_bill_of_materials.asp?repnum=<%=repNum%>&group=<%=SSgroup%>" class="txt_linked">more...</a><br><br><hr size="1" noshade color="#DAD7C8">
52
	<a href="rep_bill_of_materials.asp?repnum=<%=repNum%>&group=<%=SSgroup%>" class="txt_linked">more...</a><br><br><hr size="1" noshade color="#DAD7C8">
53
	<%Case "Admin_Reports"%>
53
	<%Case "Admin_Reports"%>
54
	<strong>All Packages by Project by Version Tree by Release</strong><br>
54
	<strong>All Packages by Project by Version Tree by Release</strong><br>
55
	CSV output of all packages used in Release Manager per Project.<br>
55
	CSV output of all packages used in Release Manager per Project.<br>
56
	<a href="rep_all_packages_by_project_by_vtree_by_release.asp" target="_blank" class="txt_linked">more...</a><br><br><hr size="1" noshade color="#DAD7C8">
56
	<a href="rep_all_packages_by_project_by_vtree_by_release.asp" target="_blank" class="txt_linked">more...</a><br><br><hr size="1" noshade color="#DAD7C8">
Line 174... Line 174...
174
'-------------------------------------------------------------------------------------------------------------------------------------------------------------------
174
'-------------------------------------------------------------------------------------------------------------------------------------------------------------------
175
Sub Get_SBOM_Version ( NNproj_id, NNrtag_id, BBallow_all, NNversion )
175
Sub Get_SBOM_Version ( NNproj_id, NNrtag_id, BBallow_all, NNversion )
176
	Dim rsTemp, Query_String
176
	Dim rsTemp, Query_String
177
	
177
	
178
	Query_String = _
178
	Query_String = _
179
	"SELECT BOM_ID, BRANCH_ID, BOM_VERSION ||'.'||BOM_LIFECYCLE AS VERSION FROM BOMS WHERE BRANCH_ID ="&NNrtag_id&" ORDER BY VERSION"
179
	"SELECT B.BOM_ID, B.BRANCH_ID, B.BOM_VERSION ||'.'||B.BOM_LIFECYCLE AS VERSION, BN.BOM_NAME FROM BOMS B, BOM_NAMES BN WHERE B.BRANCH_ID ="&NNrtag_id&" AND BN.BOM_NAME_ID = B.BOM_NAME_ID ORDER BY VERSION"
180
 
180
 
181
	
181
	
182
	Set rsTemp = OraDatabase.DbCreateDynaset( Query_String, cint(0))
182
	Set rsTemp = OraDatabase.DbCreateDynaset( Query_String, cint(0))
183
	
183
	
184
 
184
 
Line 190... Line 190...
190
	End If
190
	End If
191
 
191
 
192
		If NNrtag_id <> -1 Then
192
		If NNrtag_id <> -1 Then
193
			While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))
193
			While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))
194
				If CStr(NNversion) = CStr(rsTemp.Fields("version")) Then
194
				If CStr(NNversion) = CStr(rsTemp.Fields("version")) Then
195
		        	Response.write "<option value='"& rsTemp.Fields("version") &"' selected>"& (rsTemp.Fields("version")) &"</option>"
195
		        	Response.write "<option value='"& rsTemp.Fields("version") &"' selected>"& rsTemp("BOM_NAME") &" "& (rsTemp.Fields("version")) &"</option>"
196
		        Else
196
		        Else
197
					Response.write "<option value='"& rsTemp.Fields("version") &"'>"& (rsTemp.Fields("version")) &"</option>"
197
					Response.write "<option value='"& rsTemp.Fields("version") &"'>"& rsTemp("BOM_NAME") &" "& (rsTemp.Fields("version")) &"</option>"
198
				End If
198
				End If
199
				rsTemp.MoveNext
199
				rsTemp.MoveNext
200
			WEnd
200
			WEnd
201
		End If
201
		End If
202
	Response.write "</select>"
202
	Response.write "</select>"
Line 1397... Line 1397...
1397
	If NNproj_id = "" Then NNproj_id = -1
1397
	If NNproj_id = "" Then NNproj_id = -1
1398
	If NNrtag_id = "" Then NNrtag_id = -1
1398
	If NNrtag_id = "" Then NNrtag_id = -1
1399
	If NNversion = "" Then NNversion = -1
1399
	If NNversion = "" Then NNversion = -1
1400
	
1400
	
1401
	If SSsection = "TITLE" Then
1401
	If SSsection = "TITLE" Then
1402
		Response.write "Software Bill Of Materials (SBOM) products"
1402
		Response.write "BOM - History Track"
1403
		Exit Sub
1403
		Exit Sub
1404
	End If
1404
	End If
1405
	
1405
	
1406
	
1406
	
1407
	If SSsection = "FORM" Then
1407
	If SSsection = "FORM" Then
1408
	%>
1408
	%>
1409
	<script language="JavaScript" src="images/calendar.js"></script>	
1409
	<script language="JavaScript" src="images/calendar.js"></script>	
1410
	<table width="100%" border="0" cellpadding="2" cellspacing="1">
1410
	<table width="100%" border="0" cellpadding="2" cellspacing="1">
1411
	  <form action="<%=SCRIPT_NAME%>" method="post" name="repform" onSubmit="MM_validateForm('FRproj_id','Project','R','FRvtree_id','Version Tree','R','FRrtag_id','Release','R');return document.MM_returnValue">
1411
	  <form action="" method="post" name="repform" onSubmit="MM_validateForm('FRproj_id','Project','R','FRvtree_id','Version Tree','R','FRrtag_id','Release','R');return document.MM_returnValue">
1412
      <tr> 
1412
      <tr> 
1413
        <td width="1%" nowrap class="form_field"><img src="images/spacer.gif" width="30" height="8"></td>
1413
        <td width="1%" nowrap class="form_field"><img src="images/spacer.gif" width="30" height="8"></td>
1414
        <td width="1%" align="right" nowrap class="form_field">Project</td>
1414
        <td width="1%" align="right" nowrap class="form_field">Project</td>
1415
        <td width="100%"><%Call Get_Projects( NNproj_id, Disallow_All )%></td>
1415
        <td width="100%"><%Call Get_Projects( NNproj_id, Disallow_All )%></td>
1416
      </tr>
1416
      </tr>
Line 1437... Line 1437...
1437
        <td align="right" nowrap class="form_field">&nbsp;</td>
1437
        <td align="right" nowrap class="form_field">&nbsp;</td>
1438
        <td><br>
1438
        <td><br>
1439
			<input type="hidden" name="group" value="<%=parGroup%>">
1439
			<input type="hidden" name="group" value="<%=parGroup%>">
1440
			<input type="hidden" name="repnum" value="<%=parRepNum%>">
1440
			<input type="hidden" name="repnum" value="<%=parRepNum%>">
1441
			<input type="hidden" name="FRrtag_id" value="<%=NNrtag_id%>">
1441
			<input type="hidden" name="FRrtag_id" value="<%=NNrtag_id%>">
-
 
1442
			
1442
			<input type="hidden" name="action" value="true">
1443
			<input type="hidden" name="action" value="true">
1443
		<input name="Submit" type="submit" class="form_btn" value="Submit"> 
1444
		<input name="Submit" type="submit" class="form_btn" value="Submit"> 
1444
        </td>
1445
        </td>
1445
      </tr>
1446
      </tr>
1446
	  </form>
1447
	  </form>
Line 1461... Line 1462...
1461
	
1462
	
1462
	
1463
	
1463
	If SSsection = "BODY" Then
1464
	If SSsection = "BODY" Then
1464
		If NOT CBool(Request("action")) Then Exit Sub
1465
		If NOT CBool(Request("action")) Then Exit Sub
1465
		
1466
		
1466
		Query_String = ReadFile( rootPath & "queries\AllProducts.sql" )
1467
		'Query_String = ReadFile( rootPath & "queries\AllProducts.sql" )
1467
		
1468
		
1468
		OraDatabase.Parameters.Add "BOM_ID", bomId, ORAPARM_INPUT, ORATYPE_NUMBER
1469
		'OraDatabase.Parameters.Add "BOM_ID", bomId, ORAPARM_INPUT, ORATYPE_NUMBER
1469
	%>
1470
	%>
1470
	</p>
1471
	</p>
1471
	<table width="20%" border="0" cellspacing="0" cellpadding="2">
1472
	<table width="20%" border="0" cellspacing="0" cellpadding="2">
-
 
1473
                <tr>
-
 
1474
				  <td width="1%" background="images/bg_bage_0.gif" class="body_col" nowrap>Trail</td>
-
 
1475
                  <td width="1%" background="images/bg_bage_0.gif" class="body_col" nowrap>Date</td>
-
 
1476
                  <td width="40%" background="images/bg_bage_0.gif" class="body_col" nowrap>Action</td>
-
 
1477
				  <td width="1%" background="images/bg_bage_0.gif" class="body_col" nowrap>User</td>
-
 
1478
                </tr>
1472
      <tr>
1479
      <tr>
1473
        <td width="5%" nowrap class="body_colb">Product</td>
-
 
1474
        <td width="95%" nowrap class="body_colb">Version</td>
-
 
1475
      </tr>
-
 
1476
      <tr>
-
 
1477
        <td colspan="2" background="images/bg_rep_line.gif"><img src="images/spacer.gif" width="1" height="1"></td>
1480
        <td colspan="4" background="images/bg_rep_line.gif"><img src="images/spacer.gif" width="1" height="1"></td>
1478
      </tr>
1481
      </tr>
1479
      <%
1482
      <%
1480
	  Dim currView_id
1483
	 
1481
	  currView_id = -1
-
 
1482
	  Set rsRep = OraDatabaseDM.DbCreateDynaset( Query_String, 0 )
1484
	  Set rsRep = OraDatabase.DbCreateDynaset( "SELECT * FROM BOM_TRAIL BT, USERS U WHERE BT.BOM_ID ="& bomId &" AND U.USER_ID = BT.USER_ID AND BT.DATE_TIME_STAMP >= TO_DATE('"& Request.Form("FRinitdate") &"','DD/MM/YYYY') AND BT.DATE_TIME_STAMP < TO_DATE('"& Request.Form("FRduedate") &"','DD/MM/YYYY')+1 ORDER BY BT.DATE_TIME_STAMP DESC", 0 )
-
 
1485
	
1483
	  
1486
	
1484
	  If rsRep.RecordCount = 0 Then
1487
	  If rsRep.RecordCount = 0 Then
1485
	  	With Response
1488
	  	With Response
1486
			.write "<tr>"
1489
			.write "<tr>"
-
 
1490
			
-
 
1491
			
1487
			.write "<td colspan='5' class='body_row'>Found 0 records</td>"
1492
			.write "<td colspan='5' class='body_row'>Found 0 bom trail records</td>"
1488
			.write "</tr>"
1493
			.write "</tr>"
1489
		End With
1494
		End With
1490
	  End If
1495
	  Else
1491
	  
1496
	  %>
-
 
1497
	        <tr>
-
 
1498
        <td colspan="4" background="images/bg_rep_line.gif"><img src="images/spacer.gif" width="1" height="1"></td>
-
 
1499
      </tr>
-
 
1500
      <tr>
-
 
1501
        <td nowrap class="body_scol">Bom</td>
-
 
1502
		<td nowrap class="body_scol"></td>	  
-
 
1503
        <td nowrap class="body_scol"></td>
-
 
1504
        <td nowrap class="body_scol"></td>
-
 
1505
      </tr>
-
 
1506
	  <%
1492
	  While ((NOT rsRep.BOF) AND (NOT rsRep.EOF))
1507
	  While ((NOT rsRep.BOF) AND (NOT rsRep.EOF))
1493
		  ' -------- GROUP BY BASE VIEW  -----------------
-
 
1494
		  If CDbl(currView_id) <> CDbl(rsRep("prod_id")) Then
-
 
1495
		  %>
1508
		  %>
1496
      <tr>
1509
      <tr>
-
 
1510
 		<td nowrap class="body_scol"></td>
1497
        <td colspan="2" background="images/bg_rep_line.gif"><img src="images/spacer.gif" width="1" height="1"></td>
1511
        <td nowrap class="body_row"><%=rsRep("date_time_stamp")%></td>
-
 
1512
        <td nowrap class="body_row"><%=rsRep("trail_action")%></td>
-
 
1513
		<td nowrap class="body_row"><%=rsRep("full_name")%></td>
1498
      </tr>
1514
      </tr>
-
 
1515
      <%  rsRep.MoveNext
-
 
1516
	  WEnd
-
 
1517
	  End If
-
 
1518
	  %>
1499
      <tr>
1519
      <tr>
1500
        <td class="body_scol"></td>
-
 
1501
        <td class="body_scol"></td>
1520
        <td colspan="4" background="images/bg_rep_line.gif"><img src="images/spacer.gif" width="1" height="1"></td>
1502
      </tr>
1521
      </tr>
1503
      <%
1522
      <%
-
 
1523
	 
1504
		  	currView_id = CDbl(rsRep("prod_id"))
1524
	  Set rsRep = OraDatabase.DbCreateDynaset( "SELECT * FROM BOM_CONTENTS BC, NODE_TRAIL NT, USERS U WHERE BC.BOM_ID ="& bomId &" AND NT.NODE_ID = BC.NODE_ID AND U.USER_ID = NT.USER_ID AND NT.DATE_TIME_STAMP >= TO_DATE('"& Request.Form("FRinitdate") &"','DD/MM/YYYY') AND NT.DATE_TIME_STAMP < TO_DATE('"& Request.Form("FRduedate") &"','DD/MM/YYYY')+1 ORDER BY NT.DATE_TIME_STAMP DESC", 0 )
-
 
1525
	
-
 
1526
	
-
 
1527
	  If rsRep.RecordCount = 0 Then
-
 
1528
	  	With Response
-
 
1529
			.write "<tr>"
-
 
1530
			
-
 
1531
			
-
 
1532
			.write "<td colspan='5' class='body_row'>Found 0 node trail records</td>"
-
 
1533
			.write "</tr>"
1505
		  End If
1534
		End With
-
 
1535
	  Else	
-
 
1536
	  %>
-
 
1537
 
-
 
1538
      <tr>
-
 
1539
        <td nowrap class="body_scol">Node</td>
-
 
1540
		<td nowrap class="body_scol"></td>	  
-
 
1541
        <td nowrap class="body_scol"></td>
-
 
1542
        <td nowrap class="body_scol"></td>
-
 
1543
      </tr>
-
 
1544
	  <%
1506
		  ' -------- END GROUP ------------------------
1545
	  While ((NOT rsRep.BOF) AND (NOT rsRep.EOF))
1507
		  %>
1546
		  %>
1508
      <tr>
1547
      <tr>
-
 
1548
 		<td nowrap class="body_scol"></td>
1509
        <td nowrap class="body_row"><%=rsRep("pkg_name")%></td>
1549
        <td nowrap class="body_row"><%=rsRep("date_time_stamp")%></td>
1510
        <td nowrap class="body_row"><%=rsRep("pkg_version")%></td>
1550
        <td nowrap class="body_row"><%=rsRep("trail_action")%></td>
-
 
1551
		<td nowrap class="body_row"><%=rsRep("full_name")%></td>
1511
      </tr>
1552
      </tr>
1512
      <%  rsRep.MoveNext
1553
      <%  rsRep.MoveNext
1513
	  WEnd
1554
	  WEnd
-
 
1555
	  End If
-
 
1556
	  %>	
-
 
1557
      <tr>
-
 
1558
        <td colspan="4" background="images/bg_rep_line.gif"><img src="images/spacer.gif" width="1" height="1"></td>
-
 
1559
      </tr>	  
-
 
1560
      <%
-
 
1561
	 
-
 
1562
	  Set rsRep = OraDatabase.DbCreateDynaset( "SELECT * FROM BOM_CONTENTS BC, OPERATING_SYSTEMS OS, OS_TRAIL OT, USERS U WHERE BC.NODE_ID = OS.NODE_ID AND OS.OS_ID = OT.OS_ID AND BC.BOM_ID ="& bomId &" AND U.USER_ID = OT.USER_ID AND OT.DATE_TIME_STAMP >= TO_DATE('"& Request.Form("FRinitdate") &"','DD/MM/YYYY') AND OT.DATE_TIME_STAMP < TO_DATE('"& Request.Form("FRduedate") &"','DD/MM/YYYY')+1 ORDER BY OT.DATE_TIME_STAMP DESC", 0 )
-
 
1563
	
-
 
1564
	
-
 
1565
	  If rsRep.RecordCount = 0 Then
-
 
1566
	  	With Response
-
 
1567
			.write "<tr>"
-
 
1568
			
-
 
1569
			
-
 
1570
			.write "<td colspan='5' class='body_row'>Found 0 operating systems trail records</td>"
-
 
1571
			.write "</tr>"
-
 
1572
		End With
-
 
1573
	  Else
1514
	  %>
1574
	  %>
-
 
1575
	        <tr>
-
 
1576
        <td colspan="4" background="images/bg_rep_line.gif"><img src="images/spacer.gif" width="1" height="1"></td>
-
 
1577
      </tr>
1515
      <tr>
1578
      <tr>
1516
        <td colspan="2" background="images/bg_rep_line.gif"><img src="images/spacer.gif" width="1" height="1"></td>
1579
        <td nowrap class="body_scol">Operating System</td>
-
 
1580
		<td nowrap class="body_scol"></td>	  
-
 
1581
        <td nowrap class="body_scol"></td>
-
 
1582
        <td nowrap class="body_scol"></td>
1517
      </tr>
1583
      </tr>
-
 
1584
	  <%
-
 
1585
	  While ((NOT rsRep.BOF) AND (NOT rsRep.EOF))
-
 
1586
		  %>
-
 
1587
      <tr>
-
 
1588
 		<td nowrap class="body_scol"></td>
-
 
1589
        <td nowrap class="body_row"><%=rsRep("date_time_stamp")%></td>
-
 
1590
        <td nowrap class="body_row"><%=rsRep("trail_action")%></td>
-
 
1591
		<td nowrap class="body_row"><%=rsRep("full_name")%></td>
-
 
1592
      </tr>
-
 
1593
      <%  rsRep.MoveNext
-
 
1594
	  WEnd
-
 
1595
	  End If
-
 
1596
	  %>	 
-
 
1597
      <tr>
-
 
1598
        <td colspan="4" background="images/bg_rep_line.gif"><img src="images/spacer.gif" width="1" height="1"></td>
-
 
1599
      </tr>	     
1518
    </table>
1600
    </table>
1519
	<p>&nbsp;	  </p>
1601
	<p>&nbsp;	  </p>
1520
	<p>        <!-- PRINT, SAVE, ETC. ------------>
1602
	<p>        <!-- PRINT, SAVE, ETC. ------------>
1521
      <%If parPrint = "" Then%>
1603
      <%If parPrint = "" Then%>
1522
      <br>
1604
      <br>