28-11-02 - WidthTimesDepth_ProductLine.txt - Norman Rouxel rouxel@attglobal.net

Updated 07-10-03 - To allow for 6.1.3 changes.  And to stop combining of similar items.
		   Also added  autocomplete="off" to width and Depth input fields as
		   buggy Internet Explorer doesn't fire onchange if you use autocomplete!

The following template will allow two form fields containing a Width and Depth
to be entered and their product passed as the Other Info Prompt text.

It would be easy to amend this to calculate volumes.

This you need the section set to display Quantity on Product Page and 
Other Info Prompt set to something like "Dimensions:".

It would be possible for someone to alter these values at Display Cart page.  
They could alter the total Quantity or Other Info Prompt.  While this would not
affect the value of the order it might create misleading details.

To prevent this you can edit ActinicOrder.pm to make these fields uneditable for 
such products.   Info on doing this is at the end of this readme.
Also you might get confusing results should someone add an identical product twice.
The Quantity would increase but the Other Info wouldn't.  A patch to Cart.pm fixes this
by treating any products with Other Info set as always different.

Save the following template with a name like AreaProductLine.html and 
select it in your product dialogue.



<!-- ProductLine HTML begin -->
<!-- Insert HTML for the top of the individual product -->
<!-- Width * Depth example. Needs section with  Qty on Product Page and Other Info Prompt set
     to something like "Dimensions:". 
-->
NETQUOTEVAR:INCLUDE Act_ProductSeparator.html
NETQUOTEVAR:ENDSEPARATOR

<!-- Calculate area from Width and Depth form fields.   
     Put area into Quantity and dimensions into Other Info Prompt. -->
<SCRIPT LANGUAGE=JavaScript>
<!--
function calcarea(ProdRef){  
 // look through all forms 'till one containing field ProdRef
 var tf = -1;
 var df = document.forms;
 var i = df.length - 1;
 var QRef = 'Q_' + ProdRef;
 var ORef = 'O_' + ProdRef;
 var WRef = 'Width' + ProdRef;
 var DRef = 'Depth' + ProdRef;

 for ( var j = 0; j <= i; j++)
  {
  var k = df[j].length - 1; 
  for ( var l = 0; l <= k; l++) if ( df[j].elements[l].name == (QRef) ) tf = j;
  }

 if ( tf < 0 ) {alert('Cannot find product form:' + ProdRef);return}

 var F = df[tf];  // the form that contained ProdRef
 var W, D;

 // find Width and Depth customer entered for product 
 for (var i = 0; i < F.elements.length; i++)
  {
  if (F[i].name == WRef) W = F[i].value;
  if (F[i].name == DRef) D = F[i].value;
  }

 // do the arithmetic - allow real numbers and round up to nearest integer
 var Area = W * D;
 var CalcArea = Area.toFixed(2);  // set to 2 decimal places
 if (Math.floor(Area) < Area) Area = Math.floor(Area) + 1;

 // Now loop through this forms variables and change the desired ones.
 for (var i = 0; i < F.elements.length; i++)
  {
  if (F[i].name == QRef) F[i].value = Area;   // set the Quantity
  if (F[i].name == ORef) F[i].value = 'Width: ' + W + ', Depth: ' + D + ', Area: ' + CalcArea;  // set Other Info Prompt
  }
}
//-->
</SCRIPT>

NETQUOTEVAR:PRODUCTFORMBEGIN
  <tr>
    <td rowspan="2" valign="TOP" align="CENTER"> NETQUOTEVAR:TEMPLATEBEGINXML NETQUOTEVAR:PRODUCTIMAGE </td>
    <td valign="TOP" align="LEFT" colspan="2">  
      <a name="NETQUOTEVAR:PRODUCTANCHOR"><span class="actregular"><b>NETQUOTEVAR:PRODUCTNAME</b></span></a>
      <span class="actxsmall">NETQUOTEVAR:PRODUCTREF <br>
      NETQUOTEVAR:PRODUCTDESCRIPTION&nbsp;NETQUOTEVAR:EXTINFOLINK</span>NETQUOTEVAR:EXTINFOBUTTON
      <br>
      <span class="actxsmall">NETQUOTEVAR:PRODUCTBEGINLINKNETQUOTEVAR:PRODUCTLINKTEXTNETQUOTEVAR:PRODUCTENDLINK

<!-- Two custom fields for entering Width and Depth  & Javascript to put their product into Quantity and OtherInfo fields -->
Width: <input autocomplete="off" type=text size=3 name="WidthNETQUOTEVAR:PRODUCTREFERENCE" value="0" onchange="calcarea('NETQUOTEVAR:PRODUCTREFERENCE')">&nbsp;&nbsp;
Depth: <input autocomplete="off" type=text size=3 name="DepthNETQUOTEVAR:PRODUCTREFERENCE" value="0" onchange="calcarea('NETQUOTEVAR:PRODUCTREFERENCE')"><BR>

      NETQUOTEVAR:PRICEEXPLANATION </span><br>
      <b>NETQUOTEVAR:PRODUCTPRICE</b><br>

<!-- Comment Out OtherInfo prompt <span class="actxsmall">NETQUOTEVAR:OTHERINFOPROMPT </span> and replace with hidden field -->
<INPUT TYPE=hidden NAME="O_NETQUOTEVAR:PRODUCTREFERENCE" SIZE="60" MAXLENGTH="1000" value="Width: 0 Depth: 0"> 

     <span class="actxsmall">NETQUOTEVAR:DATEPROMPT </span>
    </td>
  </tr>
  <tr>
    <td align="LEFT" colspan="2"><span class="actxsmall">
	NETQUOTEVAR:CARTERRORXML<!-- commment out Quantity field NETQUOTEVAR:PRODUCTQUANTITY and replace with hidden field -->
	<input type=hidden name="Q_NETQUOTEVAR:PRODUCTREFERENCE" value="0"><br>
			<Actinic:ACTIONS>NETQUOTEVAR:ADDTOCARTBUTTON</Actinic:ACTIONS>
	</span>
	NETQUOTEVAR:TEMPLATEENDXML
       </td>
  </tr>
