Annotation of rat/client/parameter.html, revision 1.7
1.1 www 1: <html>
2: <!--
3: The LearningOnline Network with CAPA
4: Parameter Input Window
1.7 ! www 5: 06/16/00,06/17,11/17,11/18,11/23,11/27,11/28,12/15,12/16,
! 6: 03/21/01 Gerd Kortemeyer
1.1 www 7: -->
8: <head>
9: <title>LON-CAPA</title>
10: </head>
11:
12: <script>
13:
14: var ptype='';
15: var pvalue='';
16: var preturn='';
17: var pcode='';
1.2 www 18: var pscat='';
19: var pmarker='';
1.1 www 20: var pname='';
21:
22: var svalue;
1.2 www 23: var stype;
24: var smarker;
1.1 www 25:
26: var vars=new Array();
27:
1.2 www 28: var cdate=new Date();
29:
30: var csec;
31: var cmin;
32: var chour;
33: var cday;
34:
35: var months=new Array();
36:
37:
1.1 www 38: function selwrite(text) {
39: this.window.selector.document.write(text);
40: }
41:
42: function choicestart() {
43: this.window.choices.document.clear();
44: choicewrite('<html><body bgcolor="#FFFFFF">');
45: }
46:
47: function choiceend() {
48: choicewrite('</body></html>');
49: this.window.choices.document.close();
50: }
51:
52: function choicewrite(text) {
53: this.window.choices.document.write(text);
54: }
55:
56: function tablestart(headtext) {
57: choicewrite('<table><tr bgcolor="#AAFFAA"><th colspan=3>'+
58: headtext+'</th></tr>');
59: }
60:
61: function valline(text,id1,id2) {
62: choicewrite('<tr bgcolor="#AAFFAA"><td>'+text+
63: '</td><td><input type=text size=4 name=val'+
64: id1+'></td><td>incl:<input type=checkbox name=val'+
65: id2+'></td></tr>');
66: }
67:
1.2 www 68: function datecalc() {
69: var sform=choices.document.forms.sch;
70:
71: cdate.setHours(sform.hours.options[sform.hours.selectedIndex].value);
72: cdate.setMinutes(sform.minutes.options[sform.minutes.selectedIndex].value);
73: cdate.setSeconds(sform.minutes.options[sform.seconds.selectedIndex].value);
74: cdate.setDate(sform.date.options[sform.date.selectedIndex].value);
75: cdate.setMonth(sform.month.options[sform.month.selectedIndex].value);
76: cdate.setFullYear(sform.year.options[sform.year.selectedIndex].value);
77:
78: draw();
79: }
80:
81: function hour() {
82: var thishour=cdate.getHours();
83: var i; var j;
84: choicewrite('<select name=hours onChange="parent.datecalc();">');
85: for (i=0;i<=23;i++) {
86: choicewrite('<option value='+i);
87: if (i==thishour) {
88: choicewrite(' selected');
89: }
90: choicewrite('>');
91: if (i==12) { choicewrite('noon'); } else {
92: if (i==0) { choicewrite('midnight') } else {
93:
94: if (i<12) { choicewrite(i+' am'); } else {
95: j=i-12; choicewrite(j+' pm');
96: }
97:
98: }
99: }
100: choicewrite('</option>');
101: }
102: choicewrite('</select>');
103: }
104:
105: function minute() {
106: var thisminutes=cdate.getMinutes();
107: var i;
108: choicewrite('<select name=minutes onChange="parent.datecalc();">');
109: for (i=0;i<=59;i++) {
110: choicewrite('<option value='+i);
111: if (i==thisminutes) {
112: choicewrite(' selected');
113: }
114: choicewrite('>'+i+'</option>');
115: }
116: choicewrite('</select>');
117: }
118:
119: function second() {
120: var thisseconds=cdate.getSeconds();
121: var i;
122: choicewrite('<select name=seconds onChange="parent.datecalc();">');
123: for (i=0;i<=59;i++) {
124: choicewrite('<option value='+i);
125: if (i==thisseconds) {
126: choicewrite(' selected');
127: }
128: choicewrite('>'+i+'</option>');
129: }
130: choicewrite('</select>');
131: }
132:
133:
134: function date() {
135: var thisdate=cdate.getDate();
136: var i;
137: choicewrite('<select name=date onChange="parent.datecalc();">');
138: for (i=1;i<=31;i++) {
139: choicewrite('<option value='+i);
140: if (i==thisdate) {
141: choicewrite(' selected');
142: }
143: choicewrite('>'+i+'</option>');
144: }
145: choicewrite('</select>');
146: }
147:
148: function year() {
149: var thisyear=cdate.getFullYear();
150: var i;
151: choicewrite('<select name=year onChange="parent.datecalc();">');
152: for (i=thisyear-25;i<=thisyear+50;i++) {
153: choicewrite('<option value='+i);
154: if (i==thisyear) {
155: choicewrite(' selected');
156: }
157: choicewrite('>'+i+'</option>');
158: }
159: choicewrite('</select>');
160: }
161:
162: function month() {
163: var thismonth=cdate.getMonth();
164: var i;
165: choicewrite('<select name=month onChange="parent.datecalc();">');
166: for (i=0;i<=11;i++) {
167: choicewrite('<option value='+i);
168: if (i==thismonth) {
169: choicewrite(' selected');
170: }
171: choicewrite('>'+months[i]+'</option>');
172: }
173: choicewrite('</select>');
174: }
175:
176:
177: function intminute() {
178: var thisminutes=cmins;
179: var i;
180: choicewrite('<select name=minutes onChange="parent.intcalc();">');
181: for (i=0;i<=59;i++) {
182: choicewrite('<option value='+i);
183: if (i==thisminutes) {
184: choicewrite(' selected');
185: }
186: choicewrite('>'+i+'</option>');
187: }
188: choicewrite('</select>');
189: }
190:
191: function inthour() {
192: var thishours=chours;
193: var i;
194: choicewrite('<select name=hours onChange="parent.intcalc();">');
195: for (i=0;i<=23;i++) {
196: choicewrite('<option value='+i);
197: if (i==thishours) {
198: choicewrite(' selected');
199: }
200: choicewrite('>'+i+'</option>');
201: }
202: choicewrite('</select>');
203: }
204:
205: function intsecond() {
206: var thisseconds=csecs;
207: var i;
208: choicewrite('<select name=seconds onChange="parent.intcalc();">');
209: for (i=0;i<=59;i++) {
210: choicewrite('<option value='+i);
211: if (i==thisseconds) {
212: choicewrite(' selected');
213: }
214: choicewrite('>'+i+'</option>');
215: }
216: choicewrite('</select>');
217: }
218:
219:
220: function intday() {
221: var thisdate=cdays;
222: var i;
223: choicewrite('<select name=date onChange="parent.intcalc();">');
224: for (i=0;i<=31;i++) {
225: choicewrite('<option value='+i);
226: if (i==thisdate) {
227: choicewrite(' selected');
228: }
229: choicewrite('>'+i+'</option>');
230: }
231: choicewrite('</select>');
232: }
233:
234: function intcalc() {
235: var sform=choices.document.forms.sch;
236: svalue=((sform.date.options[sform.date.selectedIndex].value*24+
237: sform.hours.options[sform.hours.selectedIndex].value*1)*60+
238: sform.minutes.options[sform.minutes.selectedIndex].value*1)*60+
239: sform.seconds.options[sform.seconds.selectedIndex].value*1;
240: draw();
241: }
242:
1.6 www 243: function integereval() {
244: svalue=choices.document.forms.sch.intval.value;
245: svalue=Math.round(svalue);
246: if (pscat=='zeropos') { svalue=Math.abs(svalue); }
247: if ((pscat=='pos') && (svalue==0)) {
248: svalue='';
249: }
250: draw();
251: }
252:
253: function floateval() {
254: svalue=choices.document.forms.sch.floatval.value;
255: svalue=1.0*svalue;
256: if (pscat=='pos') { svalue=Math.abs(svalue); }
257: if ((pscat=='zeroone') && ((svalue<0) || (svalue>1))) {
258: svalue='';
259: }
260: draw();
261: }
262:
263: function stringeval() {
264: svalue=choices.document.forms.sch.stringval.value;
265: draw();
266: }
267:
1.2 www 268: function intervaldis() {
269: csecs=svalue;
270: cdays=Math.floor(csecs/86400);
271: csecs-=cdays*86400;
272: chours=Math.floor(csecs/3600);
273: csecs-=chours*3600;
274: cmins=Math.floor(csecs/60);
275: csecs-=cmins*60;
276: choicewrite(cdays+' days '+chours+' hours '
277: +cmins+' mins '+csecs+' secs');
278: }
279:
280:
281:
1.1 www 282: function afterproc() {
283: choicewrite('<tr bgcolor="#AAFFAA"><td colspan=3>Error after rounding: '
284: +'<input type=checkbox name=val1></td></tr>');
285: }
286:
287: function draw() {
288: choicestart();
1.6 www 289: choicewrite('<form name=sch');
290: if (ptype=='int') {
291: choicewrite(' action="javascript:integereval();"');
292: }
293: if (ptype=='float') {
294: choicewrite(' action="javascript:floateval();"');
295: }
296: if (ptype=='string') {
297: choicewrite(' action="javascript:stringeval();"');
298: }
299: choicewrite('>');
1.1 www 300: if (ptype=='tolerance') {
1.2 www 301: // 0: pscat
1.1 www 302: // 1: after processing
1.2 www 303: if (pscat=='default') {
1.1 www 304: tablestart('Use default value or algorithm of resource');
305: }
1.2 www 306: if (pscat=='exact') {
1.1 www 307: tablestart('Accept only exact value, zero tolerance');
308: afterproc();
309: }
1.2 www 310: if (pscat=='relative_sym') {
1.1 www 311: // 2: percentage
312: // 3: open
313: tablestart('Percentage error, symmetric around value');
314: valline('Percentage',2,3);
315: afterproc();
316: }
1.2 www 317: if (pscat=='relative') {
1.1 www 318: // 2: left
319: // 3: open
320: // 4: right
321: // 5: open
322: tablestart('Percentage error, asymmetric around value');
323: valline('Upper percentage',2,3);
324: valline('Lower percentage',4,5);
325: afterproc();
326: }
1.2 www 327: if (pscat=='absolute_sym') {
1.1 www 328: tablestart('Absolute error, symmetric around value');
329: valline('Value',2,3);
330: afterproc();
331: }
1.2 www 332: if (pscat=='absolute') {
1.1 www 333: tablestart('Absolute error, asymmetric around value');
334: valline('Upper value',2,3);
335: valline('Lower value',4,5);
336: afterproc();
337: }
1.2 www 338: if (pscat=='sigdigits') {
1.1 www 339: tablestart('Agreement on significant digits');
340: choicewrite('<tr bgcolor="#AAFFAA"><td colspan=3>Number of digits: '
341: +'<input type=text size=4 name=val2></td></tr>');
342:
1.6 www 343: choicewrite('<tr bgcolor="#AAFFAA"><td colspan=3>Accept if more digits given: '
1.1 www 344: +'<input type=checkbox name=val3></td></tr>');
345:
346: }
347: }
348:
349: if (ptype=='date') {
1.2 www 350: if (pscat=='default') {
351: tablestart('Default value or none');
352: choicewrite('</table>');
353: } else {
354: if (pscat=='start') {
355: tablestart('Starting or opening date and time');
356: }
357: if (pscat=='end') {
358: tablestart('Ending or closing date and time');
359: }
360: if (pscat=='interval') {
361: tablestart('Time interval');
362: choicewrite('<tr bgcolor="#AAFFAA"><td colspan=3>');
363: intervaldis();
364: choicewrite('</td></tr><tr bgcolor="#AAFFAA"><td>Time:'
365: +'</td><td colspan=2>');
366: intday();choicewrite('days ');
367: inthour();choicewrite('hours ');
368: intminute(); choicewrite('mins '); intsecond();
369: choicewrite('secs</td></tr></table>');
370: } else {
371: choicewrite('<tr bgcolor="#AAFFAA"><td colspan=3>'
372: +cdate.toString()+
373: '</td></tr><tr bgcolor="#AAFFAA"><td>Date:</td><td colspan=2>');
374: month();date();year();
375: choicewrite('</td></tr><tr bgcolor="#AAFFAA"><td>Time:'
376: +'</td><td colspan=2>');hour();choicewrite('h ');minute();
377: choicewrite('m ');second();
378: choicewrite('s</td></tr></table>');
379: }
380: }
1.1 www 381: }
382:
1.6 www 383: if (ptype=='int') {
384: if (pscat=='default') {
385: tablestart('Default value or none');
386: choicewrite('</table>');
387: } else {
388: if (pscat=='pos') {
389: tablestart('Positive (non-zero) integer');
390: }
391: if (pscat=='zeropos') {
392: tablestart('Positive integer or zero');
393: }
394: if (pscat=='any') {
395: tablestart('Integer');
396: }
397: choicewrite('<tr bgcolor="#AAFFAA"><td>Value:</td><td colspan=2>');
398: choicewrite('<input name=intval size=10 value="'+svalue+
399: '" name=intval onChange="parent.integereval()">');
400: choicewrite('</td></table>');
401: }
1.1 www 402: }
403:
1.6 www 404: if (ptype=='float') {
405: if (pscat=='default') {
406: tablestart('Default value or none');
407: choicewrite('</table>');
408: } else {
409: if (pscat=='pos') {
410: tablestart('Positive floating point number or zero');
411: }
412: if (pscat=='zeroone') {
413: tablestart('Floating point number between zero and one');
414: }
415: if (pscat=='any') {
416: tablestart('Floating point number');
417: }
418: choicewrite('<tr bgcolor="#AAFFAA"><td>Value:</td><td colspan=2>');
419: choicewrite('<input name=floatval size=10 value="'+svalue+
420: '" name=floatval onChange="parent.floateval()">');
421: choicewrite('</td></table>');
422: }
1.1 www 423: }
424:
1.6 www 425: if (ptype=='string') {
426: if (pscat=='default') {
427: tablestart('Default value or none');
428: choicewrite('</table>');
429: } else {
430: if (pscat=='any') {
431: tablestart('Text');
432: }
433: choicewrite('<tr bgcolor="#AAFFAA"><td>Value:</td><td colspan=2>');
434: choicewrite('<input name=intval size=20 value="'+svalue+
435: '" name=stringval onChange="parent.stringeval()">');
436: choicewrite('</td></table>');
437: }
1.1 www 438: }
439:
440: choicewrite('</table></form>');
441: choiceend();
442: }
443:
444: function sopt(va,text) {
445: selwrite('<option value="'+va+'"');
1.2 www 446: if (va==pscat) {
1.1 www 447: selwrite(' selected');
448: }
449: selwrite('>'+text+'</option>');
450: }
451:
452: function catchange() {
453: var sform=selector.document.forms.fsel.fcat;
1.2 www 454: pscat=sform.options[sform.selectedIndex].value;
1.1 www 455: draw();
456: }
457:
458: function assemble() {
1.2 www 459: if ((ptype=='date') && (pscat!='interval')) {
460: svalue=Math.round(cdate.getTime()/1000);
461: }
1.6 www 462: if (pscat=='default') { svalue=''; }
1.2 www 463: stype=ptype+'_'+pscat;
1.1 www 464: }
465:
466:
467: function init() {
468: var i;
1.2 www 469: var subs=new Array();
1.1 www 470: var namevalue=this.window.location.search.split('&');
471: namevalue[0]=namevalue[0].substr(1,namevalue[0].length-1);
472:
473: for (i=0;i<namevalue.length;i++) {
474: var pair=namevalue[i].split('=');
1.3 www 475: pair[1]=unescape(pair[1]);
1.1 www 476: if (pair[0]=='value') { pvalue=pair[1]; }
1.2 www 477: if (pair[0]=='type') { subs=pair[1].split('_');
478: ptype=subs[0];
479: pscat=subs[1];
480: if (subs[2]!=undefined) { pscat+='_'+subs[2]; }
1.6 www 481: if ((pscat=='') || (pscat==undefined)) {
482: pscat='default';
483: }
1.2 www 484: }
1.1 www 485: if (pair[0]=='return') { preturn=pair[1]; }
486: if (pair[0]=='call') { pcode=pair[1]; }
1.2 www 487: if (pair[0]=='marker') { pmarker=pair[1]; }
1.1 www 488: if (pair[0]=='name') { pname=pair[1]; }
489: }
490:
491: svalue=pvalue;
1.6 www 492: if (((ptype=='float') || (ptype=='string') || (ptype=='int')) &&
493: (pscat=='default') &&
494: (svalue!=undefined) && (svalue!=0) && (svalue!='')) { pscat='any'; }
1.1 www 495:
496: this.window.selector.document.clear();
497: selwrite('<html><body bgcolor="#FFFFFF">');
498:
1.7 ! www 499: selwrite('<form name="fsel"><h3>'+pname+'</h3>');
1.1 www 500: selwrite('<select name="fcat" onChange="parent.catchange();">');
501: if (ptype=='tolerance') {
502: sopt('default','Default');
503: sopt('exact','Exact Value (no tolerance)');
504: sopt('relative_sym','Relative Tolerance, Symmetric (percent)');
505: sopt('relative','Relative Tolerance (percentages)');
506: sopt('absolute_sym','Absolute Tolerance, Symmetric (value)');
507: sopt('absolute','Absolute Tolerance (values)');
508: sopt('sigdigits','Significant Digits (number)');
509: }
510:
511: if (ptype=='date') {
512: sopt('default','Default');
513: sopt('start','Starting Date');
514: sopt('end','Ending Date');
1.2 www 515: sopt('interval','Time Interval');
516:
517: if ((pvalue!='') && (pvalue!=undefined)) {
518: cdate.setTime(pvalue*1000);
519: }
520:
521: months[0]='January';
522: months[1]='February';
523: months[2]='March';
524: months[3]='April';
525: months[4]='May';
526: months[5]='June';
527: months[6]='July';
528: months[7]='August';
529: months[8]='September';
530: months[9]='October';
531: months[10]='November';
532: months[11]='December';
1.1 www 533: }
1.2 www 534:
1.6 www 535: if (ptype=='int') {
536: sopt('default','Default');
537: sopt('pos','Positive Integer, Not Zero');
538: sopt('zeropos','Positive Integer or Zero');
539: sopt('any','Integer');
1.1 www 540: }
541:
1.6 www 542: if (ptype=='float') {
543: sopt('default','Default');
544: sopt('zeroone','Floating Point between 0 and 1');
545: sopt('pos','Positive Floating Point');
546: sopt('any','Floating Point');
1.1 www 547:
548: }
549:
1.6 www 550: if (ptype=='string') {
551: sopt('default','Default');
552: sopt('string','String Value');
1.1 www 553: }
554:
555: selwrite('</select></form>');
556:
1.2 www 557: selwrite('<a href="javascript:parent.assemble();');
1.1 www 558: if (preturn!='') {
1.4 www 559: selwrite(
560: 'parent.opener.document.'+preturn+'_value.value=parent.window.svalue;');
561: selwrite(
562: 'parent.opener.document.'+preturn+'_type.value=parent.window.stype;');
1.2 www 563: }
564: if (pmarker!='') {
1.4 www 565: selwrite(
566: 'parent.opener.document.'+preturn+'_marker.value=parent.window.pmarker;');
1.1 www 567: }
568: if (pcode!='') {
1.4 www 569: selwrite('parent.opener.'+pcode+'();');
1.1 www 570: }
1.4 www 571: selwrite('">Store</a> ');
1.5 www 572:
573: selwrite('<a href="javascript:');
574: selwrite(
575: 'parent.opener.document.'+preturn+'_value.value='+"'';");
576: if (pmarker!='') {
577: selwrite(
578: 'parent.opener.document.'+preturn+'_marker.value=parent.window.pmarker;');
579: }
580: if (pcode!='') {
581: selwrite('parent.opener.'+pcode+'();');
582: }
583: selwrite('">Delete</a> ');
1.4 www 584:
585: selwrite('<a href="javascript:');
586: if (preturn!='') {
587: selwrite('parent.opener.document.'+preturn+'_value.value='+"'';");
588: selwrite('parent.opener.document.'+preturn+'_type.value='+"'';");
589: }
590: if (pmarker!='') {
591: selwrite('parent.opener.document.'+preturn+'_marker.value='+"'';");
592: }
593: if (pcode!='') {
594: selwrite('parent.opener.'+pcode+'();');
595: }
596: selwrite('">Cancel</a>');
1.1 www 597:
598: selwrite('</body></html>');
599: this.window.selector.document.close();
1.2 www 600: draw();
1.1 www 601:
602: }
603:
604: </script>
605:
1.2 www 606: <frameset rows="120,*" onLoad="init();">
1.1 www 607: <frame name=selector src="empty.html">
608: <frame name=choices src="empty.html">
609: </frameset>
610:
611:
612:
613: </html>
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>