Subversion Repositories DevTools

Rev

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

Rev 6788 Rev 6790
Line 260... Line 260...
260
260
261
261
262
262
263 
	  <%Else%>
 263 
	  <%Else%>
264
264
265 
	  <table width="100%"  border="0" cellspacing="1" cellpadding="3">
 265 
	  <table width="100%"  border="0" cellspacing="1" cellpadding="3" class=stdGrey>
- 
 
 266 
          <thead>
266 
              <tr class="form_field_bg">
 267 
                  <tr class="form_field_bg">
267 
		  		<td width="1"   class="form_item"></td>
 268 
                    <th width="1"  ></th>
268 
		  		<td width="1"   class="form_item"></td>
 269 
                    <th width="1"  ></th>
269 
                <td width="50%" class="form_item">Name</td>
 270 
                    <th width="50%">Name</th>
270 
                <td width="50%" class="form_item" align="right">Byte Size</td>
 271 
                    <th width="50%" align="right">Byte Size</th>
271 
              </tr>
 272 
                  </tr>
- 
 
 273 
          </thead>
272 
			<%
 274 
			<%
273 
			While ((NOT rsComp.BOF) AND (NOT rsComp.EOF))
275 
			While ((NOT rsComp.BOF) AND (NOT rsComp.EOF))
274
276
275 
				Call GetDiffStateIcon( rsComp("diff_state"), sDiffStateIcon, sStyle )
 277 
				Call GetDiffStateIcon( rsComp("diff_state"), sDiffStateIcon, sStyle )
276
278
Line 283... Line 285...
283 
					sIcon = "<img src='images/rex_images/ext_blank.gif' border='0' hspace='3' align='absmiddle'>"
 285 
					sIcon = "<img src='images/rex_images/ext_blank.gif' border='0' hspace='3' align='absmiddle'>"
284 
				End If
 286 
				End If
285
287
286 
			%>
 288 
			%>
287 
			  <%If NOT dFileFilter.Exists ( CStr(rsComp("diff_state")) ) Then%>
 289 
			  <%If NOT dFileFilter.Exists ( CStr(rsComp("diff_state")) ) Then%>
288 
              <tr class="form_field_grey_bg">
 290 
              <tr>
289 
		  		<td nowrap class="body_txt_gray"><%=sDiffStateIcon%></td>
 291 
		  		<td nowrap><%=sDiffStateIcon%></td>
290 
		  		<td nowrap class="body_txt_gray"><%=sIcon%></td>
 292 
		  		<td nowrap><%=sIcon%></td>
291 
                <td nowrap class="<%=sStyle%>"><%=rsComp("name")%></td>
 293 
                <td nowrap class="<%=sStyle%>"><%=rsComp("name")%></td>
292 
                <td class="body_txt_gray" nowrap align="right"><%=sSize%></td>
 294 
                <td nowrap align="right"><%=sSize%></td>
293 
              </tr>
 295 
              </tr>
294 
			  <%End If%>
 296 
			  <%End If%>
295 
		<%
 297 
		<%
296 
			rsComp.MoveNext
 298 
			rsComp.MoveNext
297 
		WEnd
 299 
		WEnd
298
- 
 
299 
		rsComp.Close()
 300 
		rsComp.Close()
300 
		Set rsComp = nothing
 301 
		Set rsComp = nothing
301 
		%>
 302 
		%>
302 
            </table><br>
 303 
       </table><br>
303
- 
 
304 
  	  <%End If%>
 304 
  	  <%End If%>
305
- 
 
306
- 
 
307 
	<%
 - 
 
308 
End Sub
 305 
<%End Sub
- 
 
 306 
 
309 
'--------------------------------------------------------------------------------------------------------------------------------------
 307 
'--------------------------------------------------------------------------------------------------------------------------------------
310 
Sub GetDiffStateIcon( nDiffState, outIcon, outStyle )
 308 
Sub GetDiffStateIcon( nDiffState, outIcon, outStyle )
311 
	Select Case CInt( nDiffState )
 309 
	Select Case CInt( nDiffState )
312 
		Case enumDB_NUM_DIFF_UPDATED
 310 
		Case enumDB_NUM_DIFF_UPDATED
313 
			outIcon  = LIMG_UPDATED
 311 
			outIcon  = LIMG_UPDATED
Line 321... Line 319...
321 
			outIcon = LIMG_ADDED
 319 
			outIcon = LIMG_ADDED
322 
			outStyle = "body_rowbold"
 320 
			outStyle = "body_rowbold"
323
321
324 
		Case Else
 322 
		Case Else
325 
			outIcon = ""
 323 
			outIcon = ""
326 
			outStyle = "body_rowg"
 324 
			outStyle = ""
327
325
328 
	End Select
 326 
	End Select
329
327
330 
End Sub
 328 
End Sub
331 
'-----------------------------------------------------------------------------------------------------------------
 329 
'-----------------------------------------------------------------------------------------------------------------
Line 487... Line 485...
487
485
488 
		<%End If%>
486 
		<%End If%>
489 
		<%
 487 
		<%
490 
        %>
488 
        %>
491 
 
 489 
 
492 
		<table width="100%" border="0" cellspacing="1" cellpadding="3" class='etable'>
 490 
		<table width="100%" border="0" cellspacing="1" cellpadding="3" class='etable stdGrey'>
- 
 
 491 
            <thead>
493 
		  <tr>
