//
// Powder Inc. script for ordering blackpowder.
// All rights reserved, copyright 2002 Powder Inc.
// 2002-11-10 -- bk -- New page
/// 2006-01-25 - bk - Change to PerlShop 4.5.01
//
var // Global values
   PIsum = 0;
   PIprice5 = 0;
   PIprice10 = 0;
   PIprice25 = 0;
   PIprice12 = 0;
   PIprice24 = 0;
   PIorder_descr = "";
   PIinit = false;
   ReleaseFile = -1;
   fullCartonMax = 0;
   
// common js code for network
//Clear inherited frames  
if (parent != self) {
                top.location=self.document.location;
}


function PI_Init() {
   var i;
   if (PIinit) return;

   PIinit = true;

 
} // PI_Init()


function PI_Check_Release (name,msg) {
   var retry = true;
   while (retry) {
      retry--;
      if (document.powder[name].value == "") {
	     document.powder[name].value 
		  = window.prompt(msg + ":\n", document.powder[name].value);
	  } else {
	     retry = false;
      }
   }	
}

function PI_SumItem (name, price5, price10, price25, descr, substTag) {
   // window.alert(name + "/" + descr + " in PI_SumItem ");   
   if (document.powder[name] == null) {
                window.alert(name + " is not defined; Please report this to WebMaster at webmaster@powderinc.com")
                return;
   }
   var qty = document.powder[name].value;
   if (qty != "") {
      var myQty = parseInt (qty, 10);
	  if (isNaN (myQty)) {
	     window.alert(name + "/" + descr + " Not a number: " + myQty);
         document.powder[name].value = "";
      } else if  (myQty > 0) {
         PIsum += myQty;
         PIprice5  += myQty * price5;
         PIprice10 += myQty * price10;
         PIprice25 += myQty * price25;
	     PIorder_descr += descr + myQty + ",";
         if ((substTag != "") && (substTag)) {
           fullCartonMax = 10;
         }
	}
   }
   //window.alert("PI_SumItem qty " + myQty + "   PISum " + PIsum);
}

function PI_twodigits(val) {
   var dollars, cents;
   dollars = Math.floor(val);
   cents = Math.floor((val - dollars) * 100);
   if (cents < 10) cents = "0" + cents;
   return (dollars + "." + cents);
}

