My short/long display mod in my database has suddently stopped working and I don't have a recent backup.
If I click on "view more" where it shows all of the results it only shows the first one at the top of the short listing no matter what "view more" link I click on.
Here are the assoicated procedures:
---
sub html_results_dealer {
my (%rec) = @_;
1 while $rec{'Price'} =~ s/(\d)(\d{3})\b/$1,$2/; # add commas
$rec{'Price'} = "\$" . $rec{'Price'}; # Add dollar sign
# create link to full display
$record_number = ((($nh - 1) * $db_max_hits) + $i);
$long_url = $ENV{'QUERY_STRING'};
$long_url =~ s/\&nh=\d+//;
$long_url =~ s/\&mh=\d+//;
$long_url = "$db_script_url?$long_url&nh=$record_number&mh=1";
if ($columncountresults == 1) {
print qq|
<body bgcolor="#000000" text="#FFFFFF" link="#FFFFFF" vlink="#FFFFFF" alink="#FF0000">
<div align="center">
<table width="600" border="0" cellspacing="0" cellpadding="0">
<tr valign="top">
<td height="10" align="right">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr valign="bottom">
<td width="16"><a href="http://www.ecomsystems.net.nz/imvda/db.cgi?db=item&uid=default&view_search=1"><img src="images/b_login_ta.gif" width="16" height="16" name="bd_login" border="0"></a>
<img src="images/transparent.gif" width="16" height="2" name="spacer"></td>
<td><a href="http://www.ecomsystems.net.nz/imvda1/db.cgi?db=item&uid=default&view_search=1"><img src="images/b_logoff_t.gif" width="162" height="7" name="b_login" border="0"></a>
<img src="images/transparent.gif" width="100" height="3" name="spacer"></td>
<td align="right"><img src="images/inx_welcome.gif" width="294" height="7" name="welcome">
<img src="images/transparent.gif" width="294" height="3" name="spacer"></td>
</tr>
</table>
</td>
</tr>
<tr>
<td><img src="images/white.gif" width="600" height="1" name="line_1"></td>
</tr>
<tr>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0" background="images/h_dealerlogin.jpg" height="49">
<tr>
<td width="100%" valign="bottom"><font face="Arial, Helvetica, sans-serif"><b><img src="images/t_stocklist.gif" width="282" height="20"></b></font></td>
<td align="right" nowrap><img src="images/logo.gif" width="109" height="40" name="logo"></td>
</tr>
</table>
</td>
</tr>
<tr>
<td><img src="images/white.gif" width="600" height="1" name="line_2"></td>
</tr>
<tr>
<td> <img src="images/transparent.gif" width="599" height="7" name="spacer"><img src="images/white.gif" width="1" height="7">
<table width="600" border="0" cellspacing="0" cellpadding="0">
<tr valign="top">
<td width="100%">
<div align="justify"><font size="3" face="Verdana, Arial, Helvetica, sans-serif"><b><font color="#999999"><font color="#CCCCCC">
</font></font></b></font><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<font size="2" color="#FFFFFF">
|;
if ($db_userid eq "default") {
print qq|
The following vehicles match your search criteria...
|;
}
else {
print qq|
<b><font size="3" face="Arial, Helvetica, sans-serif">Current $db_userid Listing</b></font>
<font size="2" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">
Below is a list of the current stock you have listed in the IMVDA Vehicle Search System. To view the full details of a vehicle select the assoicated 'VIEW' button.</font>
|;
}
print qq|
</font>
</font>
<table width="100%" border="0" cellspacing="0" cellpadding="4">
<tr bgcolor="#282428">
<td width="20%"><b><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">MAKE</font></b></td>
<td width="20%"><b><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">MODEL</font></b></td>
<td width="20%"><b><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">YEAR</font></b></td>
<td width="20%"><b><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">COLOUR</font></b></td>
<td width="20%"><b><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">PRICE</font></b></td>
<td align="center" width="20%"><b><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">MORE
INFO </font></b></td>
</tr>
|;
$columncountresults = 2;
}
print qq|
<tr>
<td width="20%"><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF"></b>$rec{'Make'}</font></td>
<td width="20%"><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">$rec{'Model'}</font></td>
<td width="20%"><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">$rec{'Year'}</font></td>
<td width="20%"><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">$rec{'Colour'}</font></td>
<td width="20%"><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">$rec{'Price'}</font></td>
<td align="center" width="20%"><a href="$long_url"><img src="images/b_view.gif" width="67" height="17" border="0"></a></td>
</tr>
|;
}
sub html_view_success {
# --------------------------------------------------------
# This page displays the results of a successful search.
# You can use the following variables when displaying your
# results:
#
# $numhits - the number of hits in this batch of results.
# $maxhits - the max number of hits displayed.
# $db_total_hits - the total number of hits.
# $db_next_hits - html for displaying the next set of results.
#
my (@hits) = @_;
my ($numhits) = ($#hits+1) / ($#db_cols+1);
my ($maxhits); $in{'mh'} ? ($maxhits = $in{'mh'}) : ($maxhits = $db_max_hits);
$in{'nh'} ? ($nh = $in{'nh'}) : ($nh = 1);
$page_title = "Search Results";
&html_print_headers;
&html_page_top;
# Go through each hit and convert the array to hash and send to
# html_record for printing.
if (($db_total_hits == 1) || ($maxhits == 1)) {
&html_record_long(&array_to_hash(0, @hits));
}
else {
$i = 1;
for (0 .. $numhits - 1) {
if ($per_add)
{
&html_results_dealer (&array_to_hash($_, @hits));
}
else {
&html_record (&array_to_hash($_, @hits));
++$i; }
}
print qq|
</table>
</div>
</td>
<td align="right">
<p>
|;
if ($db_userid eq "default") {
print qq|
<a href="index.html"><img src="images/b_home.gif" width="97" height="17" border="0" name="b_home"></a><img src="images/bd_1.gif" width="17" height="17" name="bd_home">
<img src="images/transparent.gif" width="140" height="7" name="spacer">
|;
}
else {
print qq|
<td align="right"> <a href="$db_script_link?db=item&uid=$db_uid&view_records=1&UserID=$db_userid"><img src="images/b_viewlisting.gif" width="97" height="17" border="0" name="b_view"></a><img src="images/bd_1.gif" width="17" height="17" name="bd_view">
<img src="images/transparent.gif" width="140" height="7" name="spacer">
<a href="$db_script_url?db=item&uid=$db_uid&add_form=1"><img src="images/b_addvehicle.gif" width="97" height="17" border="0" name="b_add"></a><img src="images/bd_1.gif" width="17" height="17" name="bd_add">
<img src="images/transparent.gif" width="140" height="7" name="spacer">
<a href="$db_script_url?db=item&uid=$db_uid&modify_form=1&UserID=$db_userid"><img src="images/b_editvehicle.gif" width="97" height="17" border="0" name="b_edit"></a><img src="images/bd_1.gif" width="17" height="17" name="bd_edit">
<img src="images/transparent.gif" width="140" height="7" name="spacer">
<a href="$db_script_url?db=item&uid=$db_uid&delete_form=1&UserID=$db_userid"><img src="images/b_deletevehicle.gif" width="97" height="17" border="0" name="b_delete"></a><img src="images/bd_1.gif" width="17" height="17" name="bd_deletedealer">
<img src="images/transparent.gif" width="140" height="7" name="spacer">
<a href="$db_script_url?db=item&uid=$db_uid&help=1"><img src="images/b_help.gif" width="97" height="17" border="0" name"></a><img src="images/bd_1.gif" width="17" height="17" name="bd_help">
<img src="images/transparent.gif" width="120" height="7" name="spacer">
<a href="$db_script_url?db=item&uid=$db_uid&loghome=1"><img src="images/b_exit.gif" width="97" height="17" name="b_exit" border="0"></a><img src="images/bd_1.gif" width="17" height="17" name="bd_exit">
<img src="images/transparent.gif" width="120" height="7" name="spacer"></td>
<td align="right"><img src="images/white.gif" width="1" height="129"></td>
|;
}
print qq|
</td>
<td align="right"><img src="images/white.gif" width="1" height="9"></td>
</tr>
</table>
</td>
</tr>
<tr>
<td>
|;
if ($db_userid eq "default")
{
print qq|
<font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">
<P Align=center>
<a href="notworking.html">Home</a>
|;
}
else
{
print qq|
<font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">
<P Align=center>
<a href="$db_script_link?db=item&uid=$db_uid&view_records=1&UserID=$db_userid">View Listing</a> -
<a href="$db_script_url?db=item&uid=$db_uid&add_form=1">Add Vehicle</a> -
<a href="$db_script_url?db=item&uid=$db_uid&modify_form=1&UserID=$db_userid">Edit Vehicle</a> -
<a href="$db_script_url?db=item&uid=$db_uid&delete_form=1&UserID=$db_userid">Delete Vehicle</a> -
<a href="$db_script_url?db=item&uid=$db_uid&help=1">Online Help</a> -
<a href="$db_script_url?db=item&uid=$db_uid&loghome=1">Exit Stocklist</a>
|;
}
print qq|
<a href="#top"><img name="b_top" border="0" src="images/bd_top.gif" width="20" height="20" align="right" vspace="0" hspace="0"></a><font size="3" face="Verdana, Arial, Helvetica, sans-serif" color="#585458"><b><img src="images/transparent.gif" width="50" height="19" name="spacer"></b></font>
<img src="images/white.gif" width="580" height="1" name="line_3"></td>
</tr>
</table>
</div>
|;
if ($db_next_hits) { print "
<$font>Pages: $db_next_hits</font>";}
}
}
--
I will need this back up and running ASAP. Can someone please please please help me with this ASAP.
If I click on "view more" where it shows all of the results it only shows the first one at the top of the short listing no matter what "view more" link I click on.
Here are the assoicated procedures:
---
sub html_results_dealer {
my (%rec) = @_;
1 while $rec{'Price'} =~ s/(\d)(\d{3})\b/$1,$2/; # add commas
$rec{'Price'} = "\$" . $rec{'Price'}; # Add dollar sign
# create link to full display
$record_number = ((($nh - 1) * $db_max_hits) + $i);
$long_url = $ENV{'QUERY_STRING'};
$long_url =~ s/\&nh=\d+//;
$long_url =~ s/\&mh=\d+//;
$long_url = "$db_script_url?$long_url&nh=$record_number&mh=1";
if ($columncountresults == 1) {
print qq|
<body bgcolor="#000000" text="#FFFFFF" link="#FFFFFF" vlink="#FFFFFF" alink="#FF0000">
<div align="center">
<table width="600" border="0" cellspacing="0" cellpadding="0">
<tr valign="top">
<td height="10" align="right">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr valign="bottom">
<td width="16"><a href="http://www.ecomsystems.net.nz/imvda/db.cgi?db=item&uid=default&view_search=1"><img src="images/b_login_ta.gif" width="16" height="16" name="bd_login" border="0"></a>
<img src="images/transparent.gif" width="16" height="2" name="spacer"></td>
<td><a href="http://www.ecomsystems.net.nz/imvda1/db.cgi?db=item&uid=default&view_search=1"><img src="images/b_logoff_t.gif" width="162" height="7" name="b_login" border="0"></a>
<img src="images/transparent.gif" width="100" height="3" name="spacer"></td>
<td align="right"><img src="images/inx_welcome.gif" width="294" height="7" name="welcome">
<img src="images/transparent.gif" width="294" height="3" name="spacer"></td>
</tr>
</table>
</td>
</tr>
<tr>
<td><img src="images/white.gif" width="600" height="1" name="line_1"></td>
</tr>
<tr>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0" background="images/h_dealerlogin.jpg" height="49">
<tr>
<td width="100%" valign="bottom"><font face="Arial, Helvetica, sans-serif"><b><img src="images/t_stocklist.gif" width="282" height="20"></b></font></td>
<td align="right" nowrap><img src="images/logo.gif" width="109" height="40" name="logo"></td>
</tr>
</table>
</td>
</tr>
<tr>
<td><img src="images/white.gif" width="600" height="1" name="line_2"></td>
</tr>
<tr>
<td> <img src="images/transparent.gif" width="599" height="7" name="spacer"><img src="images/white.gif" width="1" height="7">
<table width="600" border="0" cellspacing="0" cellpadding="0">
<tr valign="top">
<td width="100%">
<div align="justify"><font size="3" face="Verdana, Arial, Helvetica, sans-serif"><b><font color="#999999"><font color="#CCCCCC">
</font></font></b></font><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<font size="2" color="#FFFFFF">
|;
if ($db_userid eq "default") {
print qq|
The following vehicles match your search criteria...
|;
}
else {
print qq|
<b><font size="3" face="Arial, Helvetica, sans-serif">Current $db_userid Listing</b></font>
<font size="2" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">
Below is a list of the current stock you have listed in the IMVDA Vehicle Search System. To view the full details of a vehicle select the assoicated 'VIEW' button.</font>
|;
}
print qq|
</font>
</font>
<table width="100%" border="0" cellspacing="0" cellpadding="4">
<tr bgcolor="#282428">
<td width="20%"><b><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">MAKE</font></b></td>
<td width="20%"><b><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">MODEL</font></b></td>
<td width="20%"><b><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">YEAR</font></b></td>
<td width="20%"><b><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">COLOUR</font></b></td>
<td width="20%"><b><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">PRICE</font></b></td>
<td align="center" width="20%"><b><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">MORE
INFO </font></b></td>
</tr>
|;
$columncountresults = 2;
}
print qq|
<tr>
<td width="20%"><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF"></b>$rec{'Make'}</font></td>
<td width="20%"><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">$rec{'Model'}</font></td>
<td width="20%"><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">$rec{'Year'}</font></td>
<td width="20%"><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">$rec{'Colour'}</font></td>
<td width="20%"><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">$rec{'Price'}</font></td>
<td align="center" width="20%"><a href="$long_url"><img src="images/b_view.gif" width="67" height="17" border="0"></a></td>
</tr>
|;
}
sub html_view_success {
# --------------------------------------------------------
# This page displays the results of a successful search.
# You can use the following variables when displaying your
# results:
#
# $numhits - the number of hits in this batch of results.
# $maxhits - the max number of hits displayed.
# $db_total_hits - the total number of hits.
# $db_next_hits - html for displaying the next set of results.
#
my (@hits) = @_;
my ($numhits) = ($#hits+1) / ($#db_cols+1);
my ($maxhits); $in{'mh'} ? ($maxhits = $in{'mh'}) : ($maxhits = $db_max_hits);
$in{'nh'} ? ($nh = $in{'nh'}) : ($nh = 1);
$page_title = "Search Results";
&html_print_headers;
&html_page_top;
# Go through each hit and convert the array to hash and send to
# html_record for printing.
if (($db_total_hits == 1) || ($maxhits == 1)) {
&html_record_long(&array_to_hash(0, @hits));
}
else {
$i = 1;
for (0 .. $numhits - 1) {
if ($per_add)
{
&html_results_dealer (&array_to_hash($_, @hits));
}
else {
&html_record (&array_to_hash($_, @hits));
++$i; }
}
print qq|
</table>
</div>
</td>
<td align="right">
<p>
|;
if ($db_userid eq "default") {
print qq|
<a href="index.html"><img src="images/b_home.gif" width="97" height="17" border="0" name="b_home"></a><img src="images/bd_1.gif" width="17" height="17" name="bd_home">
<img src="images/transparent.gif" width="140" height="7" name="spacer">
|;
}
else {
print qq|
<td align="right"> <a href="$db_script_link?db=item&uid=$db_uid&view_records=1&UserID=$db_userid"><img src="images/b_viewlisting.gif" width="97" height="17" border="0" name="b_view"></a><img src="images/bd_1.gif" width="17" height="17" name="bd_view">
<img src="images/transparent.gif" width="140" height="7" name="spacer">
<a href="$db_script_url?db=item&uid=$db_uid&add_form=1"><img src="images/b_addvehicle.gif" width="97" height="17" border="0" name="b_add"></a><img src="images/bd_1.gif" width="17" height="17" name="bd_add">
<img src="images/transparent.gif" width="140" height="7" name="spacer">
<a href="$db_script_url?db=item&uid=$db_uid&modify_form=1&UserID=$db_userid"><img src="images/b_editvehicle.gif" width="97" height="17" border="0" name="b_edit"></a><img src="images/bd_1.gif" width="17" height="17" name="bd_edit">
<img src="images/transparent.gif" width="140" height="7" name="spacer">
<a href="$db_script_url?db=item&uid=$db_uid&delete_form=1&UserID=$db_userid"><img src="images/b_deletevehicle.gif" width="97" height="17" border="0" name="b_delete"></a><img src="images/bd_1.gif" width="17" height="17" name="bd_deletedealer">
<img src="images/transparent.gif" width="140" height="7" name="spacer">
<a href="$db_script_url?db=item&uid=$db_uid&help=1"><img src="images/b_help.gif" width="97" height="17" border="0" name"></a><img src="images/bd_1.gif" width="17" height="17" name="bd_help">
<img src="images/transparent.gif" width="120" height="7" name="spacer">
<a href="$db_script_url?db=item&uid=$db_uid&loghome=1"><img src="images/b_exit.gif" width="97" height="17" name="b_exit" border="0"></a><img src="images/bd_1.gif" width="17" height="17" name="bd_exit">
<img src="images/transparent.gif" width="120" height="7" name="spacer"></td>
<td align="right"><img src="images/white.gif" width="1" height="129"></td>
|;
}
print qq|
</td>
<td align="right"><img src="images/white.gif" width="1" height="9"></td>
</tr>
</table>
</td>
</tr>
<tr>
<td>
|;
if ($db_userid eq "default")
{
print qq|
<font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">
<P Align=center>
<a href="notworking.html">Home</a>
|;
}
else
{
print qq|
<font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF">
<P Align=center>
<a href="$db_script_link?db=item&uid=$db_uid&view_records=1&UserID=$db_userid">View Listing</a> -
<a href="$db_script_url?db=item&uid=$db_uid&add_form=1">Add Vehicle</a> -
<a href="$db_script_url?db=item&uid=$db_uid&modify_form=1&UserID=$db_userid">Edit Vehicle</a> -
<a href="$db_script_url?db=item&uid=$db_uid&delete_form=1&UserID=$db_userid">Delete Vehicle</a> -
<a href="$db_script_url?db=item&uid=$db_uid&help=1">Online Help</a> -
<a href="$db_script_url?db=item&uid=$db_uid&loghome=1">Exit Stocklist</a>
|;
}
print qq|
<a href="#top"><img name="b_top" border="0" src="images/bd_top.gif" width="20" height="20" align="right" vspace="0" hspace="0"></a><font size="3" face="Verdana, Arial, Helvetica, sans-serif" color="#585458"><b><img src="images/transparent.gif" width="50" height="19" name="spacer"></b></font>
<img src="images/white.gif" width="580" height="1" name="line_3"></td>
</tr>
</table>
</div>
|;
if ($db_next_hits) { print "
<$font>Pages: $db_next_hits</font>";}
}
}
--
I will need this back up and running ASAP. Can someone please please please help me with this ASAP.
URGENT PROBLEM THAT I NEED HELP WITH!!!