<!--#include virtual="/includes/topofpage.asp"-->
<%
Dim Page 
Page = "19"

Dim Conn
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open Application("conn_string")

If (UCase(Request.ServerVariables("REQUEST_METHOD")) = "POST" And Request.Form("page") = "0") Then
	If Request.Form("Admin_Group_ID") <> "" Then
		Session("Admin_Group_ID") = Request.Form("Admin_Group_ID")
	End If
	
	If Session("Admin_Group_ID") = "" Then
		Session("Admin_Group_ID") = "0"
	End If
End If

Dim SQLName, RSName
SQLName = "get_entity_from_group @Group_ID='" & Session("Admin_Group_ID") & "'"
Set RSName=Conn.Execute(SQLName)
%>
<%' Getting Lodging Rooms for Table Definition
	Dim SQL1, RS1, Item_ID(), Room_Type(), Amenity(), Total_On_Prop(), ii, Room_Packages, Count	

	SQL1="Execute Get_Lodging_Rooms @Group_ID='" & Session("Admin_Group_ID") & "'"
	Set RS1 = Conn.Execute(SQL1)
	
	ii=250
	ReDim Item_ID(ii), Room_Type(ii), Amenity(ii), Total_On_Prop(ii)
	
	ii=0
	If Not RS1.EOF Then
		ii=0
		Do While Not rs1.eof
			ii=ii+1
			Item_ID(ii)=RS1("Item_Id")
			Room_Type(ii)=RS1("Att_Desc")
			Amenity(ii)=RS1("Name")
			Total_On_Prop(ii)=RS1("Total_On_Prop")
			'**** Debug Code****
			'	Response.Write ii & " "
			'	Response.Write Item_ID(ii) & " "
			'	Response.Write Room_Type(ii) & " "
			'	Response.Write Amenity(ii) & " "
			'	Response.Write Total_On_Prop(ii) & "<BR> "
			'**** End Debug ****
			RS1.MoveNext
		Loop
		Room_Packages=ii
		'**** Debug Code****
		'Response.Write ii & " "
		'Response.Write Room_Packages & " "
		'For ii=1 to Room_Packages
		'		Response.Write ii & " "
		'		Response.Write Item_ID(ii) & " "
		'		Response.Write Room_Type(ii) & " "
		'		Response.Write Amenity(ii) & " "
		'		Response.Write Total_On_Prop(ii) & "<BR> "
		'Next
		'**** End Debug ****
	End If
