rlm@4: rlm@4: rlm@46: function clearDefault(el) rlm@46: { rlm@46: if (el.defaultValue==el.value) {el.select();} rlm@4: } rlm@4: rlm@4: rlm@0: function Dollar (val) { // force to valid dollar amount rlm@0: var str,pos,rnd=0; rlm@0: if (val < .995) rnd = 1; // for old Netscape browsers rlm@0: str = escape (val*1.0 + 0.005001 + rnd); // float, round, escape rlm@0: pos = str.indexOf ("."); rlm@0: if (pos > 0) str = str.substring (rnd, pos + 3); rlm@0: return str; rlm@0: } rlm@0: rlm@0: var amt,des,obj,val,op1a,op1b,op2a,op2b,op3a,op3b,op4a,op4b,op5a,op5b,op6a,op6b,op7a,op7b,op8a,op8b,op9a,op9b,itmn; rlm@0: rlm@0: function ChkTok (obj1) { rlm@0: var j,tok,ary=new Array (); // where we parse rlm@0: ary = val.split (" "); // break apart rlm@0: for (j=0; j<ary.length; j++) { // look at all items rlm@0: // first we do single character tokens... rlm@0: if (ary[j].length < 2) continue; rlm@0: tok = ary[j].substring (0,1); // first character rlm@0: val = ary[j].substring (1); // get data rlm@0: if (tok == "@") amt = val * 1.0; rlm@0: if (tok == "+") amt = amt + val*1.0; rlm@0: if (tok == "%") amt = amt + (amt * val/100.0); rlm@0: if (tok == "-") amt = amt - val*1.0; rlm@0: if (tok == "#") { // record item number rlm@0: if (obj1.item_number) obj1.item_number.value = val; rlm@0: ary[j] = ""; // zap this array element rlm@0: } rlm@0: // Now we do 3-character tokens... rlm@0: if (ary[j].length < 4) continue; rlm@0: tok = ary[j].substring (0,3); // first 3 chars rlm@0: val = ary[j].substring (3); // get data rlm@0: if (tok == "s1=") { // value for shipping rlm@0: if (obj1.shipping) obj1.shipping.value = val; rlm@0: ary[j] = ""; // clear it out rlm@0: } rlm@0: if (tok == "s2=") { // value for shipping2 rlm@0: if (obj1.shipping2) obj1.shipping2.value = val; rlm@0: ary[j] = ""; // clear it out rlm@0: } rlm@0: } rlm@0: val = ary.join (" "); // rebuild val with what's left rlm@0: } rlm@0: rlm@0: function StorVal () { rlm@0: var tag; rlm@0: tag = obj.name.substring (obj.name.length-2); // get flag rlm@0: if (tag == "1a") op1a = op1a + " " + val; rlm@0: else if (tag == "1b") op1b = op1b + " " + val; rlm@0: else if (tag == "2a") op2a = op2a + " " + val; rlm@0: else if (tag == "2b") op2b = op2b + " " + val; rlm@0: else if (tag == "3a") op3a = op3a + " " + val; rlm@0: else if (tag == "3b") op3b = op3b + " " + val; rlm@0: else if (tag == "4a") op4a = op4a + " " + val; rlm@0: else if (tag == "4b") op4b = op4b + " " + val; rlm@0: else if (tag == "5a") op5a = op5a + " " + val; rlm@0: else if (tag == "5b") op5b = op5b + " " + val; rlm@0: else if (tag == "6a") op6a = op6a + " " + val; rlm@0: else if (tag == "6b") op6b = op6b + " " + val; rlm@0: else if (tag == "7a") op7a = op7a + " " + val; rlm@0: else if (tag == "7b") op7b = op7b + " " + val; rlm@0: else if (tag == "8a") op8a = op8a + " " + val; rlm@0: else if (tag == "8b") op8b = op8b + " " + val; rlm@0: else if (tag == "9a") op9a = op9a + " " + val; rlm@0: else if (tag == "9b") op9b = op9b + " " + val; rlm@0: else if (tag == "3i") itmn = itmn + " " + val; rlm@0: else if (des.length == 0) des = val; rlm@0: else des = des + ", " + val; rlm@0: } rlm@0: rlm@40: function verify(obj1){ rlm@40: if (!obj1.accept.checked){ rlm@40: alert ("Please approve the design & content."); rlm@40: rlm@40: return false; rlm@40: } rlm@40: } rlm@40: rlm@40: rlm@35: function ReadForm (obj1, tst) { rlm@35: rlm@35: rlm@35: rlm@35: rlm@35: rlm@35: rlm@40: rlm@35: rlm@35: if(obj1.accept.checked) rlm@35: {vanish(['args__go'],['vanish']);} rlm@35: rlm@35: rlm@35: rlm@35: // Read the user form rlm@0: var i,j,pos; rlm@0: amt=0;des="";op1a="";op1b="";op2a="";op2b="";op3a="";op3b="";op4a="";op4b="";op5a="";op5b="";op6a="";op6b="";op7a="";op7b="";op8a="";op8b="";op9a="";op9b="";itmn=""; rlm@0: if (obj1.baseamt) amt = obj1.baseamt.value*1.0; // base amount rlm@0: if (obj1.basedes) des = obj1.basedes.value; // base description rlm@0: if (obj1.baseon0) op1a = obj1.baseon0.value; // base options rlm@0: if (obj1.baseos0) op1b = obj1.baseos0.value; rlm@0: if (obj1.baseon1) op2a = obj1.baseon1.value; rlm@0: if (obj1.baseos1) op2b = obj1.baseos1.value; rlm@0: if (obj1.baseon2) op3a = obj1.baseon2.value; rlm@0: if (obj1.baseos2) op3b = obj1.baseos2.value; rlm@0: if (obj1.baseon3) op4a = obj1.baseon3.value; rlm@0: if (obj1.baseos3) op4b = obj1.baseos3.value; rlm@0: if (obj1.baseon4) op5a = obj1.baseon4.value; rlm@0: if (obj1.baseos4) op5b = obj1.baseos4.value; rlm@0: if (obj1.baseon5) op6a = obj1.baseon5.value; rlm@0: if (obj1.baseos5) op6b = obj1.baseos5.value; rlm@0: if (obj1.baseon6) op7a = obj1.baseon6.value; rlm@0: if (obj1.baseos6) op7b = obj1.baseos6.value; rlm@0: if (obj1.baseon7) op8a = obj1.baseon7.value; rlm@0: if (obj1.baseos7) op8b = obj1.baseos7.value; rlm@0: if (obj1.baseon8) op9a = obj1.baseon8.value; rlm@0: if (obj1.baseos8) op9b = obj1.baseos8.value; rlm@0: if (obj1.baseitn) itmn = obj1.baseitn.value; rlm@0: for (i=0; i<obj1.length; i++) { // run entire form rlm@0: obj = obj1.elements[i]; // a form element rlm@0: rlm@0: rlm@0: rlm@0: rlm@0: rlm@0: if (obj.type == "select-one") { // just selects rlm@0: if (obj.name == "quantity" || rlm@0: obj.name == "amount") continue; rlm@0: pos = obj.selectedIndex; // which option selected rlm@0: val = obj.options[pos].value; // selected value rlm@0: ChkTok (obj1); // check for any specials rlm@0: rlm@0: if (obj.name == "on0" || // let this go where it wants rlm@0: obj.name == "os0" || rlm@0: obj.name == "on1" || rlm@0: obj.name == "os1" || rlm@0: obj.name == "on2" || rlm@0: obj.name == "os2" || rlm@0: obj.name == "on3" || rlm@0: obj.name == "os3" || rlm@0: obj.name == "on4" || rlm@0: obj.name == "os4" || rlm@0: obj.name == "on5" || rlm@0: obj.name == "os5" || rlm@0: obj.name == "on6" || rlm@0: obj.name == "os6" || rlm@0: obj.name == "on7" || rlm@0: obj.name == "os7" || rlm@0: obj.name == "on8" || rlm@0: obj.name == "os8" || rlm@0: obj.name == "on9" || rlm@0: obj.name == "os9") continue; rlm@0: rlm@0: StorVal (); rlm@0: rlm@0: } else rlm@0: if (obj.type == "checkbox" || // just get checkboxex rlm@0: obj.type == "radio") { // and radios rlm@0: if (obj.checked) { rlm@0: val = obj.value; // the value of the selection rlm@0: ChkTok (obj1); rlm@0: StorVal (); rlm@0: } rlm@0: } else rlm@0: if (obj.type == "select-multiple") { //one or more rlm@0: for (j=0; j<obj.options.length; j++) { // run all options rlm@0: if (obj.options[j].selected) { rlm@0: val = obj.options[j].value; // selected value (default) rlm@0: ChkTok (obj1); rlm@0: StorVal (); rlm@0: } rlm@0: } rlm@0: } else rlm@0: if ((obj.type == "text" || // just read text, rlm@0: obj.type == "textarea") && rlm@0: obj.name != "tot" && // but not from here rlm@0: obj.name != "quantity") { rlm@0: val = obj.value; // get the data rlm@0: //if (val == "" && tst) rlm@0: //{ // force an entry rlm@0: // alert ("Enter data for " + obj.id); rlm@0: // return false; rlm@0: //} rlm@0: StorVal (); rlm@0: } rlm@0: } rlm@0: // Now summarize stuff we just processed, above rlm@0: if (op1a.length > 0) obj1.on0.value = op1a; rlm@0: if (op1b.length > 0) obj1.os0.value = op1b; rlm@0: if (op2a.length > 0) obj1.on1.value = op2a; rlm@0: if (op2b.length > 0) obj1.os1.value = op2b; rlm@0: if (op3a.length > 0) obj1.on2.value = op3a; rlm@0: if (op3b.length > 0) obj1.os2.value = op3b; rlm@0: if (op4a.length > 0) obj1.on3.value = op4a; rlm@0: if (op4b.length > 0) obj1.os3.value = op4b; rlm@0: if (op5a.length > 0) obj1.on4.value = op5a; rlm@0: if (op5b.length > 0) obj1.os4.value = op5b; rlm@0: if (op6a.length > 0) obj1.on5.value = op6a; rlm@0: if (op6b.length > 0) obj1.os5.value = op6b; rlm@0: if (op7a.length > 0) obj1.on6.value = op7a; rlm@0: if (op7b.length > 0) obj1.os6.value = op7b; rlm@0: if (op8a.length > 0) obj1.on7.value = op8a; rlm@0: if (op8b.length > 0) obj1.os7.value = op8b; rlm@0: if (op9a.length > 0) obj1.on8.value = op9a; rlm@0: if (op9b.length > 0) obj1.os8.value = op9b; rlm@0: if (itmn.length > 0) obj1.item_number.value = itmn; rlm@0: obj1.item_name.value = des; rlm@0: obj1.amount.value = Dollar (amt); rlm@0: if (obj1.tot) obj1.tot.value = "$" + Dollar (amt); rlm@40: rlm@40: if (!obj1.accept.checked){ rlm@40: rlm@40: return false; rlm@40: } rlm@40: rlm@40: rlm@0: }