[ic] Patched "results.html" file...

[John Beima]

This message is in MIME format.

---MOQ9950008118ca1b6f55d08d10adfacfca31a31dbc1
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 8bit

G'Day FOlks,

For those of you, like us, run your SSL through a different domain, here is a
patched results.html file that will actually allow your items to go into the
shopping cart...


John Beima
jbeima@palb.com, support@alocalagent.com, and support@alocalchurch.com

P.A.L.B. Systems - Phone: (780)451-1086 - Fax: (780)447-4760
11639-122 Street, Edmonton, Alberta, Canada, T5M 0B6

Affordable Web Pages - Phone: (888)932-9990 - Fax: (256)351-7297
2713B Spring Place SW, Decatur, Alabama, United States, 35603

---MOQ9950008118ca1b6f55d08d10adfacfca31a31dbc1
Content-Type: text/html; name="results.html"; name="results.html"; charset=ISO-8859-1
Content-Transfer-Encoding: 8bit
Content-Disposition: inline; filename="results.html"


[comment]
ui_template: Yes
ui_template_name: leftright
[/comment]

[tmp page_title]__COMPANY__ -- Search results[/tmp]

[control reset=1]

[control-set]
[component]search_box_small[/component]
[/control-set]

[control-set]
[component]category_vertical[/component]
[/control-set]

[control-set]
[component][/component]
[/control-set]

[control-set]
[component][/component]
[/control-set]

[control-set]
[component]cross[/component]
[size]2[/size]
[cols]2[/cols]
[banner]Also see...[/banner]
[/control-set]

[control-set]
[component]random[/component]
[size]3[/size]
[cols]1[/cols]
[banner]Specials[/banner]
[/control-set]

[control reset=1]

@_LEFTRIGHT_TOP_@

<!-- BEGIN CONTENT -->

<br>

[if scratch did_order]
[include file="templates/components/cart_display"]
[/if]
[set did_order][/set]
[search-region]
[set munge_quantity]
[calc]
	$Scratch->{did_order} = 1;
	@q = split /\0/, $CGI->{mv_order_quantity};
	for (@q) {
		next unless length $_;
		$_ = "=$_";
	}
	@parms = grep /^mv_oi\d+/ && $CGI->{$_}, keys %{$CGI};

	# If we have parms, means an individual buy. If we don't
	# we want to strip empty items
	unless (@parms) {
		@i = split "\0", $CGI->{mv_order_item};
		for(my $i = 0; $i < @i; $i++) {
			next if length($q[$i]);
			$i[$i] = '';
		}
		@i = grep length($_), @i;
		@q = grep length($_), @q;
		$CGI_array->{mv_order_quantity} = \@q;
		$CGI->{mv_order_quantity} = join "\0", @q;
		$CGI_array->{mv_order_item} = \@i;
		$CGI->{mv_order_item} = join "\0", @i;
		return;
	}
	my $item = $parms[0];
	$item =~ /(\d+)/ or return;
	my $idx = $1;
	$idx--;
	$CGI->{mv_order_item} = $CGI->{$item};
	$CGI->{mv_order_quantity} = "$q[$idx]";
	return;
[/calc]
	[bounce href="[history-scan exclude=nothing]"]
[/set]
[tmp cross_sale][value-extended name=mv_searchspec index=0][/tmp]

[on-match]
<FORM ACTION="[process-target]" METHOD=POST>
<input type=hidden name=mv_session_id value="[data session id]">
<INPUT TYPE=hidden  NAME="mv_todo" VALUE="return">
<INPUT TYPE=hidden  NAME="mv_nextpage" VALUE="ord/basket">
<INPUT TYPE=hidden  NAME="mv_separate_items"  VALUE="0">
<INPUT TYPE=hidden  NAME="mv_click" VALUE="munge_quantity">
[/on-match]

<table width="90%" border="0" cellspacing="0" cellpadding="3">
<tr class="contentbar2"> 
  <td><b>&nbsp;Product</b></td>
  <td align="center"><b>SKU</b></td>
  <td align="center"><b>Stock</b></td>
  <td align="center"><b>Price</b></td>
  <td align="center"><b>Qty</b></td>
  <td align="center"><b>Buy</b></td>
</tr>
<tr>
  <td colspan="6">&nbsp;</td>
</tr>

[search-list]

[item-change 1][condition][item-field category][/condition]

<tr class="contentbar1"> 
  <td colspan="6">&nbsp;[either][value banner_text][or][item-field category][/either]</td>
</tr>

[/item-change 1]
					
<tr valign="middle"> 
      <td>
	<INPUT TYPE=hidden  NAME="mv_order_item"  VALUE="[item-code]">
	<a href="[area [item-code]]">[item-description]</a>
      </td>
      <td align="center">[item-code]</td>
      <td align="center">
	[item-calc]
	my $q = q{[item-data inventory quantity]};
	if($q > 0) {
		return <<EOF;
<font __FFACE__ size="1" color="#008000"><b>Y</b></font>
EOF
	}
	else {
		return <<EOF;
<a href="[area stock-alert [item-code]]"><b>N</b></a>
EOF
	}
[/item-calc]
      </td>
      <td align="center">[item-price]</td>
      <td align="center"><input type=hidden name="mv_oi[item-increment]" value=""><input type=text name=mv_order_quantity size=2 value="0"></td>
      <td align="center"><input type=image src="__THEME_IMG_DIR__buynow.gif" onClick="submit(this.form)" border=0></td>
</tr>
					
[/search-list]

</table>

[on-match]
<div align=right><br><INPUT TYPE=submit VALUE="Buy List">&nbsp;&nbsp;&nbsp;</div>
</FORM>
[/on-match]

[no-match]
<BR><BR>
<BLOCKQUOTE>
Sorry, no matches for <B>[calc]
			my $joiner = ' AND ';
			$joiner = ' OR ' if
					defined $Search->{''}->{mv_orsearch}[0]
					and $Search->{''}->{mv_orsearch}[0];
			my @str = grep /\D/, @{$Values->{mv_searchspec}};
			return join $joiner, @str;
			[/calc]
[if value mv_search_error]
<P>
<B>
Errors:
<BR> 
[value-extended name=mv_search_error joiner="<BR>"]
</B>
[/if]

<BR><BR>
</BLOCKQUOTE>
[/no-match]
<BR CLEAR=LEFT>
[more-list]
<BLOCKQUOTE>
Matches [matches] of [match-count] found.
<BR>[more]<BR>
</BLOCKQUOTE>
[/more-list]

[/search-region]

<br>

<!-- END CONTENT -->

@_LEFTRIGHT_BOTTOM_@

---MOQ9950008118ca1b6f55d08d10adfacfca31a31dbc1--