%>
<%'Posting Variables on Save
	If (UCase(Request.ServerVariables("REQUEST_METHOD")) = "POST" And Request.Form("page") = Page) Then
		
		Realm = Session("Site_Realm")
		
		'Response.Write "Posting Debug Code <BR>"
		'Response.Write "ii:" & ii & "<BR>"
		
		Dim i, Form_String, Sub_String, Room_Total, Amenity_Package, Attribute_ID, Assigned_Rooms
		Dim SQL, TextField
		
		Form_String = Split(Request.Form, "&", -1)
		
		Dim Item, Allocated, Alarm
		Dim SingleNet, SingleClub, SingleWeb, SinglePref					
		Dim DoubleNet, DoubleClub, DoubleWeb, DoublePref
		Dim AddlNet, AddlClub, AddlWeb, AddlPref
		Dim ChildNet, ChildClub, ChildWeb, ChildPref
		Dim Start_Day, Start_Month, Start_Year, End_Day, End_Month, End_Year
		Dim Start_Date, End_Date
	
		If ii > 0 Then
			Response.Write "*******************<BR>"				

			For i = 1 to Room_Packages
				Response.Write (i & "<br>")

					'Item
					    Item = Item_ID(i)
					
					' Start_Day
						TextField = "Start_Day" & i
						Start_Day = Request.Form(TextField)
						
					' Start_Month
						TextField = "Start_Month" & i
						Start_Month = Request.Form(TextField)
						
					' Start_Year
						TextField = "Start_Year" & i
						Start_Year = Request.Form(TextField)
						
					' Start_Date
						Start_Date = "" & Start_Month & "/" & Start_Day & "/" & Start_Year & ""
					
					' End_Day
						TextField = "End_Day" & i
						End_Day = Request.Form(TextField)
						
					' End_Month
						TextField = "End_Month" & i
						End_Month = Request.Form(TextField)
						
					' End_Year
						TextField = "End_Year" & i
						End_Year = Request.Form(TextField)
					
					' End_Date
						End_Date = "" & End_Month & "/" & End_Day & "/" & End_Year & ""	
						
					' Allocated
						TextField = "Allocated" & i
						Allocated = Request.Form(TextField)

					'Alarm
						TextField = "Alarm" & i
						Alarm = Request.Form(TextField)

					' --
					'SingleNet
						TextField = "SingleNet" & i
						SingleNet = Request.Form(TextField)
					'SingleClub
						TextField = "SingleClub" & i
						SingleClub = Request.Form(TextField)
					'SingleWeb
						TextField = "SingleWeb" & i
						SingleWeb = Request.Form(TextField)
					'SinglePref					
						TextField = "SinglePref" & i
						SinglePref = Request.Form(TextField)

					' --
					'DoubleNet
						TextField = "DoubleNet" & i
						DoubleNet = Request.Form(TextField)
					'DoubleClub
						TextField = "DoubleClub" & i
						DoubleClub = Request.Form(TextField)
					'DoubleWeb
						TextField = "DoubleWeb" & i
						DoubleWeb = Request.Form(TextField)
					'DoublePref
						TextField = "DoublePref" & i
						DoublePref = Request.Form(TextField)

					' --
					'AddlNet
						TextField = "AddlNet" & i
						AddlNet = Request.Form(TextField)
					'AddlClub
						TextField = "AddlClub" & i
						AddlClub = Request.Form(TextField)
					'AddlWeb
						TextField = "AddlWeb" & i
						AddlWeb = Request.Form(TextField)
					'AddlPref
						TextField = "AddlPref" & i
						AddlPref = Request.Form(TextField)

					' --
					'ChildNet
						TextField = "ChildNet" & i
						ChildNet = Request.Form(TextField)
					'ChildClub
						TextField = "ChildClub" & i
						ChildClub = Request.Form(TextField)
					'ChildWeb
						TextField = "ChildWeb" & i
						ChildWeb = Request.Form(TextField)
					'ChildPref
						TextField = "ChildPref" & i
						ChildPref = Request.Form(TextField)


				'Response.Write Allocated & " - " & Alarm & "<BR>"						
				'If Sub_String(1) = "" Then
				'	Response.Write "xx"
				'Else
				'	Response.Write Sub_String(1) & " "
				'End If

				
				'Sub_String = Split(Form_String(i), "=", -1)
				'Amenity_Package = Split(Sub_String(0), "a", -1)
				'Attribute_ID = Split(Amenity_Package(0), "r", -1)
				'Assigned_Rooms = Sub_String(1)
				
				'If (Sub_String(1) = "") Then
				'	Assigned_Rooms = "0"	
				'End If	
						
		SQL = "Add_Inventory_Lodging @Item_ID = '" & Item & "', "
		SQL = SQL & "@Start_Date = '" & Start_Date & "', @End_Date = '" & End_Date & "', "
		SQL = SQL & "@Allocation = '" & Allocated & "', @Alarm = '" & Alarm & "', @Realm = '" & Realm & "', "

		'Net
		If SingleNet = "" Then 
			SQL = SQL & "@Rate_SNGL = Null, "
		Else
			SQL = SQL & "@Rate_SNGL = " & SingleNet & ", "
		End If
			
		If DoubleNet = "" Then
			SQL = SQL & "@Rate_DBL = Null, "
		Else
			SQL = SQL & "@Rate_DBL = " & DoubleNet & ", "
		End If

		If AddlNet = "" Then
			SQL = SQL & "@Rate_Addl = Null, "
		Else
			SQL = SQL & "@Rate_Addl = " & AddlNet & ", "
		End If
			
		If ChildNet = "" Then
			SQL = SQL & "@Rate_Child = Null, "
		Else
			SQL = SQL & "@Rate_Child = " & ChildNet & ", " 	
		End If

		'Club
		If SingleClub = "" Then	
			SQL = SQL & "@Cost_Club_SNGL = Null, "
		Else
			SQL = SQL & "@Cost_Club_SNGL = " & SingleClub & ", "
		End If
					
		If DoubleClub = "" Then
			SQL = SQL & "@Cost_Club_DBL = Null, "
		Else
			SQL = SQL & "@Cost_Club_DBL = " & DoubleClub & ", "
		End If
				
		If AddlClub = "" Then
			SQL = SQL & "@Cost_Club_Addl = Null, "
		Else
			SQL = SQL & "@Cost_Club_Addl = " & AddlClub & ", "
		End If

		If ChildClub = "" Then
			SQL = SQL & "@Cost_Club_Child = Null, "
		Else
			SQL = SQL & "@Cost_Club_Child = " & ChildClub & ", "
		End If

		If SingleWeb = "" Then		
			SQL = SQL & "@Cost_Web_SNGL = Null, "
		Else
			SQL = SQL & "@Cost_Web_SNGL = " & SingleWeb & ", "
		End If
			
		If DoubleWeb = "" Then
			SQL = SQL & "@Cost_Web_DBL = Null, "
		Else
			SQL = SQL & "@Cost_Web_DBL = " & DoubleWeb & ", "
		End If
			
		If AddlWeb = "" Then
			SQL = SQL & "@Cost_Web_Addl = Null, "
		Else
			SQL = SQL & "@Cost_Web_Addl = " & AddlWeb & ", "	
		End If

		If ChildWeb = "" Then
			SQL = SQL & "@Cost_Web_Child = Null, "
		Else
			SQL = SQL & "@Cost_Web_Child = " & ChildWeb & ", "
		End If

		'SingleNet, SingleClub, SingleWeb, SinglePref					
		'DoubleNet, DoubleClub, DoubleWeb, DoublePref
		'AddlNet, AddlClub, AddlWeb, AddlPref
		'ChildNet, ChildClub, ChildWeb, ChildPref	

		If SinglePref = "" Then
			SQL = SQL & "@Cost_Pref_SNGL = Null, "
		Else
			SQL = SQL & "@Cost_Pref_SNGL = " & SinglePref & ", "
		End If

		If DoublePref = "" Then
			SQL = SQL & "@Cost_Pref_DBL = Null, "
		Else
			SQL = SQL & "@Cost_Pref_DBL = " & DoublePref & ", "
		End If
				
		If AddlPref = "" Then
			SQL = SQL & "@Cost_Pref_Addl = Null, "
		Else
			SQL = SQL & "@Cost_Pref_Addl = " & AddlPref & ", "
		End If
				
		If ChildPref = "" Then
			SQL = SQL & "@Cost_Pref_Child = Null "	
		Else
			SQL = SQL & "@Cost_Pref_Child = " & ChildPref & " "	
		End IF				
				'Response.Write SQL & "<BR><BR>"
				Conn.Execute (SQL)
		    Next 
				Response.Write "*******************<BR>"
	    End If
	    ' Linking to the next page
	    If Request.Form("cont") = "1" Then Response.Redirect "default.asp"
	    If Request.Form("cont") = "2" Then Response.Redirect "Default.asp"

	End If
