Subversion Repositories DevTools

Rev

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

Rev 5514 Rev 5956
Line 352... Line 352...
352 
	  <%
 352 
	  <%
353 
	  Dim currRtag_id
 353 
	  Dim currRtag_id
354 
	  currRtag_id = -1
 354 
	  currRtag_id = -1
355 
	  Set rsRep = OraDatabase.DbCreateDynaset( Query_String, 0 )
 355 
	  Set rsRep = OraDatabase.DbCreateDynaset( Query_String, 0 )
356 
 
 356 
 
- 
 
 357 
	  OraDatabase.Parameters.Remove "PROJ_ID"
- 
 
 358 
	  OraDatabase.Parameters.Remove "RTAG_ID"
- 
 
 359 
 
357 
	  If rsRep.RecordCount = 0 Then
 360 
	  If rsRep.RecordCount = 0 Then
358 
	  	With Response
 361 
	  	With Response
359 
			.write "<tr>"
 362 
			.write "<tr>"
360 
			.write "<td colspan='4' class='body_row'>Found 0 records</td>"
 363 
			.write "<td colspan='4' class='body_row'>Found 0 records</td>"
361 
			.write "</tr>"
 364 
			.write "</tr>"
Line 497... Line 500...
497 
      </tr>
 500 
      </tr>
498 
	   <%
 501 
	   <%
499 
	  Dim currView_id
 502 
	  Dim currView_id
500 
	  currView_id = -1
 503 
	  currView_id = -1
501 
	  Set rsRep = OraDatabase.DbCreateDynaset( Query_String, 0 )
 504 
	  Set rsRep = OraDatabase.DbCreateDynaset( Query_String, 0 )
- 
 
 505 
	  OraDatabase.Parameters.Remove "RTAG_ID"
502 
 
 506 
 
503 
	  If rsRep.RecordCount = 0 Then
 507 
	  If rsRep.RecordCount = 0 Then
504 
	  	With Response
 508 
	  	With Response
505 
			.write "<tr>"
 509 
			.write "<tr>"
506 
			.write "<td colspan='8' class='body_row'>Found 0 records</td>"
 510 
			.write "<td colspan='8' class='body_row'>Found 0 records</td>"
Line 1130... Line 1134...
1130 
      </tr>
 1134 
      </tr>
1131 
	   <%
 1135 
	   <%
1132 
	  Dim currView_id
 1136 
	  Dim currView_id
1133 
	  currView_id = -1
 1137 
	  currView_id = -1
1134 
	  Set rsRep = OraDatabase.DbCreateDynaset( Query_String, 0 )
 1138 
	  Set rsRep = OraDatabase.DbCreateDynaset( Query_String, 0 )
- 
 
 1139 
	  OraDatabase.Parameters.Remove "RTAG_ID"
1135 
 
 1140 
 
1136 
	  If rsRep.RecordCount = 0 Then
 1141 
	  If rsRep.RecordCount = 0 Then
1137 
	  	With Response
 1142 
	  	With Response
1138 
			.write "<tr>"
 1143 
			.write "<tr>"
1139 
			.write "<td colspan='5' class='body_row'>Found 0 records</td>"
 1144 
			.write "<td colspan='5' class='body_row'>Found 0 records</td>"
Line 1272... Line 1277...
1272 
	  <tr>
 1277 
	  <tr>
1273 
        <td background="images/bg_rep_line.gif" colspan="3"><img src="images/spacer.gif" width="1" height="1"></td>
 1278 
        <td background="images/bg_rep_line.gif" colspan="3"><img src="images/spacer.gif" width="1" height="1"></td>
1274 
      </tr>
 1279 
      </tr>
1275 
	  <%
 1280 
	  <%
1276 
	  Set rsRep = OraDatabase.DbCreateDynaset( Query_String, 0 )
 1281 
	  Set rsRep = OraDatabase.DbCreateDynaset( Query_String, 0 )
- 
 
 1282 
	  OraDatabase.Parameters.Remove "RTAG_ID"
- 
 
 1283 
	  OraDatabase.Parameters.Remove "BASE_VIEW_ID"
- 
 
 1284 
 
1277 
	  %>
 1285 
	  %>
1278 
	  <%If rsRep.RecordCount = 0 Then%>
 1286 
	  <%If rsRep.RecordCount = 0 Then%>
1279 
	  <tr>
 1287 
	  <tr>
1280 
        <td nowrap class="body_row" colspan="3">Found 0 records! </td>
 1288 
        <td nowrap class="body_row" colspan="3">Found 0 records! </td>
1281 
      </tr>
 1289 
      </tr>
Line 1456... Line 1464...
1456
1464
1457
1465
1458 
	OraDatabase.Parameters.Add "BRANCH_ID", NNrtag_id, ORAPARM_INPUT, ORATYPE_NUMBER
 1466 
	OraDatabase.Parameters.Add "BRANCH_ID", NNrtag_id, ORAPARM_INPUT, ORATYPE_NUMBER
1459 
	OraDatabase.Parameters.Add "BOM_VERSION", Request("FRVersion"), ORAPARM_INPUT, ORATYPE_STRING
 1467 
	OraDatabase.Parameters.Add "BOM_VERSION", Request("FRVersion"), ORAPARM_INPUT, ORATYPE_STRING
