<%	
Dim Page 
Page = "1"

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)



If (UCase(Request.ServerVariables("REQUEST_METHOD")) = "POST" And Request.Form("page") = Page) Then
	Dim i, Form_String, Sub_String
	Dim SQL
	
	Form_String = Split(Request.Form, "&", -1)

    i=2
    Do while i < (Request.Form.Count)
    SQL = "Update_Attribute '" & Session("Admin_Group_ID") & "','"
    Sub_String = Split(Form_String(i), "=", -1)
    'If Not (Sub_String(1) = "") Then
    SQL = SQL & Sub_String(0) & "','" & Sub_String(1) & "', '1'"
    Conn.Execute (SQL)
    Response.Write SQL & "<br>"
    'End If
    i=i+1
    Loop 


'	For each item In Request.Form
'	 If UCase(Mid(item,1,4)) = "ATT_" Then
'	  'Response.Write "item: " & item & "<br>"     
'      For each value In Request.Form(item)
'		SQL = "Update_Attribute '" & Session("Admin_Group_ID") & "','" & Mid(item, 5, Len(item) - 4) & "','" & value & "','" & Page & "'"
'		Conn.Execute(SQL)
'		'Response.Write SQL & "<br>"	
'	    'Response.Write "value: " & value & "<br>"     		
'      Next
'     End If
'	Next
    
    If Request.Form("cont") = "1" Then Response.Redirect "default.asp"
    'If Request.Form("cont") = "2" Then Response.Redirect "business-services-admin.asp"

End If

Function Att_Text(Att_ID)

	Dim SQLRetrieve, RSRetrieve
	SQLRetrieve = "Select * from Att_Group_Map Where [Group_ID] = '" & Session("Admin_Group_ID") & "' And [Att_ID]='" & Att_ID & "'"
	Set RSRetrieve = Conn.Execute(SQLRetrieve)

	If Not RSRetrieve.EOF Then
		Att_Text = RSRetrieve("Variable")	
	End If

End Function

Function Att_Checkbox(Att_ID)

	Dim SQLRetrieve, RSRetrieve
	SQLRetrieve = "Select * from Att_Group_Map Where [Group_ID] = '" & Session("Admin_Group_ID") & "' And [Att_ID]='" & Att_ID & "'"
	Set RSRetrieve = Conn.Execute(SQLRetrieve)

	If Not RSRetrieve.EOF Then
		If UCase(RSRetrieve("Variable")) = "TRUE" Then
			Att_Checkbox = "checked"
		End If
	End If

End Function

%>


<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">
<link rel="stylesheet" href="../Style-sheets/standard-input-form.css" type="text/css">
<script language="JavaScript">
<!--

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_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_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 Sub_Form(cont) {
form1.cont.value=cont
form1.submit();
}

//-->
</script>
<link rel="stylesheet" href="/Style-sheets/headline.css" type="text/css">
<link rel="stylesheet" href="/Style-sheets/galley-text-indent.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="" id=form1>
<INPUT type="hidden" id=page name=page value="<%=Page%>">
<INPUT type="hidden" id=cont name=cont value="">
  <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">Lodging Features</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 Not RSName.EOF Then %>
    <tr> 
      <td class="galley-text-indent" colspan="2"><%=RSName("Name")%> - <%=RSName("City")%>, 
        <%=RSName("State")%>&nbsp; <%=RSName("ZIP")%></td>
    </tr>
    <% Else %>
    <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>
    <% End If %>
    <% RSName.Close %>
  </table>

  <table width="500" border="0" cellspacing="0" cellpadding="0" align="center">
    <tr> 
      <td width="284" class="manage-menu">Total Guest Rooms </td>
      <td class="manage-menu" width="203"> 
        <input type="text" name="503" size="4" value="<%=Att_Text(503)%>">
        Enter total rooms</td>
    </tr>
    <tr> 
      <td width="284" class="manage-menu" height="5">Total Floors</td>
      <td width="203" class="manage-menu" height="5"> 
        <input type="text" name="504"  maxlength="4" size="2" value="<%=Att_Text(504)%>">
        Enter total floors</td>
    </tr>
    <tr> 
      <td width="284" class="manage-menu">Elevators</td>
      <td width="203" class="manage-menu"> 
        <input type="checkbox" name="154" value="True" <%=Att_Checkbox(154)%>>
        Yes </td>
    </tr>
    <tr> 
      <td width="284" class="manage-menu">Exterior Corridors</td>
      <td width="203" class="manage-menu"> 
        <input type="checkbox" name="163" value="True" <%=Att_Checkbox(163)%>>
        Yes </td>
    </tr>
    <tr> 
      <td width="284" class="manage-menu">Interior Corridors</td>
      <td width="203" class="manage-menu"> 
        <input type="checkbox" name="237" value="True" <%=Att_Checkbox(237)%>>
        Yes </td>
    </tr>
    <tr> 
      <td width="284" class="manage-menu">Ice machine(s)</td>
      <td width="203" class="manage-menu"> 
        <input type="checkbox" name="227" value="True" <%=Att_Checkbox(227)%>>
        Yes </td>
    </tr>
    <tr> 
      <td width="284" class="manage-menu">Handicap Rooms / Facilities</td>
      <td width="203" class="manage-menu"> 
        <input type="checkbox" name="213" value="True" <%=Att_Checkbox(213)%>>
        Yes </td>
    </tr>