%>
<html>
<STYLE>
BODY {SCROLLBAR-FACE-COLOR: #5e5ebe; SCROLLBAR-HIGHLIGHT-COLOR: #5e5ebe; SCROLLBAR-SHADOW-COLOR: #5e5ebe; SCROLLBAR-3DLIGHT-COLOR: #5e5ebe; SCROLLBAR-ARROW-COLOR:  #6666CC; SCROLLBAR-TRACK-COLOR: #E3E3E3; SCROLLBAR-DARKSHADOW-COLOR: #666666; }
</STYLE>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<script language="JavaScript">
<!--
function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_findObj(n, d) { //v4.0
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && document.getElementById) x=document.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}

function MM_goToURL() { //v3.0
  var i, args=MM_goToURL.arguments; document.MM_returnValue = false;
  for (i=0; i<(args.length-1); i+=2) eval(args[i]+".location='"+args[i+1]+"'");
}

function Sub_Form (cont)
{
  form1.cont.value=cont
  form1.submit();
}
//-->
</script>
<link rel="stylesheet" href="../Style-sheets/manage-menu-bold.css" type="text/css">
<link rel="stylesheet" href="/Style-sheets/headline.css" type="text/css">
<link rel="stylesheet" href="/Style-sheets/galley-text-indent.css" type="text/css">
<link rel="stylesheet" href="/Style-sheets/standard-input-form.css" type="text/css">
</head>

