Subversion Repositories DevTools

Rev

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

Rev 6623 Rev 6790
Line 29... Line 29...
29
%>
29
%>
30
<%
30
<%
31
'------------------------ MAIN LINE ---------------------------------
31
'------------------------ MAIN LINE ---------------------------------
32
'--------------------------------------------------------------------
32
'--------------------------------------------------------------------
33
%>
33
%>
34
<table width="100%" border="0" cellspacing="0" cellpadding="0">
34
<table width="100%" border="0" cellspacing="1" cellpadding="3" class='stdGrey'>
35
	<tr>
35
    <thead>
36
	 <td>		
36
      <tr>
37
	 				
-
 
38
        <table width="100%" border="0" cellspacing="1" cellpadding="3">
-
 
39
          <tr class="form_field_bg">
-
 
40
            <td nowrap class="body_row">Package Version</td>
37
        <th nowrap>Package Version</th>
41
            <td nowrap class="body_row">Last Modified</td>
38
        <th nowrap>Last Modified</th>
42
            <td nowrap class="body_row">Reason for this version</td>
39
        <th nowrap>Reason for this version</th>
43
          </tr>
40
      </tr>
44
          <%
41
    </thead>
-
 
42
  <%
45
          OraDatabase.Parameters.Add "USER_ID", Request("user_id"), 	ORAPARM_INPUT, ORATYPE_NUMBER 
43
  OraDatabase.Parameters.Add "USER_ID", Request("user_id"), 	ORAPARM_INPUT, ORATYPE_NUMBER 
46
          Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("UserDangle.sql"), cint(0))
44
  Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("UserDangle.sql"), cint(0))
47
          OraDatabase.Parameters.Remove "USER_ID"
45
  OraDatabase.Parameters.Remove "USER_ID"
48
          If rsTemp.RecordCount < 1 Then
46
  If rsTemp.RecordCount < 1 Then
49
          %>
-
 
50
          <tr class="form_field_grey_bg"> 
-
 
51
            <td class="body_row" nowrap colspan="3">None</td>
-
 
52
          </tr>
-
 
53
          <%End If%>
-
 
54
          <%While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))%>
-
 
55
          <tr class="form_field_grey_bg"> 
-
 
56
            <td nowrap class="body_txt">
-
 
57
                <a href="javascript:;" onClick="MM_openBrWindow('_wform_versions_history_release_notes.asp?pkg_id=<%=rsTemp("pkg_id")%>&pv_id=<%=rsTemp("pv_id")%>','History','resizable=yes,scrollbars=yes,width=1000,height='+ ( screen.height - 100 ))" class="txt_linked"><%= rsTemp("pkg_name") &" "& rsTemp("pkg_version") %></a>
47
  %>
58
            </td>
-
 
59
            <td nowrap class="body_txt"><%= DisplayDate(rsTemp("MODIFIED_STAMP"))%></td>
-
 
60
            <td nowrap class="body_txt"><%= rsTemp("comments")%></td>
-
 
61
          </tr>
48
  <tr>
62
          <%rsTemp.MoveNext
-
 
63
          WEnd
-
 
64
          rsTemp.Close
-
 
65
          Set rsTemp = nothing%>
49
    <td nowrap colspan="3">None</td>
66
        </table>
-
 
67
    </td>						
-
 
68
  </tr>
50
  </tr>
-
 
51
  <%End If%>
-
 
52
  <%While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))%>
-
 
53
  <tr>
-
 
54
    <td nowrap>
-
 
55
        <a href="javascript:;" onClick="MM_openBrWindow('_wform_versions_history_release_notes.asp?pkg_id=<%=rsTemp("pkg_id")%>&pv_id=<%=rsTemp("pv_id")%>','History','resizable=yes,scrollbars=yes,width=1000,height='+ ( screen.height - 100 ))" class="txt_linked"><%= rsTemp("pkg_name") &" "& rsTemp("pkg_version") %></a>
-
 
56
    </td>
-
 
57
    <td nowrap><%= DisplayDate(rsTemp("MODIFIED_STAMP"))%></td>
-
 
58
    <td nowrap><%= rsTemp("comments")%></td>
-
 
59
  </tr>
-
 
60
  <%rsTemp.MoveNext
-
 
61
  WEnd
-
 
62
  rsTemp.Close
-
 
63
  Set rsTemp = nothing%>
69
</table>
64
</table>
70
<br>
65
<br>
71
<%
-
 
72
Call Destroy_All_Objects
-
 
73
%>						
-
 
74
66
<%Call Destroy_All_Objects%>						
-
 
67
75
68