NETQUOTEVAR:PRODUCTFORMEND
NETQUOTEVAR:NEXT
<!-- Insert HTML for the bottom of the individual product -->
<!-- ProductLine HTML end -->




Optional info on altering ActinicOrder.pm so customers cannot amend dimensions.


The following is for Actinic versions prior to 6.1.3.   Skip down if using 6.1.3 or greater.


############################################################################################################
Edit ActinicOrder.pm (Actinic 6.1.2 or earlier) (use a text editor - not a word processor - back it up first):-
Note that you have to change the line containing 'Dimensions:' to suit your Other Info Prompt for such products.

find line 

$ActinicOrder::s_nContext = $ActinicOrder::FROM_UNKNOWN;

ADD this line immediately after it

my $NorcatInfoHide = $::FALSE;

find the line

$sInfo = InfoHTMLGenerate($$pProduct{'REFERENCE'}, $nLineCount, $sInfo, !$bIncludeButtons, $aFailures->[$nLineCount]->{"INFOINPUT"});

INSERT the following immediately above it.

if ($$pProduct{'OTHER_INFO_PROMPT'} eq 'Dimensions:')    # change this to suit Other Info Prompt you use
	{
	$NorcatInfoHide = $::TRUE;
	}	

find the line (it's only a few lines down from where you are)

$sInfoLine = InfoLineHTML($$pProduct{'OTHER_INFO_PROMPT'}, $sInfo, $sInfoLineHTML);

ADD the following line immediately after it.

$NorcatInfoHide = $::FALSE;

find the line

$sHTML = "<INPUT TYPE=TEXT SIZE=\"35\" NAME=\"O_$nIndex\" VALUE=\"$sValue\" $sStyle>";

REPLACE it with the following fragment

		if ($NorcatInfoHide)
   			{
			$sHTML = $sValue . "<INPUT TYPE=HIDDEN NAME=\"O_$nIndex\" VALUE=\"$sValue\">";
			}
		else
			{
			$sHTML = "<INPUT TYPE=TEXT SIZE=\"35\" NAME=\"O_$nIndex\" VALUE=\"$sValue\" $sStyle>";
			}


That's ActinicOrder.pm patched.

Edit Cart.pm (Actinic 6.1.2 or earlier) (use a text editor - not a word processor - back it up first):-


look for the line

				if( $_ ne 'QUANTITY' &&

ADD the following immediately above it

				if ( $_ eq 'INFOINPUT' )					# Norman - skip checking If Info Input
					{
					next FIND;
					}

That's Cart.pm patched.
that's that for 6.1.2 and earlier.
############################################################################################################


For Version 6.1.3 and later do the following instead.


############################################################################################################
Edit ActinicOrder.pm (Actinic 6.1.3 or later) (use a text editor - not a word processor - back it up first):-
Note that you have to change the line containing 'Dimensions:' to suit your Other Info Prompt for such products.

find line 

$ActinicOrder::s_nContext = $ActinicOrder::FROM_UNKNOWN;

ADD this line immediately after it

my $NorcatInfoHide = $::FALSE;

find the line

		$pProduct = $CurrentItem{'PRODUCT'};

ADD the following immediately after it.


		if ($$pProduct{'OTHER_INFO_PROMPT'} eq 'Dimensions:')    # change this to suit Other Info Prompt you use
			{
			$NorcatInfoHide = $::TRUE;
			}	

find the line 

			$sQuantityText = "<INPUT TYPE=TEXT SIZE=\"4\" NAME=\"Q_" . $nLineCount . "\" VALUE=\"". $sQuantityText . "\" STYLE=\"text-align: right;";

ADD the following immediately after it.

			if ($NorcatInfoHide)
				{
			        $sQuantityText =~ s/TYPE=TEXT/TYPE=TEXT readonly/;
				}

find the line

		my $nRowspan = scalar @aComponentsSeparated + 1;

ADD the following line immediately after it

		$NorcatInfoHide = $::FALSE;


find the line

		$sHTML = ACTINIC::GetPhrase(-1, 2161, "", $sIndex, 35, 1000, $sValue, $sStyle);

ADD the following line immediately after it


		if ($NorcatInfoHide)
		   	{
			$sHTML =~ s/TYPE=text/TYPE=text readonly/;
			}



That's ActinicOrder.pm patched.


Edit Cart.pm (Actinic 6.1.3 or later) (use a text editor - not a word processor - back it up first):-


look for the line

				if( $_ ne 'QUANTITY' &&

ADD the following immediately above it

				if ( $_ eq 'INFOINPUT' )					# Norman - skip checking If Info Input
					{
					next FIND;
					}

That's Cart.pm patched.

that's that for 6.1.3 onwards.
############################################################################################################

Notes.   If you have only a few products of this type then the template above is fine.   
If you have lots of such products then you might want to move the JavaScript part from the product template 
into Act_ProductBody.html so that it isn't unnecessarily duplicated for each product.   
You could also move it to actiniccore.js instead and this would mean that it would load from the browser cache on
subsequent page loads.

Norman Rouxel rouxel@attglobal.net