<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" onLoad="MM_preloadImages('images/icon-return-to-main-2.gif','images/icon-submit-changes-2.gif','images/icon-continue-wizard-2.gif')">
<form name="form1" method="post" action="">
<INPUT type="hidden" id=page name=page value="<%=Page%>">
<INPUT type="hidden" id=cont name=cont >
  <table width="525" border="0" cellspacing="0" cellpadding="2" align="center">
    <tr> 
      <td width="338">&nbsp;</td>
      <td align="right" width="187">&nbsp;</td>
    </tr>
    <tr> 
      <td width="338" bgcolor="#5e5ebe" class="headline-ffffff" align="center">ADD NEW Allocations</td>
      <td bgcolor="#5e5ebe" align="right" width="187"><a href="default.asp" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image1','','images/icon-return-to-main-2.gif',1)"><img src="images/icon-return-to-main.gif" width="75" height="17" usemap="#returntomain" border="0" name="Image1"></a></td>
    </tr>
    <% If RSName.EOF Then %>
    <tr> 
      <td class="galley-text-indent-alert" colspan="2">No Entity Selected! Go back and choose a location to edit from the dropdown menu.</td>
    </tr>
    <% Else %>
    <tr> 
      <td class="galley-text-indent" colspan="2"><%=RSName("Name")%> - <%=RSName("City")%>, <%=RSName("State")%>&nbsp; <%=RSName("ZIP")%></td>
    </tr>    
    <% RSName.Close %>
  </table>
  
  <%If ii > 0 Then %>
  <table width="481" border="0" cellspacing="0" cellpadding="2" align="center">
    <%For Count = 1 to Room_Packages %>
    <tr bgcolor="#cccccc"> 
      <td colspan="2" class="manage-menu-bold" height="9"><%Response.Write Room_Type(count)%>       / <%=Amenity(Count)%></td>
    </tr>
      <tr> 
      <td colspan="2" class="manage-menu" height="203" valign="top"> 
        <table width="100%" border="0" cellspacing="0" cellpadding="0">
          <tr align="center" bgcolor="#003399"> 
            <td colspan="3" class="headline-ffffff">
              <table width="100%" border="0" cellspacing="0" cellpadding="0" align="center">
                <tr> 
                  <td width="167" class="headline-ffffff" height="21">Start Date:</td>
                  <td width="246" height="21"> 
                    <select name="Start_Day<%=Count%>" class="input-form-small">
                      <option selected>1</option>
                      <option>2</option>
                      <option>3</option>
                      <option>4</option>
                      <option>5</option>
                      <option>6</option>
                      <option>7</option>
                      <option>8</option>
                      <option>9</option>
                      <option>10</option>
                      <option>11</option>
                      <option>11</option>
                      <option>12</option>
                      <option>13</option>
                      <option>14</option>
                      <option>15</option>
                      <option>16</option>
                      <option>17</option>
                      <option>18</option>
                      <option>19</option>
                      <option>20</option>
                      <option>21</option>
                      <option>22</option>
                      <option>23</option>
                      <option>24</option>
                      <option>25</option>
                      <option>26</option>
                      <option>27</option>
                      <option>28</option>
                      <option>29</option>
                      <option>30</option>
                      <option>31</option>
                    </select>
                    <span class="input-box"> 
                    <select name="Start_Month<%=Count%>" class="input-form-small">
                      <option value="12" selected>December</option>
                      <option value="1">January</option>
                      <option value="2">Feburary</option>
                      <option value="3">march</option>
                      <option value="4">April</option>
                      <option value="5">May</option>
                      <option value="6">June</option>
                      <option value="7">July</option>
                      <option value="8">August</option>
                      <option value="9">Sept</option>
                      <option value="10">October</option>
                      <option value="11">November</option>
                    </select>
                    </span> 
                    <select name="Start_Year<%=Count%>" class="input-form-small">
                      <option selected>2001</option>
                      <option>2002</option>
                      <option>2003</option>
                      <option>2004</option>
                      <option>2005</option>
                    </select>
                  </td>
                  <td width="87" height="21">&nbsp;</td>
                </tr>
                <tr> 
                  <td colspan="3" class="row-space-sm">&nbsp;</td>
                </tr>
                <tr> 
                  <td width="167" class="headline-ffffff">End Date:</td>
                  <td width="246"> 
                    <select name="End_Day<%=Count%>" class="input-form-small">
                      <option selected>1</option>
                      <option>2</option>
                      <option>3</option>
                      <option>4</option>
                      <option>5</option>
                      <option>6</option>
                      <option>7</option>
                      <option>8</option>
                      <option>9</option>
                      <option>10</option>
                      <option>11</option>
                      <option>11</option>
                      <option>12</option>
                      <option>13</option>
                      <option>14</option>
                      <option>15</option>
                      <option>16</option>
                      <option>17</option>
                      <option>18</option>
                      <option>19</option>
                      <option>20</option>
                      <option>21</option>
                      <option>22</option>
                      <option>23</option>
                      <option>24</option>
                      <option>25</option>
                      <option>26</option>
                      <option>27</option>
                      <option>28</option>
                      <option>29</option>
                      <option>30</option>
                      <option>31</option>
                    </select>
                    <select name="End_Month<%=Count%>" class="input-form-small">
                      <option value="12" selected>December</option>
                      <option value="1">January</option>
                      <option value="2">Feburary</option>
                      <option value="3">march</option>
                      <option value="4">April</option>
                      <option value="5">May</option>
                      <option value="6">June</option>
                      <option value="7">July</option>
                      <option value="8">August</option>
                      <option value="9">Sept</option>
                      <option value="10">October</option>
                      <option value="11">November</option>
                    </select>
                    <select name="End_Year<%=Count%>" class="input-form-small">
                      <option selected>2001</option>
                      <option>2002</option>
                      <option>2003</option>
                      <option>2004</option>
                      <option>2005</option>
                    </select>
                  </td>
                  <td width="87">&nbsp;</td>
                </tr>
              </table>
            </td>
          </tr>

    <tr> 
      <td colspan="2" class="manage-menu"  valign="top"> 
        <table width="100%" border="0" cellspacing="0" cellpadding="0">
          <tr align="middle"> 
            <td width="23%" class="manage-menu">Property Total</td>
            <td width="17%" class="manage-menu">Allocated</td>
            <td width="15%" class="manage-menu">Alarm Level</td>
          </tr>
          <tr align="middle"> 
            <td width="23%" class="manage-menu"><font face="Verdana, Arial, Helvetica, sans-serif" size="2"><%=Total_On_Prop(Count)%></font></td>
            <td width="17%"> 
              <input name="Allocated<%=Count%>" size="4" >
            </td>
            <td width="15%"> 
              <input name="Alarm<%=Count%>" size="4" >
            </td>
          </tr>
        </table>
      </tr> 
        
        <table width="100%" border="0" cellspacing="1" cellpadding="0" bgcolor="#cccccc">
          <tr align="middle"> 
            <td class="sm-hdln" width="24%" >&nbsp;</td>
            <td class="sm-hdln" width="16%" >Net</td>
            <td class="sm-hdln" width="15%" >Club</td>
            <td class="sm-hdln" width="19%" >Web</td>
            <td class="sm-hdln" width="26%" >Preferred</td>
          </tr>
          <tr> 
            <td width="24%" class="manage-menu" >Single</td>
            <td width="16%" class="input-box" align="middle" > 
              <input name="SingleNet<%=Count%>" size="5" class="input-box" >
            </td>
            <td width="15%" class="input-box" align="middle" > 
              <input name="SingleClub<%=Count%>" size="5" class="input-box" >
            </td>
            <td width="19%" class="input-box" align="middle" > 
              <input name="SingleWeb<%=Count%>" size="5" class="input-box" >
            </td>
            <td width="26%" class="input-box" align="middle" > 
              <input name="SinglePref<%=Count%>" size="5" class="input-box" >
            </td>
          </tr>
          <tr> 
            <td width="24%" class="manage-menu" >DBL</td>
            <td width="16%" class="input-box" align="middle" > 
              <input name="DoubleNet<%=Count%>" size="5" class="input-box" >
            </td>
            <td width="15%" class="input-box" align="middle" > 
              <input name="DoubleClub<%=Count%>" size="5" class="input-box" >
            </td>
            <td width="19%" class="input-box" align="middle" > 
              <input name="DoubleWeb<%=Count%>" size="5" class="input-box" >
            </td>
            <td width="26%" class="input-box" align="middle" > 
              <input name="DoublePref<%=Count%>" size="5" class="input-box" >
            </td>
          </tr>
          <tr> 
            <td width="24%" class="manage-menu" >Add'l</td>
            <td width="16%" class="input-box" align="middle" > 
              <input name="AddlNet<%=Count%>" size="5" class="input-box" >
            </td>
            <td width="15%" class="input-box" align="middle" > 
              <input name="AddlClub<%=Count%>" size="5" class="input-box" >
            </td>
            <td width="19%" class="input-box" align="middle" > 
              <input name="AddlWeb<%=Count%>" size="5" class="input-box" >
            </td>
            <td width="26%" class="input-box" align="middle" > 
              <input name="AddlPref<%=Count%>" size="5" class="input-box" >
            </td>
          </tr>
          <tr> 
            <td width="24%" class="manage-menu" >Child</td>
            <td width="16%" class="input-box" align="middle" > 
              <input name="ChildNet<%=Count%>" size="5" class="input-box" >
            </td>
            <td width="15%" class="input-box" align="middle" > 
              <input name="ChildClub<%=Count%>" size="5" class="input-box" >
            </td>
            <td width="19%" class="input-box" align="middle" > 
              <input name="ChildWeb<%=Count%>" size="5" class="input-box" >
            </td>
            <td width="26%" class="input-box" align="middle" > 
              <input name="ChildPref<%=Count%>" size="5" class="input-box" >
            </td>
          </tr>
        </table>
      <P>&nbsp;</P>
      </td>
    </tr>
    <%Next%>
  </table>
  <% Else  %>
    <table width="481" border="0" cellspacing="0" cellpadding="2" align="center">
      <tr> 
		<td class="galley-text-indent-alert" colspan="2" ><CENTER>Property Has No Rooms Assigned! Please Go back and Create Room Definitions for this Property.</CENTER></td>
	  </tr>
	</table>
  <% End If 'End of Checking for RS1.EOF %>
  <% End If 'End of check if Entity Selected%>  
  
  <table width="525" border="0" cellspacing="0" cellpadding="0" align="center">
    <tr bgcolor="#5e5ebe"> 
		<td align="right" width="49%" bgcolor="#5e5ebe">
			<a href="javascript:Sub_Form('1');" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('submitchanges','','images/icon-submit-changes-2.gif',1)">
				<img src="images/icon-submit-changes.gif" width="200" height="15" name="submitchanges" border="0">
			</a>
		</td>
		<td width="51%">
			<a href="javascript:Sub_Form('2');" onmouseover="MM_swapImage('Image2','','images/icon-continue-wizard-2.gif',1)"  onmouseout=MM_swapImgRestore()>
				<img src="images/icon-continue-wizard.gif" width="150" height="15" usemap="#continue" border="0" name="Image2">
			</a>
		  </td>
	</tr>
  <tr> 
    <td width="49%">&nbsp;</td>
    <td width="51%">&nbsp;</td>
  </tr>
</table>
</form>
</body>
</html>
<%
Set Conn = Nothing
%>