492 
    		  <tr>
494 
		    <th nowrap width="1%" class="form_field_hdr">Change</th>
 493 
    		    <th nowrap width="1%">Change</th>
495 
		    <th nowrap width="1%" class="form_field_hdr">Name&nbsp;&nbsp;</th>
 494 
    		    <th nowrap width="1%">Name&nbsp;&nbsp;</th>
496 
		    <th nowrap width="1%" class="form_field_hdr">Current Version&nbsp;&nbsp;</th>
 495 
    		    <th nowrap width="1%">Current Version&nbsp;&nbsp;</th>
497 
		    <th nowrap width="100%" class="form_field_hdr">Previous Version</th>
 496 
    		    <th nowrap width="100%">Previous Version</th>
498 
		  </tr>
 497 
    		  </tr>
499 
 
 - 
 
- 
 
 498 
            </thead>
500 
          <%
 499 
          <%
501 
		    Dim style, icon, sText
 500 
		    Dim style, icon, sText
502 
            icon  = Iif( Clng(DB_PV_ID) = cLng(parComparePvId),  "", LIMG_UPDATED)
 501 
            icon  = Iif( Clng(DB_PV_ID) = cLng(parComparePvId),  "", LIMG_UPDATED)
503 
            sText = Iif( Clng(DB_PV_ID) = cLng(parComparePvId),  "No Change", "Changed")
 502 
            sText = Iif( Clng(DB_PV_ID) = cLng(parComparePvId),  "No Change", "Changed")
504 
          %>
 503 
          %>
505 
	      <tr class=csvData>
 504 
	      <tr class="hdr csvData">
506 
		    <td nowrap class="form_field_hdr tcenter" data-csv="<%=sText%>"><%=icon%></td>
 505 
		    <td nowrap class="tcenter" data-csv="<%=sText%>"><%=icon%></td>
507 
		    <td nowrap class="form_field_hdr"><%=pkgInfoHash.Item("pkg_name")%></td>
 506 
		    <td nowrap><%=pkgInfoHash.Item("pkg_name")%></td>
508 
		    <td nowrap class="form_field_hdr"><%=pkgInfoHash.Item("pkg_version")%></td>
 507 
		    <td nowrap><%=pkgInfoHash.Item("pkg_version")%></td>
509 
		    <td nowrap class="form_field_hdr"><%=preVerText%></td>
 508 
		    <td nowrap><%=preVerText%></td>
510 
		  </tr>
 509 
		  </tr>
511 
          <%If (parFileDiff <> "") Then%>
 510 
          <%If (parFileDiff <> "") Then%>
512 
          <tr>
511 
          <tr>
513 
            <td>&nbsp;</td>
 512 
            <td>&nbsp;</td>
514 
            <td>&nbsp;</td>
 513 
            <td>&nbsp;</td>
Line 518... Line 517...
518 
          </tr>
 517 
          </tr>
519 
          <%End If%>
518 
          <%End If%>
520 
 
 519 
 
521
520
522 
	      <%If (rsTemp.RecordCount < 1) Then%>
 521 
	      <%If (rsTemp.RecordCount < 1) Then%>
- 
 
 522 
          <tr>
- 
 
 523 
		    <td nowrap>&nbsp;</td>
523 
          <tr class="form_field_grey_bg">
 524 
		    <td nowrap>&nbsp;</td>
524 
		    <td nowrap>&nbsp;</td>
 525 
		    <td nowrap>&nbsp;</td>
525 
		    <td nowrap>&nbsp;</td>
 526 
		    <td nowrap>&nbsp;</td>
526 
		    <td class="form_item">&nbsp;</td>
 - 
 
527 
		    <td class="form_item">&nbsp;</td>
 - 
 
528 
		  </tr>
 527 
		  </tr>
529 
	  	  <%End If%>
528 
	  	  <%End If%>
530 
		  <%
 529 
		  <%
531 
		  While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))
 530 
		  While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))
532 
		  		Call RowStyle ( rsTemp("status"), icon, style, sText )
 531 
		  		Call RowStyle ( rsTemp("status"), icon, style, sText )
533 
		  %>
 532 
		  %>
534
533
535 
		  	  <%If NOT dDepFilter.Exists(CStr( rsTemp("status") )) Then%>
 534 
		  	  <%If NOT dDepFilter.Exists(CStr( rsTemp("status") )) Then%>
536 
				  <tr class="form_field_grey_bg csvData">
 535 
				  <tr class="csvData">
537 
				    <td align="center" data-csv="<%=sText%>"><%=icon%></td>
 536 
				    <td align="center" data-csv="<%=sText%>"><%=icon%></td>
538 
				    <td nowrap class="<%=style%>">
 537 
				    <td nowrap class="<%=style%>">
539 
					<%If NOT IsNull(rsTemp("pkg_version")) Then%>
538 
					<%If NOT IsNull(rsTemp("pkg_version")) Then%>
540 
						<a href="<%=ScriptName &"?pv_id="& rsTemp("pv_id") &"&rtag_id="& parRtag_id %>" class="<%=style%>"><%=rsTemp("pkg_name")%></a>
 539 
						<a href="<%=ScriptName &"?pv_id="& rsTemp("pv_id") &"&rtag_id="& parRtag_id %>" class="<%=style%>"><%=rsTemp("pkg_name")%></a>
541 
					<%Else%>
 540 
					<%Else%>