%@LANGUAGE="JAVASCRIPT" CODEPAGE="1252"%>
<%
var GONE__MMColParam = "A";
if (String(Request("MM_EmptyValue")) != "undefined" &&
String(Request("MM_EmptyValue")) != "") {
GONE__MMColParam = String(Request("MM_EmptyValue"));
}
%>
<%
var GONE = Server.CreateObject("ADODB.Recordset");
GONE.ActiveConnection = MM_ToCBL_STRING;
GONE.Source = "SELECT * FROM WEBDEV.TBLCBL WHERE PUBLISH = '"+ GONE__MMColParam.replace(/'/g, "''") + "' ORDER BY DATED DESC";
GONE.CursorType = 0;
GONE.CursorLocation = 2;
GONE.LockType = 1;
GONE.Open();
var GONE_numRows = 0;
%>
<%
var Repeat1__numRows = 5;
var Repeat1__index = 0;
GONE_numRows += Repeat1__numRows;
%>
<%
// *** Recordset Stats, Move To Record, and Go To Record: declare stats variables
// set the record count
var GONE_total = GONE.RecordCount;
// set the number of rows displayed on this page
if (GONE_numRows < 0) { // if repeat region set to all records
GONE_numRows = GONE_total;
} else if (GONE_numRows == 0) { // if no repeat regions
GONE_numRows = 1;
}
// set the first and last displayed record
var GONE_first = 1;
var GONE_last = GONE_first + GONE_numRows - 1;
// if we have the correct record count, check the other stats
if (GONE_total != -1) {
GONE_numRows = Math.min(GONE_numRows, GONE_total);
GONE_first = Math.min(GONE_first, GONE_total);
GONE_last = Math.min(GONE_last, GONE_total);
}
%>
<%
// *** Recordset Stats: if we don't know the record count, manually count them
if (GONE_total == -1) {
// count the total records by iterating through the recordset
for (GONE_total=0; !GONE.EOF; GONE.MoveNext()) {
GONE_total++;
}
// reset the cursor to the beginning
if (GONE.CursorType > 0) {
if (!GONE.BOF) GONE.MoveFirst();
} else {
GONE.Requery();
}
// set the number of rows displayed on this page
if (GONE_numRows < 0 || GONE_numRows > GONE_total) {
GONE_numRows = GONE_total;
}
// set the first and last displayed record
GONE_last = Math.min(GONE_first + GONE_numRows - 1, GONE_total);
GONE_first = Math.min(GONE_first, GONE_total);
}
%>
<% var MM_paramName = ""; %>
<%
// *** Move To Record and Go To Record: declare variables
var MM_rs = GONE;
var MM_rsCount = GONE_total;
var MM_size = GONE_numRows;
var MM_uniqueCol = "";
MM_paramName = "";
var MM_offset = 0;
var MM_atTotal = false;
var MM_paramIsDefined = (MM_paramName != "" && String(Request(MM_paramName)) != "undefined");
%>
<%
// *** Move To Record: handle 'index' or 'offset' parameter
if (!MM_paramIsDefined && MM_rsCount != 0) {
// use index parameter if defined, otherwise use offset parameter
r = String(Request("index"));
if (r == "undefined") r = String(Request("offset"));
if (r && r != "undefined") MM_offset = parseInt(r);
// if we have a record count, check if we are past the end of the recordset
if (MM_rsCount != -1) {
if (MM_offset >= MM_rsCount || MM_offset == -1) { // past end or move last
if ((MM_rsCount % MM_size) != 0) { // last page not a full repeat region
MM_offset = MM_rsCount - (MM_rsCount % MM_size);
} else {
MM_offset = MM_rsCount - MM_size;
}
}
}
// move the cursor to the selected record
for (var i=0; !MM_rs.EOF && (i < MM_offset || MM_offset == -1); i++) {
MM_rs.MoveNext();
}
if (MM_rs.EOF) MM_offset = i; // set MM_offset to the last possible record
}
%>
<%
// *** Move To Record: if we dont know the record count, check the display range
if (MM_rsCount == -1) {
// walk to the end of the display range for this page
for (var i=MM_offset; !MM_rs.EOF && (MM_size < 0 || i < MM_offset + MM_size); i++) {
MM_rs.MoveNext();
}
// if we walked off the end of the recordset, set MM_rsCount and MM_size
if (MM_rs.EOF) {
MM_rsCount = i;
if (MM_size < 0 || MM_size > MM_rsCount) MM_size = MM_rsCount;
}
// if we walked off the end, set the offset based on page size
if (MM_rs.EOF && !MM_paramIsDefined) {
if ((MM_rsCount % MM_size) != 0) { // last page not a full repeat region
MM_offset = MM_rsCount - (MM_rsCount % MM_size);
} else {
MM_offset = MM_rsCount - MM_size;
}
}
// reset the cursor to the beginning
if (MM_rs.CursorType > 0) {
if (!MM_rs.BOF) MM_rs.MoveFirst();
} else {
MM_rs.Requery();
}
// move the cursor to the selected record
for (var i=0; !MM_rs.EOF && i < MM_offset; i++) {
MM_rs.MoveNext();
}
}
%>
<%
// *** Move To Record: update recordset stats
// set the first and last displayed record
GONE_first = MM_offset + 1;
GONE_last = MM_offset + MM_size;
if (MM_rsCount != -1) {
GONE_first = Math.min(GONE_first, MM_rsCount);
GONE_last = Math.min(GONE_last, MM_rsCount);
}
// set the boolean used by hide region to check if we are on the last record
MM_atTotal = (MM_rsCount != -1 && MM_offset + MM_size >= MM_rsCount);
%>
<%
// *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters
// create the list of parameters which should not be maintained
var MM_removeList = "&index=";
if (MM_paramName != "") MM_removeList += "&" + MM_paramName.toLowerCase() + "=";
var MM_keepURL="",MM_keepForm="",MM_keepBoth="",MM_keepNone="";
// add the URL parameters to the MM_keepURL string
for (var items=new Enumerator(Request.QueryString); !items.atEnd(); items.moveNext()) {
var nextItem = "&" + items.item().toLowerCase() + "=";
if (MM_removeList.indexOf(nextItem) == -1) {
MM_keepURL += "&" + items.item() + "=" + Server.URLencode(Request.QueryString(items.item()));
}
}
// add the Form variables to the MM_keepForm string
for (var items=new Enumerator(Request.Form); !items.atEnd(); items.moveNext()) {
var nextItem = "&" + items.item().toLowerCase() + "=";
if (MM_removeList.indexOf(nextItem) == -1) {
MM_keepForm += "&" + items.item() + "=" + Server.URLencode(Request.Form(items.item()));
}
}
// create the Form + URL string and remove the intial '&' from each of the strings
MM_keepBoth = MM_keepURL + MM_keepForm;
if (MM_keepBoth.length > 0) MM_keepBoth = MM_keepBoth.substring(1);
if (MM_keepURL.length > 0) MM_keepURL = MM_keepURL.substring(1);
if (MM_keepForm.length > 0) MM_keepForm = MM_keepForm.substring(1);
%>
<%
// *** Move To Record: set the strings for the first, last, next, and previous links
var MM_moveFirst="",MM_moveLast="",MM_moveNext="",MM_movePrev="";
var MM_keepMove = MM_keepBoth; // keep both Form and URL parameters for moves
var MM_moveParam = "index";
// if the page has a repeated region, remove 'offset' from the maintained parameters
if (MM_size > 1) {
MM_moveParam = "offset";
if (MM_keepMove.length > 0) {
params = MM_keepMove.split("&");
MM_keepMove = "";
for (var i=0; i < params.length; i++) {
var nextItem = params[i].substring(0,params[i].indexOf("="));
if (nextItem.toLowerCase() != MM_moveParam) {
MM_keepMove += "&" + params[i];
}
}
if (MM_keepMove.length > 0) MM_keepMove = MM_keepMove.substring(1);
}
}
// set the strings for the move to links
if (MM_keepMove.length > 0) MM_keepMove = Server.HTMLEncode(MM_keepMove) + "&";
var urlStr = Request.ServerVariables("URL") + "?" + MM_keepMove + MM_moveParam + "=";
MM_moveFirst = urlStr + "0";
MM_moveLast = urlStr + "-1";
MM_moveNext = urlStr + (MM_offset + MM_size);
MM_movePrev = urlStr + Math.max(MM_offset - MM_size,0);
%>
Listed
below are properties that
HAVE ALREADY BEEN ALLOCATED via
Dartford's Choice Based Lettings Scheme. The date that the successful applicants applied for housing together with their Bands are shown
for reference.
There are <%=(GONE_total)%> properties listed here in
total. On this page you can view
<%=(GONE_first)%> to <%=(GONE_last)%> of
<%=(GONE_total)%>
<% while ((Repeat1__numRows-- != 0) && (!GONE.EOF)) { %>
| Property Number |
<%=(GONE.Fields.Item("PROPREF").Value)%> |
| Property |
<%=(GONE.Fields.Item("PROPERTY").Value)%> |
| Successful
Band |
<%=(GONE.Fields.Item("ACTUALBAND").Value)%> |
| Date Property Advertised |
<%=(GONE.Fields.Item("ADVERTISED").Value)%> |
| Years On List |
<%=(GONE.Fields.Item("YEARS").Value)%> |
| Number Of Applications Received |
<%=(GONE.Fields.Item("NO_APPS").Value)%> |
| Date Applicant Applied for Housing |
<%=(GONE.Fields.Item("APPDATE").Value)%> |
<%
Repeat1__index++;
GONE.MoveNext();
}
%>
<% if (MM_offset != 0) { %>
First Page :
<% } // end MM_offset != 0 %>
<% if (MM_offset != 0) { %>
Previous Page :
<% } // end MM_offset != 0 %>
<% if (!MM_atTotal) { %>
Next Page :
<% } // end !MM_atTotal %>
<% if (!MM_atTotal) { %>
Last Page
<% } // end !MM_atTotal %>
<%
GONE.Close();
%>