Subversion Repositories DevTools

Rev

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

Rev 5513 Rev 5955
Line 518... Line 518...
518 
         <%
 518 
         <%
519 
         Dim currRtag_id
 519 
         Dim currRtag_id
520 
         currRtag_id = -1
 520 
         currRtag_id = -1
521 
         Set rsRep = OraDatabase.DbCreateDynaset( Query_String, 0 )
 521 
         Set rsRep = OraDatabase.DbCreateDynaset( Query_String, 0 )
522 
 
 522 
 
- 
 
 523 
         OraDatabase.Parameters.Remove "PROJ_ID"
- 
 
 524 
         OraDatabase.Parameters.Remove "RTAG_ID"
- 
 
 525 
 
523 
         If rsRep.RecordCount = 0 Then
 526 
         If rsRep.RecordCount = 0 Then
524 
            With Response
 527 
            With Response
525 
               .write "<tr>"
 528 
               .write "<tr>"
526 
               .write "<td colspan='4' class='body_row'>Found 0 records</td>"
 529 
               .write "<td colspan='4' class='body_row'>Found 0 records</td>"
527 
               .write "</tr>"
 530 
               .write "</tr>"
Line 663... Line 666...
663 
         </tr>
 666 
         </tr>
664 
         <%
 667 
         <%
665 
         Dim currView_id
 668 
         Dim currView_id
666 
         currView_id = -1
 669 
         currView_id = -1
667 
         Set rsRep = OraDatabase.DbCreateDynaset( Query_String, 0 )
 670 
         Set rsRep = OraDatabase.DbCreateDynaset( Query_String, 0 )
- 
 
 671 
         OraDatabase.Parameters.Remove "RTAG_ID"
668 
 
 672 
 
669 
         If rsRep.RecordCount = 0 Then
 673 
         If rsRep.RecordCount = 0 Then
670 
            With Response
 674 
            With Response
671 
               .write "<tr>"
 675 
               .write "<tr>"
672 
               .write "<td colspan='8' class='body_row'>Found 0 records</td>"
 676 
               .write "<td colspan='8' class='body_row'>Found 0 records</td>"
Line 1267... Line 1271...
1267 
         </tr>
 1271 
         </tr>
1268 
         <%
 1272 
         <%
1269 
         Dim currView_id
 1273 
         Dim currView_id
1270 
         currView_id = -1
 1274 
         currView_id = -1
1271 
         Set rsRep = OraDatabase.DbCreateDynaset( Query_String, 0 )
 1275 
         Set rsRep = OraDatabase.DbCreateDynaset( Query_String, 0 )
- 
 
 1276 
         OraDatabase.Parameters.Remove "RTAG_ID"
1272 
 
 1277 
 
1273 
         If rsRep.RecordCount = 0 Then
 1278 
         If rsRep.RecordCount = 0 Then
1274 
            With Response
 1279 
            With Response
1275 
               .write "<tr>"
 1280 
               .write "<tr>"
1276 
               .write "<td colspan='5' class='body_row'>Found 0 records</td>"
 1281 
               .write "<td colspan='5' class='body_row'>Found 0 records</td>"
Line 1411... Line 1416...
1411 
         <tr>
 1416 
         <tr>
1412 
            <td background="images/bg_rep_line.gif" colspan="3"><img src="images/spacer.gif" width="1" height="1"></td>
 1417 
            <td background="images/bg_rep_line.gif" colspan="3"><img src="images/spacer.gif" width="1" height="1"></td>
1413 
         </tr>
 1418 
         </tr>
1414 
         <%
 1419 
         <%
1415 
         Set rsRep = OraDatabase.DbCreateDynaset( Query_String, 0 )
 1420 
         Set rsRep = OraDatabase.DbCreateDynaset( Query_String, 0 )
- 
 
 1421 
         OraDatabase.Parameters.Remove "RTAG_ID"
- 
 
 1422 
         OraDatabase.Parameters.Remove "BASE_VIEW_ID"
- 
 
 1423 
 
1416 
         %>
 1424 
         %>