1460 
	Set rsQry = OraDatabase.DbCreateDynaset( GetQuery("rep_SBOM.sql"), cint(0))
 1468 
	Set rsQry = OraDatabase.DbCreateDynaset( GetQuery("rep_SBOM.sql"), cint(0))
- 
 
 1469 
	OraDatabase.Parameters.Remove "BRANCH_ID"
- 
 
 1470 
	OraDatabase.Parameters.Remove "BOM_VERSION"
- 
 
 1471 
 
1461 
	Dim bomId
1472 
	Dim bomId
1462 
	bomId = rsQry("bom_id")
 1473 
	bomId = rsQry("bom_id")
1463 
	rsQry.close
 1474 
	rsQry.close
1464 
	Set rsQry = nothing
1475 
	Set rsQry = nothing
1465
1476
1466
- 
 
1467 
	If SSsection = "BODY" Then
 1477 
	If SSsection = "BODY" Then
1468 
		If NOT CBool(Request("action")) Then Exit Sub
 1478 
		If NOT CBool(Request("action")) Then Exit Sub
1469
1479
1470 
		'Query_String = ReadFile( rootPath & "queries\AllProducts.sql" )
 1480 
		'Query_String = ReadFile( rootPath & "queries\AllProducts.sql" )
1471
1481
Line 1703... Line 1713...
1703 
      </tr>
 1713 
      </tr>
1704 
      <%
 1714 
      <%
1705 
	  Dim currView_id
 1715 
	  Dim currView_id
1706 
	  currView_id = -1
 1716 
	  currView_id = -1
1707
1717
1708 
  		OraDatabase.Parameters.Add "RTAG_ID", NNrtag_id, ORAPARM_INPUT, ORATYPE_NUMBER
 1718 
  	  OraDatabase.Parameters.Add "RTAG_ID", NNrtag_id, ORAPARM_INPUT, ORATYPE_NUMBER
1709 
		OraDatabase.Parameters.Add "INITDATE", Request.Form("FRinitdate"), ORAPARM_INPUT, ORATYPE_STRING
 1719 
	  OraDatabase.Parameters.Add "INITDATE", Request.Form("FRinitdate"), ORAPARM_INPUT, ORATYPE_STRING
1710 
		OraDatabase.Parameters.Add "DUEDATE", Request.Form("FRduedate"), ORAPARM_INPUT, ORATYPE_STRING
 1720 
	  OraDatabase.Parameters.Add "DUEDATE", Request.Form("FRduedate"), ORAPARM_INPUT, ORATYPE_STRING
1711
1721
1712 
	  Set rsRep = OraDatabase.DbCreateDynaset( GetQuery("rep_build_history.sql"), cint(0) )
 1722 
	  Set rsRep = OraDatabase.DbCreateDynaset( GetQuery("rep_build_history.sql"), cint(0) )
- 
 
 1723 
 
- 
 
 1724 
  	  OraDatabase.Parameters.Remove "RTAG_ID"
- 
 
 1725 
	  OraDatabase.Parameters.Remove "INITDATE"
- 
 
 1726 
	  OraDatabase.Parameters.Remove "DUEDATE"
1713
1727
1714 
	  If rsRep.RecordCount = 0 Then
 1728 
	  If rsRep.RecordCount = 0 Then
1715 
	  	With Response
 1729 
	  	With Response
1716 
			.write "<tr>"
 1730 
			.write "<tr>"
1717 
			.write "<td colspan='5' class='body_row'>Found 0 records</td>"
 1731 
			.write "<td colspan='5' class='body_row'>Found 0 records</td>"
Line 1877... Line 1891...
1877 
	  currBase_view_id = -1
 1891 
	  currBase_view_id = -1
1878 
	  currPv_id = -1
 1892 
	  currPv_id = -1
1879 
	  currDpv_id = -1
 1893 
	  currDpv_id = -1
1880
1894
1881 
	  Set rsRep = OraDatabase.DbCreateDynaset( Query_String, 0 )
 1895 
	  Set rsRep = OraDatabase.DbCreateDynaset( Query_String, 0 )
- 
 
 1896 
 
- 
 
 1897 
	  OraDatabase.Parameters.Remove "RTAG_ID"
- 
 
 1898 
	  OraDatabase.Parameters.Remove "BASE_VIEW"
- 
 
 1899 
	  OraDatabase.Parameters.Remove "COMPLETENESS"
- 
 
 1900 
	  OraDatabase.Parameters.Remove "SHOW_DEPS"
- 
 
 1901 
	  OraDatabase.Parameters.Remove "PV_ID"
1882
1902 
 
1883 
	  If rsRep.RecordCount = 0 Then
 1903 
	  If rsRep.RecordCount = 0 Then
1884 
	  	With Response
 1904 
	  	With Response
1885 
			.write "<tr>"
 1905 
			.write "<tr>"
1886 
			.write "<td colspan='9' class='body_row'>Found 0 records</td>"
 1906 
			.write "<td colspan='9' class='body_row'>Found 0 records</td>"
1887 
			.write "</tr>"
 1907 
			.write "</tr>"