| Line 726... |
Line 726... |
| 726 |
<%If IsNull( rsQry("src_path") ) Then%>
|
726 |
<%If IsNull( rsQry("src_path") ) Then%>
|
| 727 |
<span class='err_alert'>Required!</span><%Else%><%=NewLine_To_BR ( To_HTML( rsQry("src_path") ) )%>
|
727 |
<span class='err_alert'>Required!</span><%Else%><%=NewLine_To_BR ( To_HTML( rsQry("src_path") ) )%>
|
| 728 |
<%End If%>
|
728 |
<%End If%>
|
| 729 |
</td>
|
729 |
</td>
|
| 730 |
</tr>
|
730 |
</tr>
|
| 731 |
<%If PackageExists(parRtag_id,parPv_id,"work_in_progress") AND (Not IsNull(rsQry("pkg_label")) ) Then%>
|
731 |
<%If PackageExists(parRtag_id,parPv_id,"work_in_progress") Then%>
|
| 732 |
<tr>
|
732 |
<tr>
|
| 733 |
<td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top"><b>WIP Tag:</b> </td>
|
733 |
<td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top"><b>WIP Tag:</b> </td>
|
| 734 |
<td bgcolor=#f5f5f5 class="sublbox_txt">
|
734 |
<td bgcolor=#f5f5f5 class="sublbox_txt">
|
| 735 |
<%=NewLine_To_BR ( To_HTML( rsQry("pkg_label") ) )%>
|
735 |
<%If IsNull( rsQry("pkg_label") ) Then%>
|
| - |
|
736 |
<span class='err_alert'>Required!</span><%Else%><%=NewLine_To_BR ( To_HTML( rsQry("pkg_label") ) )%>
|
| - |
|
737 |
<%End If%>
|
| 736 |
</td>
|
738 |
</td>
|
| 737 |
</tr>
|
739 |
</tr>
|
| 738 |
<%End If%>
|
740 |
<%End If%>
|
| 739 |
<%ElseIf vcsInfoCollector.Item("vcs_tag") = enum_VCS_UNCONTROLLED_TAG Then%>
|
741 |
<%ElseIf vcsInfoCollector.Item("vcs_tag") = enum_VCS_UNCONTROLLED_TAG Then%>
|
| 740 |
<tr>
|
742 |
<tr>
|
| Line 858... |
Line 860... |
| 858 |
|
860 |
|
| 859 |
' Previous pkg vcs tag
|
861 |
' Previous pkg vcs tag
|
| 860 |
Dim last_pv_id
|
862 |
Dim last_pv_id
|
| 861 |
Dim rsQryPV, rsQryVT
|
863 |
Dim rsQryPV, rsQryVT
|
| 862 |
Set rsQryPV = OraDatabase.DbCreateDynaset( "SELECT last_pv_id from package_versions where pv_id ="&parPv_id , cint(0))
|
864 |
Set rsQryPV = OraDatabase.DbCreateDynaset( "SELECT last_pv_id from package_versions where pv_id ="&parPv_id , cint(0))
|
| - |
|
865 |
Dim slast_vcs_tag
|
| 863 |
last_pv_id = rsQryPV("last_pv_id")
|
866 |
last_pv_id = rsQryPV("last_pv_id")
|
| - |
|
867 |
If (pv_id_exists(last_pv_id)) Then
|
| 864 |
Dim slast_vcs_tag: slast_vcs_tag = Get_Pkg_Vcs_Tag(last_pv_id)
|
868 |
slast_vcs_tag = Get_Pkg_Vcs_Tag(last_pv_id)
|
| - |
|
869 |
End If
|
| 865 |
%>
|
870 |
%>
|
| 866 |
<td bgcolor=#f5f5f5 class="sublbox_txt">
|
871 |
<td bgcolor=#f5f5f5 class="sublbox_txt">
|
| 867 |
<table width="100%" border="0" cellspacing="0" cellpadding="0">
|
872 |
<table width="100%" border="0" cellspacing="0" cellpadding="0">
|
| 868 |
<tr class="sublbox_txt">
|
873 |
<tr class="sublbox_txt">
|
| 869 |
<td width=15% colspan=2 nowrap class="sublbox_txt">
|
874 |
<td width=15% colspan=2 nowrap class="sublbox_txt">
|