<!--    <tr> 
      <td width="284" class="manage-menu">Handicap facilities</td>
      <td width="203" class="manage-menu"> 
        <input type="checkbox" name="212" value="True">
        Yes </td>
    </tr>
-->    
    <tr> 
      <td width="284" class="manage-menu">Guest Laundry</td>
      <td width="203" class="manage-menu"> 
        <input type="checkbox" name="201" value="True" <%=Att_Checkbox(201)%>>
        Yes </td>
    </tr>
    <tr> 
      <td width="284" class="manage-menu">Video Game Room</td>
      <td width="203" class="manage-menu"> 
        <input type="checkbox" name="478" value="True" <%=Att_Checkbox(478)%>>
        Yes </td>
    </tr>
    <tr> 
      <td width="284" class="manage-menu">Front Desk Safety Deposit Boxes</td>
      <td width="203" class="manage-menu"> 
        <input type="checkbox" name="390" value="True" <%=Att_Checkbox(390)%>>
        Yes </td>
    </tr>
    <tr> 
      <td width="284" class="manage-menu">Concierge Desk</td>
      <td width="203" class="manage-menu"> 
        <input type="checkbox" name="112" value="True" <%=Att_Checkbox(112)%>>
        Yes </td>
    </tr>
    <tr> 
      <td width="284" class="manage-menu">Computer Center</td>
      <td width="203" class="manage-menu"> 
        <input type="checkbox" name="108" value="True" <%=Att_Checkbox(108)%>>
        Yes </td>
    </tr>
    <tr> 
      <td width="284" class="manage-menu">Children's Playground</td>
      <td width="203" class="manage-menu"> 
        <input type="checkbox" name="92" value="True" <%=Att_Checkbox(92)%>>
        Yes </td>
    </tr>
    <!--<tr> 
      <td width="284" class="manage-menu"> Bar-B-Que facilities</td>
      <td width="203" class="manage-menu"> 
        <input type="checkbox" name="51" value="True">
        Yes </td>
    </tr>
    <tr> 
      <td width="284" class="manage-menu">Bike Trails</td>
      <td width="203" class="manage-menu"> 
        <input type="checkbox" name="66" value="True">
        Yes </td>
    </tr>-->
    <tr> 
      <td width="284" class="manage-menu">Recently Renovated</td>
      <td width="203" class="manage-menu"> 
        <input type="checkbox" name="368" value="True" <%=Att_Checkbox(368)%>>
        Yes </td>
    </tr>
    <tr> 
      <td width="284" class="manage-menu">Casino</td>
      <td width="203" class="manage-menu"> 
        <input type="checkbox" name="89" value="True" <%=Att_Checkbox(89)%>>
        Yes </td>
    </tr>
    <tr> 
      <td width="284" class="manage-menu">Car Rental Desk</td>
      <td width="203" class="manage-menu"> 
        <input type="checkbox" name="87" value="True" <%=Att_Checkbox(87)%>>
        Yes </td>
    </tr>
    <tr> 
      <td width="284" class="manage-menu">Truck/RV Parking</td>
      <td width="203" class="manage-menu"> 
        <input type="checkbox" name="387" value="True" <%=Att_Checkbox(387)%>>
        Yes </td>
    </tr>
    <tr> 
      <td width="284" class="manage-menu">Sprinkler System Throughout</td>
      <td width="203" class="manage-menu"> 
        <input type="checkbox" name="429" value="True" <%=Att_Checkbox(429)%>>
        Yes </td>
    </tr>
  </table>
  <table width="525" border="0" cellspacing="0" cellpadding="0" align="center">
    <tr bgcolor="#5e5ebe
"> 
      <td align="right" width="326"><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="336"><a href="javascript:Sub_Form('2');" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image2','','images/icon-continue-wizard-2.gif',1)"><img src="images/icon-continue-wizard.gif" width="150" height="15" usemap="#continue" border="0" name="Image2"></a></td>
    </tr>
    <tr> 
      <td width="326"></td>
      <td width="336">&nbsp;
    </tr>
  </table>
</form>
</body>
</html>