1417 
         <%If rsRep.RecordCount = 0 Then%>
 1425 
         <%If rsRep.RecordCount = 0 Then%>
1418 
            <tr>
 1426 
            <tr>
1419 
               <td nowrap class="body_row" colspan="3">Found 0 records! </td>
 1427 
               <td nowrap class="body_row" colspan="3">Found 0 records! </td>
1420 
            </tr>
 1428 
            </tr>
Line 1595... Line 1603...
1595 
 
 1603 
 
1596 
 
 1604 
 
1597 
   OraDatabase.Parameters.Add "BRANCH_ID", NNrtag_id, ORAPARM_INPUT, ORATYPE_NUMBER
 1605 
   OraDatabase.Parameters.Add "BRANCH_ID", NNrtag_id, ORAPARM_INPUT, ORATYPE_NUMBER
1598 
   OraDatabase.Parameters.Add "BOM_VERSION", Request("FRVersion"), ORAPARM_INPUT, ORATYPE_STRING
 1606 
   OraDatabase.Parameters.Add "BOM_VERSION", Request("FRVersion"), ORAPARM_INPUT, ORATYPE_STRING
1599 
   Set rsQry = OraDatabase.DbCreateDynaset( GetQuery("rep_SBOM.sql"), cint(0))
 1607 
   Set rsQry = OraDatabase.DbCreateDynaset( GetQuery("rep_SBOM.sql"), cint(0))
- 
 
 1608 
   OraDatabase.Parameters.Remove "BRANCH_ID"
- 
 
 1609 
   OraDatabase.Parameters.Remove "BOM_VERSION"
- 
 
 1610 
 
1600 
   Dim bomId
 1611 
   Dim bomId
1601 
   bomId = rsQry("bom_id")
 1612 
   bomId = rsQry("bom_id")
1602 
   rsQry.close
 1613 
   rsQry.close
1603 
   Set rsQry = nothing
 1614 
   Set rsQry = nothing
1604 
 
 1615 
 
1605 
 
 1616 
 
1606 
   If SSsection = "BODY" Then
 1617 
   If SSsection = "BODY" Then
1607 
      If NOT CBool(Request("action")) Then Exit Sub
 1618 
      If NOT CBool(Request("action")) Then Exit Sub
1608 
 
 1619 
 
1609 
      'Query_String = ReadFile( rootPath & "queries\AllProducts.sql" )
 1620 
      'Query_String = ReadFile( rootPath & "queries\AllProducts.sql" )
1610 
 
 - 
 
1611 
      'OraDatabase.Parameters.Add "BOM_ID", bomId, ORAPARM_INPUT, ORATYPE_NUMBER
 1621 
      'OraDatabase.Parameters.Add "BOM_ID", bomId, ORAPARM_INPUT, ORATYPE_NUMBER
1612 
      %>
 1622 
      %>
1613 
      </p>
 1623 
      </p>
1614 
      <table width="20%" border="0" cellspacing="0" cellpadding="2">
 1624 
      <table width="20%" border="0" cellspacing="0" cellpadding="2">
1615 
         <tr>
 1625 
         <tr>
Line 1813... Line 1823...
1813 
 
 1823 
 
1814 
 
 1824 
 
1815 
   OraDatabase.Parameters.Add "BRANCH_ID", NNrtag_id, ORAPARM_INPUT, ORATYPE_NUMBER
 1825 
   OraDatabase.Parameters.Add "BRANCH_ID", NNrtag_id, ORAPARM_INPUT, ORATYPE_NUMBER
1816 
   OraDatabase.Parameters.Add "BOM_VERSION", Request("FRVersion"), ORAPARM_INPUT, ORATYPE_STRING
 1826 
   OraDatabase.Parameters.Add "BOM_VERSION", Request("FRVersion"), ORAPARM_INPUT, ORATYPE_STRING
1817 
   Set rsQry = OraDatabase.DbCreateDynaset( GetQuery("rep_SBOM.sql"), cint(0))
 1827 
   Set rsQry = OraDatabase.DbCreateDynaset( GetQuery("rep_SBOM.sql"), cint(0))