function PI_Sum(){
   var ship = 0;
   var request_count = 0;
   
   PIsum = 0;
   PIprice5 = 0;
   PIprice10 = 0;
   PIprice25 = 0;
   PIorder_descr = "";
   fullCartonMax = 50;

   // window.alert("PI_Sum, PI_Order.js, before SumItem");
   PI_SumItem("GOEX Powder: F",           22.95, 17.90, 14.50, "G1F");
   PI_SumItem("GOEX Powder: FF",          22.95, 17.90, 14.50, "G2F");
   PI_SumItem("GOEX Powder: FFF",         22.95, 17.90, 14.50, "G3F");
   PI_SumItem("GOEX Powder: FFFF",        22.95, 17.90, 14.50, "G4F");
   PI_SumItem("GOEX Powder: Meal-D",      22.95, 17.90, 14.50, "GMd");

   PI_SumItem("GOEX Powder: Cannon",      23.20, 18.15, 14.75, "GCAN");
   PI_SumItem("GOEX Powder: Cowboy",      21.70, 17.10, 13.80, "GCOW");
   // PI_SumItem("GOEX Powder: Cartridge",   22.10, 17.60, 14.35, "GCRT");
   PI_SumItem("GOEX Powder: Reenactor",   21.45, 16.40, 13.00, "GRNCTR");

   PI_SumItem("GOEX Express Powder: F",   26.16, 21.64, 18.86, "GX1F");
   PI_SumItem("GOEX Express Powder: FF",  26.16, 21.64, 18.86, "GX2F");
   PI_SumItem("GOEX Express Powder: FFF", 26.16, 21.64, 18.86, "GX3F");

   PI_SumItem("Swiss Powder: F",     30.35, 25.90, 22.30, "S1F");
   PI_SumItem("Swiss Powder: 1.5F",  30.35, 25.90, 22.30, "S1.5F");
   PI_SumItem("Swiss Powder: FF",    30.35, 25.90, 22.30, "S2F");
   PI_SumItem("Swiss Powder: FFF",   30.35, 25.90, 22.30, "S3F");
   PI_SumItem("Swiss Powder: FFFF",  30.35, 25.90, 22.30, "S4F");

   PI_SumItem("Swiss Powder: Nul-B", 36.30, 31.35, 28.80, "SNulB");

   PI_SumItem("Skirmish Powder: 1n",   20.25, 15.20, 11.80, "Skir1n");
   PI_SumItem("Skirmish Powder: 3n",   20.25, 15.20, 11.80, "Skir3n");

   PI_SumItem("KIK Powder: F",    21.45, 16.40, 13.00, "K1F");   
   PI_SumItem("KIK Powder: 1.5F", 21.45, 16.40, 13.00, "K1.5F");   
   PI_SumItem("KIK Powder: FF",   21.45, 16.40, 13.00, "K2F");   
   PI_SumItem("KIK Powder: FFF",  21.45, 16.40, 13.00, "K3F"); 
   PI_SumItem("KIK Powder: FFFF", 21.45, 16.40, 13.00, "K4F"); 

   PI_SumItem("Schuetzen Powder: F",    23.95, 18.90, 15.00, "Szn1F");   
   PI_SumItem("Schuetzen Powder: FF",   23.95, 18.90, 15.00, "Szn2F");   
   PI_SumItem("Schuetzen Powder: FFF",  23.95, 18.90, 15.00, "Szn3F"); 

   //PI_SumItem("Pinnacle Powder: 2F",   25.10, 20.15, 17.60, "Pinn2F",   "Y");
   //PI_SumItem("Pinnacle Powder: 3F",   25.10, 20.15, 17.60, "Pinn3F",   "Y");

   PI_SumItem("Rem: Pyrodex P",   19.55, 15.75, 13.65, "rPyrP",   "Y");
   PI_SumItem("Rem: Pyrodex RS",  19.55, 15.75, 13.65, "rPyrRS",  "Y");
   PI_SumItem("Rem: Pyrodex S",   22.80, 19.00, 16.90, "rPyrSel", "Y");
   PI_SumItem("Rem: Pyrodex Pel", 17.30, 13.50, 11.40, "rPyrPlt", "Y");


   var now = new Date();
   var hours, mins,months,days, invoice;
   months = 1 + now.getMonth(); if (months < 10) months = "0" + months;
   days = now.getDate(); if (days < 10) days = "0" + days;
   hours = now.getHours(); if (hours < 10) hours = "0" + hours;
   mins = now.getMinutes(); if (mins < 10) mins = "0" + mins;
   invoice = // "DELAY -- shipping on Black Powder is 8-10 business days delayed.  \n"
             // + 
			 "PI" + now.getFullYear() + months + days 
                                   + "." + hours + "." + mins
                                   + "-" + PIsum;


   document.powder.submit.disabled = true;

   var price = 0;
	   order_descr = '';
	   total_price = '$ 0.00';
	   shipping_units = '';
	   name = "Not a full order";
	   shipping_info = '';
   if (PIsum==51) { // DEBUGGING entry
	  document.powder.submit.disabled = false;
      price = 1;
      total_price = "$" + PI_twodigits(2.13);
      order_descr = "1 pound debugging order.";
      shipping_units = "0 carton";
	  name = "Empty Practice Purchase";

   } else if (PIsum > fullCartonMax) {
      invoice = " -- ";
	  price = PIprice25;
      total_price = "Order over 10 lb.";
      shipping_units = "";
      order_descr = "10 lb Max - with Black Powder Substitute";
   
   } else if (PIsum==50) {
      document.powder.submit.disabled = false;
      price = PIprice25;
      total_price = "$" + PI_twodigits(price);
      order_descr ="50 pound order.";
      shipping_units ="2 cartons";
      name = "50 lbs. Blackpowder";
	  
   } else if (PIsum==25) {
	  document.powder.submit.disabled = false;
	  price = PIprice25;
      total_price = "$" + PI_twodigits(PIprice25);
      order_descr ="25 pound order.";
      shipping_units = "1 carton";
      name = "25 lbs. Blackpowder";

   } else if (PIsum==10)  {
	  document.powder.submit.disabled = false;
	  price = PIprice10;
      total_price = "$" + PI_twodigits(PIprice10);
      order_descr ="10 pound order.";
      shipping_units = "1 carton";
      name = "10 lbs. Blackpowder";
   } else if (PIsum==5) {
	  document.powder.submit.disabled = false;
      price = PIprice5;
      total_price = "$" + PI_twodigits(PIprice5);
      order_descr ="5 pound order.";
      shipping_units = "1 carton";
	  name = "5 lbs. Blackpowder";

   } else if (PIsum==0) {
	  order_descr ="empty order";
      total_price = "$ ";
      shipping_units = "";
	  price = 0;
      invoice = " -- ";
	  
   } else { // incomplete order
      invoice = " -- ";
	  if (PIsum<10) price = PIprice5;
	  else if (PIsum<25) price = PIprice10;
	  else price = PIprice25;
      total_price = "Not a Full Order";
      shipping_units = "";

      if (PIsum>50) order_descr = "Order greater than 50 lbs is not allowed.";
      else if (PIsum>25) order_descr = "Order is greater than 25 lbs.";
      else if (PIsum>10) order_descr = "Order is greater than 10 lbs.";
      else if (PIsum>5) order_descr = "Order is greater than 5 lbs.";
      else order_descr = "Less than full order";
   }

   document.powder.Order_Size.value=PIsum;
   document.powder.ITEM_OPTION2.value = PIorder_descr;									  
   document.powder.ITEM_OPTION3.value = invoice;

   document.powder.Powder_Price.value = "$" + PI_twodigits(price);
   document.powder.ITEM_PRICE.value = total_price;
   document.powder.Order_Description.value = order_descr;
   document.powder.Shipping_Units.value = shipping_units;
   document.powder.ITEM_NAME.value = name;
}



function PI_Submit () {
   PI_Sum();
   
   return (false);
}

function PI_ClearCalc () {
   document.powder.submit.disabled = true;
   document.powder.ITEM_OPTION3.value = " -- ";
   // window.alert("PI_ClearCalc, PI_Order.js");
   PI_Sum();
}