Subversion Repositories DevTools

Rev

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

Rev 1281 Rev 3866
Line 322... Line 322...
322
		    <td valign="top">
322
		    <td valign="top">
323
			<!-- DETAILS ------------------------------------------------->
323
			<!-- DETAILS ------------------------------------------------->
324
			<%
324
			<%
325
			' --- Decide if pv_id is ERG Product ---
325
			' --- Decide if pv_id is ERG Product ---
326
			isProduct = FALSE
326
			isProduct = FALSE
-
 
327
 
-
 
328
            if NOT IsEmpty(parOsType) Then
327
			
329
 
328
			If NOT IsNull( pkgInfoHash.Item("base_view_id") ) OR ( pkgInfoHash.Item("base_view_id") <> "") Then
330
			    If NOT IsNull( pkgInfoHash.Item("base_view_id") ) OR ( pkgInfoHash.Item("base_view_id") <> "") Then
329
				If CInt(pkgInfoHash.Item("base_view_id")) = enumBASE_VIEW_PRODUCTS Then
331
				    If CInt(pkgInfoHash.Item("base_view_id")) = enumBASE_VIEW_PRODUCTS Then
330
				isProduct = TRUE
332
				        isProduct = TRUE
331
			End If
333
			        End If
332
			
-
 
333
			Else
334
			    Else
334
				' Try to be smart and decide if it is ERG product by name
335
				    ' Try to be smart and decide if it is ERG product by name
335
				If InStr( pkgInfoHash.Item("pkg_name"), "ERG", 0) = 1  Then
336
				    If InStr( pkgInfoHash.Item("pkg_name"), "ERG", 0) = 1  Then
336
				isProduct = TRUE
337
				        isProduct = TRUE
337
			End If
338
			        End If
338
			
339
                End If
339
			End If
340
			End If
340
			
341
 
341
			%>	
342
			%>	
342
			
343
			
343
			<%
344
			<%
344
			' -- Open Database connection
345
			' -- Open Database connection
345
			If isProduct Then
346
			If isProduct Then
Line 522... Line 523...
522
		                  <td width="25%" background="images/bg_form_lightbluedark.gif" class="form_item" align="right">CKSUM</td>
523
		                  <td width="25%" background="images/bg_form_lightbluedark.gif" class="form_item" align="right">CKSUM</td>
523
		                  <td width="25%" background="images/bg_form_lightbluedark.gif" class="form_item" align="right">MODCRC</td>
524
		                  <td width="25%" background="images/bg_form_lightbluedark.gif" class="form_item" align="right">MODCRC</td>
524
		                </tr>
525
		                </tr>
525
						<%
526
						<%
526
						Dim uRL
527
						Dim uRL
527
						If CInt(pkgInfoHash.Item("base_view_id"))	=	enumAUTOPRODUCTS_BASE_VIEW_ID	Then
-
 
528
							uRL	=	deploy_archiveURL
-
 
529
						Else
-
 
530
							uRL	=	dpkg_archiveURL
-
 
531
						End	If	
-
 
532
						While ((NOT rsQry.BOF) AND (NOT rsQry.EOF)) 
528
						While ((NOT rsQry.BOF) AND (NOT rsQry.EOF)) 
533
							sLink = uRL & pkgInfoHash.Item ("pkg_name") &"/"& pkgInfoHash.Item ("pkg_version") &"/"& Replace( rsQry("file_path") & rsQry("file_name"), "\", "/" )
529
							sLink = dpkg_archiveURL & pkgInfoHash.Item ("pkg_name") &"/"& pkgInfoHash.Item ("pkg_version") &"/"& Replace( rsQry("file_path") & rsQry("file_name"), "\", "/" )
534
							
530
							
535
							' Find if this is file or folder
531
							' Find if this is file or folder
536
							If IsNull( rsQry("crc_cksum") )  AND  (rsQry("byte_size") = 0) Then 
532
							If IsNull( rsQry("crc_cksum") )  AND  (rsQry("byte_size") = 0) Then 
537
								sSize = ""
533
								sSize = ""
538
								sIcon = "<img src='images/rex_images/_folder.gif' border='0' hspace='3' align='absmiddle'>"
534
								sIcon = "<img src='images/rex_images/_folder.gif' border='0' hspace='3' align='absmiddle'>"