- 
 
 1828 
   OraDatabase.Parameters.Remove "BRANCH_ID"
- 
 
 1829 
   OraDatabase.Parameters.Remove "BOM_VERSION"
- 
 
 1830 
 
1818 
   Dim bomId, ext
 1831 
   Dim bomId, ext
1819 
   bomId = rsQry("bom_id")
 1832 
   bomId = rsQry("bom_id")
1820 
   Set rsQry = OraDatabase.DbCreateDynaset( "select * from release_manager.project_extentions where proj_id="&NNproj_id, cint(0))
 1833 
   Set rsQry = OraDatabase.DbCreateDynaset( "select * from release_manager.project_extentions where proj_id="&NNproj_id, cint(0))
1821 
   ext = rsQry("ext_name")
 1834 
   ext = rsQry("ext_name")
1822 
   rsQry.close
 1835 
   rsQry.close
Line 2153... Line 2166...
2153 
         OraDatabase.Parameters.Add "INITDATE", Request.Form("FRinitdate"), ORAPARM_INPUT, ORATYPE_STRING
 2166 
         OraDatabase.Parameters.Add "INITDATE", Request.Form("FRinitdate"), ORAPARM_INPUT, ORATYPE_STRING
2154 
         OraDatabase.Parameters.Add "DUEDATE", Request.Form("FRduedate"), ORAPARM_INPUT, ORATYPE_STRING
 2167 
         OraDatabase.Parameters.Add "DUEDATE", Request.Form("FRduedate"), ORAPARM_INPUT, ORATYPE_STRING
2155 
 
 2168 
 
2156 
         Set rsRep = OraDatabase.DbCreateDynaset( GetQuery("rep_build_history.sql"), cint(0) )
 2169 
         Set rsRep = OraDatabase.DbCreateDynaset( GetQuery("rep_build_history.sql"), cint(0) )
2157 
 
 2170 
 
- 
 
 2171 
         OraDatabase.Parameters.Remove "RTAG_ID"
- 
 
 2172 
         OraDatabase.Parameters.Remove "INITDATE"
- 
 
 2173 
         OraDatabase.Parameters.Remove "DUEDATE"
- 
 
 2174 
 
2158 
         If rsRep.RecordCount = 0 Then
 2175 
         If rsRep.RecordCount = 0 Then
2159 
            With Response
 2176 
            With Response
2160 
               .write "<tr>"
 2177 
               .write "<tr>"
2161 
               .write "<td colspan='5' class='body_row'>Found 0 records</td>"
 2178 
               .write "<td colspan='5' class='body_row'>Found 0 records</td>"
2162 
               .write "</tr>"
 2179 
               .write "</tr>"
Line 2321... Line 2338...
2321 
         currPv_id = -1
 2338 
         currPv_id = -1
2322 
         currDpv_id = -1
 2339 
         currDpv_id = -1
2323 
 
 2340 
 
2324 
         Set rsRep = OraDatabase.DbCreateDynaset( Query_String, 0 )
 2341 
         Set rsRep = OraDatabase.DbCreateDynaset( Query_String, 0 )
2325 
 
 2342 
 
- 
 
 2343 
         OraDatabase.Parameters.Remove "RTAG_ID"
- 
 
 2344 
         OraDatabase.Parameters.Remove "BASE_VIEW"
- 
 
 2345 
         OraDatabase.Parameters.Remove "COMPLETENESS"
- 
 
 2346 
         OraDatabase.Parameters.Remove "SHOW_DEPS"
- 
 
 2347 
         OraDatabase.Parameters.Remove "PV_ID"
- 
 
 2348 
 
2326 
         If rsRep.RecordCount = 0 Then
 2349 
         If rsRep.RecordCount = 0 Then
2327 
            With Response
 2350 
            With Response
2328 
               .write "<tr>"
 2351 
               .write "<tr>"
2329 
               .write "<td colspan='9' class='body_row'>Found 0 records</td>"
 2352 
               .write "<td colspan='9' class='body_row'>Found 0 records</td>"
2330 
               .write "</tr>"
 2353 
               .write "</tr>"