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%>