Mercurial > laserkard
view buy_files/buycode.js @ 106:5b0753c6f34d laserkard tip
updated to newest compojure and a simpler syntax
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Mon, 27 Sep 2010 20:22:58 -0400 |
parents | 26c2b3ad21c7 |
children |
line wrap: on
line source
3 function clearDefault(el) {4 if (el.defaultValue==el.value) el.value = ""5 }8 function Dollar (val) { // force to valid dollar amount9 var str,pos,rnd=0;10 if (val < .995) rnd = 1; // for old Netscape browsers11 str = escape (val*1.0 + 0.005001 + rnd); // float, round, escape12 pos = str.indexOf (".");13 if (pos > 0) str = str.substring (rnd, pos + 3);14 return str;15 }17 var amt,des,obj,val,op1a,op1b,op2a,op2b,op3a,op3b,op4a,op4b,op5a,op5b,op6a,op6b,op7a,op7b,op8a,op8b,op9a,op9b,itmn;19 function ChkTok (obj1) {20 var j,tok,ary=new Array (); // where we parse21 ary = val.split (" "); // break apart22 for (j=0; j<ary.length; j++) { // look at all items23 // first we do single character tokens...24 if (ary[j].length < 2) continue;25 tok = ary[j].substring (0,1); // first character26 val = ary[j].substring (1); // get data27 if (tok == "@") amt = val * 1.0;28 if (tok == "+") amt = amt + val*1.0;29 if (tok == "%") amt = amt + (amt * val/100.0);30 if (tok == "-") amt = amt - val*1.0;31 if (tok == "#") { // record item number32 if (obj1.item_number) obj1.item_number.value = val;33 ary[j] = ""; // zap this array element34 }35 // Now we do 3-character tokens...36 if (ary[j].length < 4) continue;37 tok = ary[j].substring (0,3); // first 3 chars38 val = ary[j].substring (3); // get data39 if (tok == "s1=") { // value for shipping40 if (obj1.shipping) obj1.shipping.value = val;41 ary[j] = ""; // clear it out42 }43 if (tok == "s2=") { // value for shipping244 if (obj1.shipping2) obj1.shipping2.value = val;45 ary[j] = ""; // clear it out46 }47 }48 val = ary.join (" "); // rebuild val with what's left49 }51 function StorVal () {52 var tag;53 tag = obj.name.substring (obj.name.length-2); // get flag54 if (tag == "1a") op1a = op1a + " " + val;55 else if (tag == "1b") op1b = op1b + " " + val;56 else if (tag == "2a") op2a = op2a + " " + val;57 else if (tag == "2b") op2b = op2b + " " + val;58 else if (tag == "3a") op3a = op3a + " " + val;59 else if (tag == "3b") op3b = op3b + " " + val;60 else if (tag == "4a") op4a = op4a + " " + val;61 else if (tag == "4b") op4b = op4b + " " + val;62 else if (tag == "5a") op5a = op5a + " " + val;63 else if (tag == "5b") op5b = op5b + " " + val;64 else if (tag == "6a") op6a = op6a + " " + val;65 else if (tag == "6b") op6b = op6b + " " + val;66 else if (tag == "7a") op7a = op7a + " " + val;67 else if (tag == "7b") op7b = op7b + " " + val;68 else if (tag == "8a") op8a = op8a + " " + val;69 else if (tag == "8b") op8b = op8b + " " + val;70 else if (tag == "9a") op9a = op9a + " " + val;71 else if (tag == "9b") op9b = op9b + " " + val;72 else if (tag == "3i") itmn = itmn + " " + val;73 else if (des.length == 0) des = val;74 else des = des + ", " + val;75 }77 function ReadForm (obj1, tst) {84 if (!obj1.accept.checked){85 alert ("Please approve the design & content.");86 return false;87 }90 if(obj1.accept.checked)91 {vanish(['args__go'],['vanish']);}95 // Read the user form96 var i,j,pos;97 amt=0;des="";op1a="";op1b="";op2a="";op2b="";op3a="";op3b="";op4a="";op4b="";op5a="";op5b="";op6a="";op6b="";op7a="";op7b="";op8a="";op8b="";op9a="";op9b="";itmn="";98 if (obj1.baseamt) amt = obj1.baseamt.value*1.0; // base amount99 if (obj1.basedes) des = obj1.basedes.value; // base description100 if (obj1.baseon0) op1a = obj1.baseon0.value; // base options101 if (obj1.baseos0) op1b = obj1.baseos0.value;102 if (obj1.baseon1) op2a = obj1.baseon1.value;103 if (obj1.baseos1) op2b = obj1.baseos1.value;104 if (obj1.baseon2) op3a = obj1.baseon2.value;105 if (obj1.baseos2) op3b = obj1.baseos2.value;106 if (obj1.baseon3) op4a = obj1.baseon3.value;107 if (obj1.baseos3) op4b = obj1.baseos3.value;108 if (obj1.baseon4) op5a = obj1.baseon4.value;109 if (obj1.baseos4) op5b = obj1.baseos4.value;110 if (obj1.baseon5) op6a = obj1.baseon5.value;111 if (obj1.baseos5) op6b = obj1.baseos5.value;112 if (obj1.baseon6) op7a = obj1.baseon6.value;113 if (obj1.baseos6) op7b = obj1.baseos6.value;114 if (obj1.baseon7) op8a = obj1.baseon7.value;115 if (obj1.baseos7) op8b = obj1.baseos7.value;116 if (obj1.baseon8) op9a = obj1.baseon8.value;117 if (obj1.baseos8) op9b = obj1.baseos8.value;118 if (obj1.baseitn) itmn = obj1.baseitn.value;119 for (i=0; i<obj1.length; i++) { // run entire form120 obj = obj1.elements[i]; // a form element126 if (obj.type == "select-one") { // just selects127 if (obj.name == "quantity" ||128 obj.name == "amount") continue;129 pos = obj.selectedIndex; // which option selected130 val = obj.options[pos].value; // selected value131 ChkTok (obj1); // check for any specials133 if (obj.name == "on0" || // let this go where it wants134 obj.name == "os0" ||135 obj.name == "on1" ||136 obj.name == "os1" ||137 obj.name == "on2" ||138 obj.name == "os2" ||139 obj.name == "on3" ||140 obj.name == "os3" ||141 obj.name == "on4" ||142 obj.name == "os4" ||143 obj.name == "on5" ||144 obj.name == "os5" ||145 obj.name == "on6" ||146 obj.name == "os6" ||147 obj.name == "on7" ||148 obj.name == "os7" ||149 obj.name == "on8" ||150 obj.name == "os8" ||151 obj.name == "on9" ||152 obj.name == "os9") continue;154 StorVal ();156 } else157 if (obj.type == "checkbox" || // just get checkboxex158 obj.type == "radio") { // and radios159 if (obj.checked) {160 val = obj.value; // the value of the selection161 ChkTok (obj1);162 StorVal ();163 }164 } else165 if (obj.type == "select-multiple") { //one or more166 for (j=0; j<obj.options.length; j++) { // run all options167 if (obj.options[j].selected) {168 val = obj.options[j].value; // selected value (default)169 ChkTok (obj1);170 StorVal ();171 }172 }173 } else174 if ((obj.type == "text" || // just read text,175 obj.type == "textarea") &&176 obj.name != "tot" && // but not from here177 obj.name != "quantity") {178 val = obj.value; // get the data179 //if (val == "" && tst)180 //{ // force an entry181 // alert ("Enter data for " + obj.id);182 // return false;183 //}184 StorVal ();185 }186 }187 // Now summarize stuff we just processed, above188 if (op1a.length > 0) obj1.on0.value = op1a;189 if (op1b.length > 0) obj1.os0.value = op1b;190 if (op2a.length > 0) obj1.on1.value = op2a;191 if (op2b.length > 0) obj1.os1.value = op2b;192 if (op3a.length > 0) obj1.on2.value = op3a;193 if (op3b.length > 0) obj1.os2.value = op3b;194 if (op4a.length > 0) obj1.on3.value = op4a;195 if (op4b.length > 0) obj1.os3.value = op4b;196 if (op5a.length > 0) obj1.on4.value = op5a;197 if (op5b.length > 0) obj1.os4.value = op5b;198 if (op6a.length > 0) obj1.on5.value = op6a;199 if (op6b.length > 0) obj1.os5.value = op6b;200 if (op7a.length > 0) obj1.on6.value = op7a;201 if (op7b.length > 0) obj1.os6.value = op7b;202 if (op8a.length > 0) obj1.on7.value = op8a;203 if (op8b.length > 0) obj1.os7.value = op8b;204 if (op9a.length > 0) obj1.on8.value = op9a;205 if (op9b.length > 0) obj1.os8.value = op9b;206 if (itmn.length > 0) obj1.item_number.value = itmn;207 obj1.item_name.value = des;208 obj1.amount.value = Dollar (amt);209 if (obj1.tot) obj1.tot.value = "$" + Dollar (amt);210 }