Subversion Repositories DevTools

<%@LANGUAGE="VBSCRIPT"%>
<%
'=====================================================
'|                                                   |
'|                                Download Version                               |
'|                                                   |
'=====================================================
%>
<%
Option explicit
Response.Expires = 0    ' always load the page, dont store
%>
<!--#include file="common/globals.asp"-->
<!--#include file="common/config.asp"-->
<!--#include file="common/common_subs.asp"-->
<!--#include file="common/_popup_window_common.asp"-->

<%
'------------ VARIABLE DEFINITION -------------
Dim objWSH
Dim rsPkg, pkgName, pkgVersion, pkgId
Dim rsProj, projName, branchName
Dim rsOS, OSName
'------------ CONSTANTS DECLARATION -----------
'------------ VARIABLE INIT -------------------
'------------ CONDITIONS ----------------------
'----------------------------------------------
%>
<%
'--------------------------------------------------------------------------------------------------------------------------

'--------------------------------------------------------------------------------------------------------------------------
%>
<%
Function DateReversed ( dDate )
        ' Ensures Reverse Date format YYYY-MM-DD
        If IsNull(dDate) Then Exit Function
        DateReversed = Year(dDate) &"-"&  Month(dDate) &"-"& Day(dDate)
End Function
'**************************** M  A  I  N ******************************
%>
<link href="scripts/deployment_manager.css" rel="stylesheet" type="text/css">
<script language="JavaScript" type="text/javascript">
<!--
function Log_Download(paramString){
      window.location = "LogDownload.asp" + paramString;     
}
//-->
</script>


<%
If Request("bom_id") <> "" AND Request("prod_id") <> "" AND Request("os_id") Then

        Set rsPkg = OraDatabase.DbCreateDynaset( "select * from package_versions pv, packages pkg where pv.pv_id = "&Request("prod_id")&" and pkg.pkg_id = pv.pkg_id", cint(0))
        
        pkgName = rsPkg("pkg_name")
        pkgVersion = rsPkg("pkg_version")
        pkgId = rsPkg("pkg_id")
        
        rsPkg.Close()
        Set rsPkg = nothing
        
        Set rsProj = OraDatabase.DbCreateDynaset( "select br.branch_name, prj.proj_name from boms bm, branches br, dm_projects prj where bm.bom_id = "&Request("bom_id")&" and br.BRANCH_ID = bm.RTAG_ID_FK and prj.PROJ_ID = br.PROJ_ID", cint(0))
        
        projName = rsProj("proj_name")  
        branchName = rsProj("branch_name")
        
        rsProj.Close()
        Set rsProj = nothing
        
        
        Set rsOS = OraDatabase.DbCreateDynaset( "select bt.bos_type from os_base_env obe, base_env be, bos_types bt where obe.OS_ID = "&Request("os_id")&" and be.BASE_ENV_ID = obe.BASE_ENV_ID and bt.BOS_ID = be.BOS_ID", cint(0))
        
        OSName = rsOS("bos_type")
        
        If OSName = "Windows" OR OSName = "MOS" Then
                OSName = "win32"
        Else
                OSName = "sparc"
        End If  
        
        rsOS.Close()
        Set rsOS = nothing      
        
        %>
        
        <img hspace=4 src="images\download.jpg" align="left" border=0><a href="http://auperaunx26/releases/<%=projName%>/<%=branchName%>/region/<%=pkgName%>/<%=OSName%>/<%=pkgName%>-<%=pkgVersion%>-<%=OSName%>.zip" onClick="Log_Download(?pkg_id=<%=pkgId%>&pkg_version=<%=pkgVersion%>);"  class="body_link"><b>Click here to Download</b></a>
<%
End If

'**********************************************************************
%>

<%
'------------ RUN AFTER CODE RUN --------------
'----------------------------------------------
%><!--#include file="common/globals_destructor.asp"-->