Annotation of rat/client/parameter.html, revision 1.64.2.4
1.56 raeburn 1: <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Frameset//EN"
2: "http://www.w3.org/TR/xhtml1/DTD/xhtml1-frameset.dtd">
3: <html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
1.1 www 4: <!--
5: The LearningOnline Network with CAPA
6: Parameter Input Window
1.16 albertel 7: //
1.64.2.4! raeburn 8: // $Id: parameter.html,v 1.64.2.3 2016/08/05 17:39:45 raeburn Exp $
1.16 albertel 9: //
10: // Copyright Michigan State University Board of Trustees
11: //
12: // This file is part of the LearningOnline Network with CAPA (LON-CAPA).
13: //
14: // LON-CAPA is free software; you can redistribute it and/or modify
15: // it under the terms of the GNU General Public License as published by
16: // the Free Software Foundation; either version 2 of the License, or
17: // (at your option) any later version.
18: //
19: // LON-CAPA is distributed in the hope that it will be useful,
20: // but WITHOUT ANY WARRANTY; without even the implied warranty of
21: // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
22: // GNU General Public License for more details.
23: //
24: // You should have received a copy of the GNU General Public License
25: // along with LON-CAPA; if not, write to the Free Software
26: // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
27: //
28: // /home/httpd/html/adm/gpl.txt
29: //
30: // http://www.lon-capa.org/
31: //
1.1 www 32: -->
33: <head>
1.56 raeburn 34: <meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
1.1 www 35: <title>LON-CAPA</title>
36:
1.46 albertel 37: <script type="text/javascript">
1.56 raeburn 38: // <![CDATA[
1.1 www 39:
40: var ptype='';
41: var pvalue='';
42: var preturn='';
43: var pcode='';
1.2 www 44: var pscat='';
45: var pmarker='';
1.63 www 46: var pmodal='';
1.1 www 47: var pname='';
48:
1.31 www 49: var defhour=0;
50: var defmin=0;
51: var defsec=0;
52:
1.1 www 53: var svalue;
1.2 www 54: var stype;
55: var smarker;
1.1 www 56:
57: var vars=new Array();
58:
1.2 www 59: var cdate=new Date();
60:
61: var csec;
62: var cmin;
63: var chour;
64: var cday;
65:
66: var months=new Array();
67:
68:
1.1 www 69: function selwrite(text) {
70: this.window.selector.document.write(text);
71: }
72:
73: function choicestart() {
1.61 raeburn 74: this.window.choices.document.open();
1.62 raeburn 75: choicewrite('<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">');
76: choicewrite('<html xmlns="http://www.w3.org/1999/xhtml">');
1.55 bisitz 77: choicewrite('<head>');
1.62 raeburn 78: choicewrite('<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />');
79: choicewrite('<title>LON-CAPA</title>');
1.55 bisitz 80: choicewrite('<style type="text/css">');
81: choicewrite('<!--');
82: choicewrite('body {');
83: choicewrite('font-family: Verdana,Arial,Helvetica,sans-serif;');
84: choicewrite('line-height:130%;');
85: choicewrite('font-size:0.83em;');
86: choicewrite('background: #FFFFFF;');
87: choicewrite('}');
88: choicewrite('table.LC_parmsel_table {font-size: 90%;}');
89: choicewrite('table.LC_parmsel_table tr td { padding: 5px; border: 1px solid #C8C8C8;}');
90: choicewrite('-->');
91: choicewrite('</style>');
92: choicewrite('</head>');
1.62 raeburn 93: choicewrite('<body>');
1.1 www 94: }
95:
96: function choiceend() {
97: choicewrite('</body></html>');
98: this.window.choices.document.close();
99: }
100:
101: function choicewrite(text) {
102: this.window.choices.document.write(text);
103: }
104:
105: function tablestart(headtext) {
1.55 bisitz 106: choicewrite('<table class="LC_parmsel_table"><tr bgcolor="#C5DB99"><th colspan="3">'+
1.1 www 107: headtext+'</th></tr>');
108: }
109:
110: function valline(text,id1,id2) {
1.52 bisitz 111: choicewrite('<tr><td>'+text+
1.51 bisitz 112: '</td><td><input type="text" size="4" name="val'+
1.53 bisitz 113: id1+'" /></td><td>incl:<input type="checkbox" name="val'+
114: id2+'" /></td></tr>');
1.1 www 115: }
116:
1.46 albertel 117: function escapeHTML(text) {
118: text = text.replace(/&/g, '&');
119: text = text.replace(/"/g, '"');
120: text = text.replace(/</g, '<');
121: text = text.replace(/>/g, '>');
122: return text;
123: }
124:
1.2 www 125: function datecalc() {
126: var sform=choices.document.forms.sch;
127:
128: cdate.setHours(sform.hours.options[sform.hours.selectedIndex].value);
129: cdate.setMinutes(sform.minutes.options[sform.minutes.selectedIndex].value);
130: cdate.setSeconds(sform.minutes.options[sform.seconds.selectedIndex].value);
131: cdate.setDate(sform.date.options[sform.date.selectedIndex].value);
132: cdate.setMonth(sform.month.options[sform.month.selectedIndex].value);
133: cdate.setFullYear(sform.year.options[sform.year.selectedIndex].value);
134:
135: draw();
136: }
137:
138: function hour() {
139: var thishour=cdate.getHours();
140: var i; var j;
1.53 bisitz 141: choicewrite('<select name="hours" onchange="parent.datecalc();">');
1.2 www 142: for (i=0;i<=23;i++) {
1.54 bisitz 143: choicewrite('<option value="'+i+'"');
1.2 www 144: if (i==thishour) {
1.54 bisitz 145: choicewrite(' selected="selected"');
1.2 www 146: }
147: choicewrite('>');
148: if (i==12) { choicewrite('noon'); } else {
149: if (i==0) { choicewrite('midnight') } else {
150:
151: if (i<12) { choicewrite(i+' am'); } else {
152: j=i-12; choicewrite(j+' pm');
153: }
154:
155: }
156: }
157: choicewrite('</option>');
158: }
159: choicewrite('</select>');
160: }
161:
162: function minute() {
163: var thisminutes=cdate.getMinutes();
164: var i;
1.53 bisitz 165: choicewrite('<select name="minutes" onchange="parent.datecalc();">');
1.2 www 166: for (i=0;i<=59;i++) {
1.54 bisitz 167: choicewrite('<option value="'+i+'"');
1.2 www 168: if (i==thisminutes) {
1.54 bisitz 169: choicewrite(' selected="selected"');
1.2 www 170: }
171: choicewrite('>'+i+'</option>');
172: }
173: choicewrite('</select>');
174: }
175:
176: function second() {
177: var thisseconds=cdate.getSeconds();
178: var i;
1.53 bisitz 179: choicewrite('<select name="seconds" onchange="parent.datecalc();">');
1.2 www 180: for (i=0;i<=59;i++) {
1.54 bisitz 181: choicewrite('<option value="'+i+'"');
1.2 www 182: if (i==thisseconds) {
1.54 bisitz 183: choicewrite(' selected="selected"');
1.2 www 184: }
185: choicewrite('>'+i+'</option>');
186: }
187: choicewrite('</select>');
188: }
189:
190:
191: function date() {
192: var thisdate=cdate.getDate();
193: var i;
1.53 bisitz 194: choicewrite('<select name="date" onchange="parent.datecalc();">');
1.2 www 195: for (i=1;i<=31;i++) {
1.54 bisitz 196: choicewrite('<option value="'+i+'"');
1.2 www 197: if (i==thisdate) {
1.54 bisitz 198: choicewrite(' selected="selected"');
1.2 www 199: }
200: choicewrite('>'+i+'</option>');
201: }
202: choicewrite('</select>');
203: }
204:
205: function year() {
206: var thisyear=cdate.getFullYear();
1.19 www 207: var nowdate=new Date();
208: var nowyear=nowdate.getFullYear();
1.33 albertel 209: if ( !thisyear ) { thisyear=nowyear; }
1.19 www 210: var loweryear=thisyear-2;
211: var upperyear=thisyear+5;
212: if (thisyear>nowyear) { loweryear=nowyear-2; }
213: if (thisyear<nowyear) { upperyear=nowyear+5; }
1.2 www 214: var i;
1.53 bisitz 215: choicewrite('<select name="year" onchange="parent.datecalc();">');
1.19 www 216: for (i=loweryear;i<=upperyear;i++) {
1.54 bisitz 217: choicewrite('<option value="'+i+'"');
1.2 www 218: if (i==thisyear) {
1.54 bisitz 219: choicewrite(' selected="selected"');
1.2 www 220: }
221: choicewrite('>'+i+'</option>');
222: }
223: choicewrite('</select>');
224: }
225:
226: function month() {
227: var thismonth=cdate.getMonth();
228: var i;
1.53 bisitz 229: choicewrite('<select name="month" onchange="parent.datecalc();">');
1.2 www 230: for (i=0;i<=11;i++) {
1.54 bisitz 231: choicewrite('<option value="'+i+'"');
1.2 www 232: if (i==thismonth) {
1.54 bisitz 233: choicewrite(' selected="selected"');
1.2 www 234: }
235: choicewrite('>'+months[i]+'</option>');
236: }
237: choicewrite('</select>');
238: }
239:
240:
241: function intminute() {
242: var thisminutes=cmins;
243: var i;
1.64.2.3 raeburn 244: var result = '';
245: result += '<select name="minutes" onchange="parent.intcalc();">';
1.2 www 246: for (i=0;i<=59;i++) {
1.64.2.3 raeburn 247: result += '<option value="'+i+'"';
1.2 www 248: if (i==thisminutes) {
1.64.2.3 raeburn 249: result += ' selected="selected"';
1.2 www 250: }
1.64.2.3 raeburn 251: result += '>'+i+'</option>';
1.2 www 252: }
1.64.2.3 raeburn 253: result += '</select>';
254: return result;
1.2 www 255: }
256:
257: function inthour() {
258: var thishours=chours;
259: var i;
1.64.2.3 raeburn 260: var result = '';
261: result += '<select name="hours" onchange="parent.intcalc();">';
1.2 www 262: for (i=0;i<=23;i++) {
1.64.2.3 raeburn 263: result += '<option value="'+i+'"';
1.2 www 264: if (i==thishours) {
1.64.2.3 raeburn 265: result += ' selected="selected"';
1.2 www 266: }
1.64.2.3 raeburn 267: result += '>'+i+'</option>';
1.2 www 268: }
1.64.2.3 raeburn 269: result += '</select>';
270: return result;
271: }
1.2 www 272:
273: function intsecond() {
274: var thisseconds=csecs;
275: var i;
1.64.2.3 raeburn 276: var result = '';
277: result += '<select name="seconds" onchange="parent.intcalc();">';
1.2 www 278: for (i=0;i<=59;i++) {
1.64.2.3 raeburn 279: result += '<option value="'+i+'"';
1.2 www 280: if (i==thisseconds) {
1.64.2.3 raeburn 281: result += ' selected="selected"';
1.2 www 282: }
1.64.2.3 raeburn 283: result += '>'+i+'</option>';
1.2 www 284: }
1.64.2.3 raeburn 285: result += '</select>';
286: return result;
287: }
1.2 www 288:
289:
290: function intday() {
291: var thisdate=cdays;
292: var i;
1.64.2.3 raeburn 293: var result ='';
294: result += '<select name="date" onchange="parent.intcalc();">';
1.2 www 295: for (i=0;i<=31;i++) {
1.64.2.3 raeburn 296: result += '<option value="'+i+'"';
1.2 www 297: if (i==thisdate) {
1.64.2.3 raeburn 298: result += ' selected="selected"';
1.2 www 299: }
1.64.2.3 raeburn 300: result += '>'+i+'</option>';
1.2 www 301: }
1.64.2.3 raeburn 302: result += '</select>';
303: return result;
1.2 www 304: }
305:
306: function intcalc() {
307: var sform=choices.document.forms.sch;
308: svalue=((sform.date.options[sform.date.selectedIndex].value*24+
309: sform.hours.options[sform.hours.selectedIndex].value*1)*60+
310: sform.minutes.options[sform.minutes.selectedIndex].value*1)*60+
311: sform.seconds.options[sform.seconds.selectedIndex].value*1;
312: draw();
313: }
314:
1.6 www 315: function integereval() {
316: svalue=choices.document.forms.sch.intval.value;
317: svalue=Math.round(svalue);
318: if (pscat=='zeropos') { svalue=Math.abs(svalue); }
319: if ((pscat=='pos') && (svalue==0)) {
320: svalue='';
321: }
1.12 www 322: if (pscat.indexOf('inrange')!=-1) {
1.10 www 323: var rangeparts=new Array;
324: rangeparts=split('_',pscat);
1.12 www 325: rangeparts=split(',',rangeparts[1]);
1.10 www 326: if (svalue<rangeparts[0]) { svalue=rangeparts[0]; }
327: if (svalue>rangeparts[1]) { svalue=rangeparts[1]; }
328: }
1.6 www 329: draw();
330: }
331:
332: function floateval() {
333: svalue=choices.document.forms.sch.floatval.value;
334: svalue=1.0*svalue;
335: if (pscat=='pos') { svalue=Math.abs(svalue); }
336: if ((pscat=='zeroone') && ((svalue<0) || (svalue>1))) {
337: svalue='';
338: }
339: draw();
340: }
341:
342: function stringeval() {
343: svalue=choices.document.forms.sch.stringval.value;
344: draw();
345: }
346:
1.25 www 347: function radiostringeval(newval) {
348: svalue=newval;
349: draw();
350: }
351:
1.29 www 352: function callradiostringeval(newval) {
1.64.2.2 raeburn 353: return 'onclick="parent.radiostringeval(\''+newval+'\')"';
1.29 www 354: }
355:
1.2 www 356: function intervaldis() {
357: csecs=svalue;
358: cdays=Math.floor(csecs/86400);
359: csecs-=cdays*86400;
360: chours=Math.floor(csecs/3600);
361: csecs-=chours*3600;
362: cmins=Math.floor(csecs/60);
363: csecs-=cmins*60;
364: choicewrite(cdays+' days '+chours+' hours '
365: +cmins+' mins '+csecs+' secs');
366: }
1.21 www 367:
368: function pickcolor(picked) {
369: svalue=picked;
370: draw();
371: }
372:
373: function colorfield(ir,ig,ib) {
374: var col=new Array;
1.23 www 375: col=["00","11","22","44","66","88","AA","CC","DD","EE","FF"];
1.21 www 376: var color='#'+col[ir]+col[ig]+col[ib];
1.23 www 377: var selection="<font color='"+color+"'>X</font>";
378: if (color==svalue) { selection="<font color='#"+col[10-ir]+col[10-ig]+col[10-ib]+"'>X</font>"; }
1.21 www 379: choicewrite('<td bgcolor="'+color+'"><a href="javascript:parent.pickcolor('+"'"+
380: color+"'"+')">'+selection+'</a></td>');
381:
382: }
383:
1.1 www 384: function draw() {
385: choicestart();
1.51 bisitz 386: choicewrite('<form name="sch"');
1.6 www 387: if (ptype=='int') {
388: choicewrite(' action="javascript:integereval();"');
389: }
390: if (ptype=='float') {
391: choicewrite(' action="javascript:floateval();"');
392: }
393: if (ptype=='string') {
394: choicewrite(' action="javascript:stringeval();"');
395: }
1.62 raeburn 396: if (ptype != 'int' && ptype != 'float' && ptype != 'string') {
397: choicewrite(' action=""');
398: }
1.6 www 399: choicewrite('>');
1.1 www 400: if (ptype=='tolerance') {
1.2 www 401: // 0: pscat
402: if (pscat=='default') {
1.1 www 403: tablestart('Use default value or algorithm of resource');
404: }
1.2 www 405: if (pscat=='relative_sym') {
1.1 www 406: // 2: percentage
407: // 3: open
408: tablestart('Percentage error, symmetric around value');
409: valline('Percentage',2,3);
1.13 www 410: if ((svalue!='') && (typeof(svalue)!="undefined")) {
411: choices.document.forms.sch.val2.value=parseInt(svalue);
412: if (svalue.indexOf('+')!=-1) {
413: choices.document.forms.sch.val3.checked=true;
414: }
415: }
1.1 www 416: }
1.2 www 417: if (pscat=='relative') {
1.1 www 418: // 2: left
419: // 3: open
420: // 4: right
421: // 5: open
422: tablestart('Percentage error, asymmetric around value');
423: valline('Upper percentage',2,3);
424: valline('Lower percentage',4,5);
1.17 matthew 425: var range1=new Array;
1.13 www 426: if ((svalue!='') && (typeof(svalue)!="undefined")) {
1.17 matthew 427: range1=svalue.split(',');
428: if (typeof(range1[1])=='undefined') { range1[1]=range1[0]; }
429: choices.document.forms.sch.val2.value=parseFloat(range1[0]);
430: if (range1[0].indexOf('+')!=-1) {
1.13 www 431: choices.document.forms.sch.val3.checked=true;
432: }
1.17 matthew 433: choices.document.forms.sch.val4.value=parseFloat(range1[1]);
434: if (range1[1].indexOf('+')!=-1) {
1.13 www 435: choices.document.forms.sch.val5.checked=true;
436: }
437: }
1.1 www 438: }
1.2 www 439: if (pscat=='absolute_sym') {
1.1 www 440: tablestart('Absolute error, symmetric around value');
441: valline('Value',2,3);
1.13 www 442: if ((svalue!='') && (typeof(svalue)!="undefined")) {
1.15 www 443: choices.document.forms.sch.val2.value=parseFloat(svalue);
1.13 www 444: if (svalue.indexOf('+')!=-1) {
445: choices.document.forms.sch.val3.checked=true;
446: }
447: }
1.1 www 448: }
1.2 www 449: if (pscat=='absolute') {
1.1 www 450: tablestart('Absolute error, asymmetric around value');
451: valline('Upper value',2,3);
452: valline('Lower value',4,5);
1.17 matthew 453: var range2=new Array;
1.13 www 454: if ((svalue!='') && (typeof(svalue)!="undefined")) {
455: range=svalue.split(',');
1.17 matthew 456: if (typeof(range2[1])=='undefined') { range2[1]=range2[0]; }
457: choices.document.forms.sch.val2.value=parseFloat(range2[0]);
458: if (range2[0].indexOf('+')!=-1) {
1.13 www 459: choices.document.forms.sch.val3.checked=true;
460: }
1.17 matthew 461: choices.document.forms.sch.val4.value=parseFloat(range2[1]);
462: if (range2[1].indexOf('+')!=-1) {
1.13 www 463: choices.document.forms.sch.val5.checked=true;
464: }
465: }
1.1 www 466: }
467: }
468:
469: if (ptype=='date') {
1.2 www 470: if (pscat=='default') {
471: tablestart('Default value or none');
472: choicewrite('</table>');
473: } else {
474: if (pscat=='start') {
1.24 www 475: tablestart('Date and time');
1.2 www 476: }
477: if (pscat=='end') {
1.24 www 478: tablestart('Date and time');
1.2 www 479: }
480: if (pscat=='interval') {
481: tablestart('Time interval');
1.64.2.3 raeburn 482: choicewrite( [
483: '<tr><td colspan="3">'+intervaldis()+'</td></tr>',
484: '<tr><td>Time:</td><td colspan="2">',
485: '<span style="white-space:nowrap">'+intday()+' days </span>',
486: '<span style="white-space:nowrap">'+inthour()+' hours</span>',
487: '<span style="white-space:nowrap">'+intminute()+' mins</span>',
488: '<span style="white-space:nowrap">'+intsecond()+' secs</span>',
489: '</td></tr>',
490: '</table>',
491: '<br />',
492: ].join("\n"));
1.2 www 493: } else {
1.52 bisitz 494: choicewrite('<tr><td colspan="3">'
1.2 www 495: +cdate.toString()+
1.52 bisitz 496: '</td></tr><tr><td>Date:</td><td colspan="2">');
1.2 www 497: month();date();year();
1.52 bisitz 498: choicewrite('</td></tr><tr><td>Time:'
1.51 bisitz 499: +'</td><td colspan="2">');hour();choicewrite('h ');minute();
1.2 www 500: choicewrite('m ');second();
501: choicewrite('s</td></tr></table>');
502: }
503: }
1.1 www 504: }
505:
1.6 www 506: if (ptype=='int') {
1.19 www 507: var pscatparts=new Array;
508: pscatparts=pscat.split(',');
509: pscat=pscatparts[0];
1.6 www 510: if (pscat=='default') {
511: tablestart('Default value or none');
1.14 www 512: choicewrite('</table>');
1.6 www 513: } else {
1.14 www 514: if (pscat=='range') {
515: tablestart('Integer range');
1.52 bisitz 516: choicewrite('<tr><td>Lower Value:'+
1.51 bisitz 517: '</td><td colspan="2"><input type="text" size="4" name="val2'+
1.53 bisitz 518: '" /></td></tr>');
1.52 bisitz 519: choicewrite('<tr><td>Upper Value:'+
1.51 bisitz 520: '</td><td colspan="2"><input type="text" size="4" name="val4'+
1.53 bisitz 521: '" /></td></tr></table>');
1.14 www 522: var range=new Array;
523: if ((svalue!='') && (typeof(svalue)!="undefined")) {
524: range=svalue.split(',');
525: if (typeof(range[1])=='undefined') { range[1]=range[0]; }
526: choices.document.forms.sch.val2.value=parseInt(range[0]);
527: choices.document.forms.sch.val4.value=parseInt(range[1]);
528: }
529: } else {
1.6 www 530: if (pscat=='pos') {
531: tablestart('Positive (non-zero) integer');
532: }
533: if (pscat=='zeropos') {
534: tablestart('Positive integer or zero');
535: }
1.12 www 536: if (pscat.indexOf('inrange')!=-1) {
1.10 www 537: var rangeparts=new Array;
1.12 www 538: rangeparts=split(',',pscat);
1.10 www 539: tablestart('Integer in the range ['+rangeparts[1]+']');
540: }
1.6 www 541: if (pscat=='any') {
542: tablestart('Integer');
543: }
1.52 bisitz 544: choicewrite('<tr><td>Value:</td><td colspan="2">');
1.51 bisitz 545: choicewrite('<input name="intval" size="10" value="'+escapeHTML(svalue)+
1.53 bisitz 546: '" onchange="parent.integereval()" />');
1.54 bisitz 547: choicewrite('</td></tr></table>');
1.6 www 548: }
1.14 www 549: }
1.1 www 550: }
551:
1.6 www 552: if (ptype=='float') {
553: if (pscat=='default') {
554: tablestart('Default value or none');
555: choicewrite('</table>');
556: } else {
557: if (pscat=='pos') {
558: tablestart('Positive floating point number or zero');
559: }
560: if (pscat=='zeroone') {
561: tablestart('Floating point number between zero and one');
562: }
563: if (pscat=='any') {
564: tablestart('Floating point number');
565: }
1.52 bisitz 566: choicewrite('<tr><td>Value:</td><td colspan="2">');
1.51 bisitz 567: choicewrite('<input name="floatval" size="10" value="'+escapeHTML(svalue)+
1.53 bisitz 568: '" onchange="parent.floateval()" />');
1.54 bisitz 569: choicewrite('</td></tr></table>');
1.6 www 570: }
1.1 www 571: }
572:
1.6 www 573: if (ptype=='string') {
1.64.2.4! raeburn 574: if ((pscat=='any') || (pscat=='') || (pscat=='default') ||
1.42 albertel 575: (typeof(pscat)=='undefined')) {
1.6 www 576: tablestart('Text');
1.54 bisitz 577: choicewrite('<tr><td>Value:</td><td colspan="2">');
1.46 albertel 578: choicewrite('<input name="stringval" size="20" value="'+escapeHTML(svalue)+
1.53 bisitz 579: '" type="text" onchange="parent.stringeval()" />');
1.25 www 580: }
581: if (pscat=='yesno') {
582: tablestart('Yes/No');
1.52 bisitz 583: choicewrite('<tr><td>Value:</td><td colspan="2">');
1.32 albertel 584: choicewrite('<label><input name="stringval" value="yes"'+
1.29 www 585: ' type="radio" '+callradiostringeval('yes'));
1.53 bisitz 586: if (svalue=='yes') { choicewrite(' checked="checked"'); }
587: choicewrite(' /> Yes</label><br />');
1.32 albertel 588: choicewrite('<label><input name="stringval" value="no"'+
1.29 www 589: ' type="radio" '+callradiostringeval('no'));
1.53 bisitz 590: if (svalue=='no') { choicewrite(' checked="checked"'); }
591: choicewrite(' /> No</label><br />');
1.25 www 592: }
1.47 albertel 593: if (pscat=='problemstatus') {
594: tablestart('Problem Status');
1.52 bisitz 595: choicewrite('<tr><td>Value:</td><td colspan="2">');
1.47 albertel 596: choicewrite('<label><input name="stringval" value="yes"'+
597: ' type="radio" '+callradiostringeval('yes'));
1.53 bisitz 598: if (svalue=='yes') { choicewrite(' checked="checked"'); }
599: choicewrite(' /> Yes</label><br />');
1.49 albertel 600: choicewrite('<label><input name="stringval" value="answer"'+
601: ' type="radio" '+callradiostringeval('answer'));
1.53 bisitz 602: if (svalue=='answer') { choicewrite(' checked="checked"'); }
603: choicewrite(' /> Yes, and show correct answer if they exceed the maximum number of tries.</label><br />');
1.47 albertel 604: choicewrite('<label><input name="stringval" value="no"'+
605: ' type="radio" '+callradiostringeval('no'));
1.53 bisitz 606: if (svalue=='no') { choicewrite(' checked="checked"'); }
607: choicewrite(' /> No, don\'t show correct/incorrect feedback.</label><br />');
1.47 albertel 608: choicewrite('<label><input name="stringval" value="no_feedback_ever"'+
609: ' type="radio" '+callradiostringeval('no_feedback_ever'));
1.53 bisitz 610: if (svalue=='no_feedback_ever') { choicewrite(' checked="checked"'); }
611: choicewrite(' /> No, show no feedback at all.</label><br />');
1.47 albertel 612: }
1.25 www 613: if (pscat=='examtype') {
614: tablestart('Exam Type');
1.52 bisitz 615: choicewrite('<tr><td>Value:</td><td colspan="2">');
1.32 albertel 616: choicewrite('<label><input name="stringval" value="online"'+
1.29 www 617: ' type="radio" '+callradiostringeval('online'));
1.53 bisitz 618: if (svalue=='online') { choicewrite(' checked="checked"'); }
619: choicewrite(' /> Online</label><br />');
1.32 albertel 620: choicewrite('<label><input name="stringval" value="checkout"'+
1.29 www 621: ' type="radio" '+callradiostringeval('checkout'));
1.53 bisitz 622: if (svalue=='checkout') { choicewrite(' checked="checked"'); }
623: choicewrite(' /> Check out</label><br />');
1.25 www 624: }
625: if (pscat=='questiontype') {
626: tablestart('Question Type');
1.52 bisitz 627: choicewrite('<tr><td>Value:</td><td colspan="2">');
1.32 albertel 628: choicewrite('<label><input name="stringval" value="problem"'+
1.29 www 629: ' type="radio" '+callradiostringeval('problem'));
1.53 bisitz 630: if (svalue=='problem') { choicewrite(' checked="checked"'); }
631: choicewrite(' /> Standard Problem</label><br />');
1.36 albertel 632: // choicewrite('<label><input name="stringval" value="quiz"'+
633: // ' type="radio" '+callradiostringeval('quiz'));
1.53 bisitz 634: // if (svalue=='quiz') { choicewrite(' checked="checked"'); }
635: // choicewrite(' /> Quiz</label><br />');
1.35 albertel 636: choicewrite('<label><input name="stringval" value="practice"'+
637: ' type="radio" '+callradiostringeval('practice'));
1.53 bisitz 638: if (svalue=='practice') { choicewrite(' checked="checked"'); }
639: choicewrite(' /> Practice</label><br />');
1.32 albertel 640: choicewrite('<label><input name="stringval" value="exam"'+
1.29 www 641: ' type="radio" '+callradiostringeval('exam'));
1.53 bisitz 642: if (svalue=='exam') { choicewrite(' checked="checked"'); }
643: choicewrite(' /> Exam</label><br />');
1.36 albertel 644: // choicewrite('<label><input name="stringval" value="assess"'+
645: // ' type="radio" '+callradiostringeval('assess'));
1.53 bisitz 646: // if (svalue=='assess') { choicewrite(' checked="checked"'); }
647: // choicewrite(' /> Assessment</label><br />');
1.32 albertel 648: choicewrite('<label><input name="stringval" value="survey"'+
1.29 www 649: ' type="radio" '+callradiostringeval('survey'));
1.53 bisitz 650: if (svalue=='survey') { choicewrite(' checked="checked"'); }
651: choicewrite(' /> Survey</label><br />');
1.36 albertel 652: // choicewrite('<label><input name="stringval" value="form"'+
653: // ' type="radio" '+callradiostringeval('form'));
1.53 bisitz 654: // if (svalue=='form') { choicewrite(' checked="checked"'); }
1.36 albertel 655: // choicewrite('> Input Form</label><br />');
1.57 raeburn 656: choicewrite('<label><input name="stringval" value="surveycred"'+
657: ' type="radio" '+callradiostringeval('surveycred'));
658: if (svalue=='surveycred') { choicewrite(' checked="checked"'); }
659: choicewrite('> Survey (credit for submission)</label><br />');
660: choicewrite('<label><input name="stringval" value="anonsurvey"'+
661: ' type="radio" '+callradiostringeval('anonsurvey'));
662: if (svalue=='anonsurvey') { choicewrite(' checked="checked"'); }
663: choicewrite('> Anonymous Survey</label><br />');
664: choicewrite('<label><input name="stringval" value="anonsurveycred"'+
665: ' type="radio" '+callradiostringeval('anonsurveycred'));
666: if (svalue=='anonsurveycred') { choicewrite(' checked="checked"'); }
667: choicewrite('> Anonymous Survey (credit for submission)</label><br />');
1.59 raeburn 668: choicewrite('<label><input name="stringval" value="randomizetry"'+
669: ' type="radio" '+callradiostringeval('randomizetry'));
670: if (svalue=='randomizetry') { choicewrite(' checked="checked"'); }
671: choicewrite('> New Randomization Each N Tries (default N=1)</label><br />');
1.32 albertel 672: choicewrite('<label><input name="stringval" value="library"'+
1.29 www 673: ' type="radio" '+callradiostringeval('library'));
1.53 bisitz 674: if (svalue=='library') { choicewrite(' checked="checked"'); }
675: choicewrite(' /> Library</label><br />');
1.25 www 676: }
1.60 raeburn 677: if (pscat=='lenient') {
678: tablestart('Lenient Grading (Partial Credit)');
679: choicewrite('<tr><td>Value:</td><td colspan="2">');
680: choicewrite('<label><input name="stringval" value="yes"'+
681: ' type="radio" '+callradiostringeval('yes'));
682: if (svalue=='yes') { choicewrite(' checked="checked"'); }
683: choicewrite(' /> Yes</label><br />');
684: choicewrite('<label><input name="stringval" value="no"'+
685: ' type="radio" '+callradiostringeval('no'));
686: if (svalue=='no') { choicewrite(' checked="checked"'); }
687: choicewrite(' /> No</label><br />');
688: choicewrite('<label><input name="stringval" value="default"'+
689: ' type="radio" '+callradiostringeval('default'));
690: if (svalue=='default') { choicewrite(' checked="checked"'); }
691: choicewrite(' /> Default (only bubblesheet grading is lenient)</label><br />');
692: }
1.64 raeburn 693: if (pscat=='discussvote') {
694: tablestart('Discussion Voting');
695: choicewrite('<tr><td>Value:</td><td colspan="2">');
696: choicewrite('<label><input name="stringval" value="yes"'+
697: ' type="radio" '+callradiostringeval('yes'));
698: if (svalue=='yes') { choicewrite(' checked="checked"'); }
699: choicewrite(' /> Yes</label><br />');
700: choicewrite('<label><input name="stringval" value="notended"'+
701: ' type="radio" '+callradiostringeval('notended'));
702: if (svalue=='notended') { choicewrite(' checked="checked"'); }
703: choicewrite(' /> Yes, unless discussion ended</label><br />');
704: choicewrite('<label><input name="stringval" value="no"'+
705: ' type="radio" '+callradiostringeval('no'));
706: if (svalue=='no') { choicewrite(' checked="checked"'); }
707: choicewrite(' /> No</label><br />');
708: }
1.25 www 709: if (pscat=='ip') {
710: tablestart('IP Number/Name');
1.52 bisitz 711: choicewrite('<tr><td>Value:</td><td colspan="2">');
1.46 albertel 712: choicewrite('<input name="stringval" size="20" value="'+escapeHTML(svalue)+
1.53 bisitz 713: '" onchange="parent.stringeval()" />');
1.6 www 714: }
1.26 www 715: if (pscat=='fileext') {
716: tablestart('Allowed File Extensions');
1.52 bisitz 717: choicewrite('<tr><td>Value:</td><td colspan="2">');
1.32 albertel 718: choicewrite('<label><input name="radstringval" value="txt"'+
1.29 www 719: ' type="radio" '+callradiostringeval('txt'));
1.53 bisitz 720: if (svalue=='txt') { choicewrite(' checked="checked"'); }
721: choicewrite(' /> Plain Text</label><br />');
1.32 albertel 722: choicewrite('<label><input name="radstringval" value="png,jpg,jpeg,gif"'+
1.29 www 723: ' type="radio" '+callradiostringeval('png,jpg,jpeg,gif'));
1.53 bisitz 724: if (svalue=='png,jpg,jpeg,gif') { choicewrite(' checked="checked"'); }
725: choicewrite(' /> Picture File</label><br />');
1.58 raeburn 726: choicewrite('<label><input name="radstringval" value="doc,docx,xls,xlsx,ppt,pptx"'+
727: ' type="radio" '+callradiostringeval('doc,docx,xls,xlsx,ppt,pptx'));
728: if (svalue=='doc,docx,xls,xlsx,ppt,pptx') { choicewrite(' checked="checked"'); }
1.53 bisitz 729: if (svalue=='doc,xls,ppt') { choicewrite(' checked="checked"'); }
730: choicewrite(' /> Office Document</label><br />');
1.46 albertel 731: choicewrite('<input name="stringval" size="20" value="'+escapeHTML(svalue)+
1.53 bisitz 732: '" onchange="parent.stringeval()" />');
1.26 www 733: }
1.37 albertel 734: if (pscat=='useslots') {
735: tablestart('Slots control access');
1.52 bisitz 736: choicewrite('<tr><td>Value:</td><td colspan="2">');
1.37 albertel 737: choicewrite('<label><input name="stringval" value="no"'+
738: ' type="radio" '+callradiostringeval('no'));
1.53 bisitz 739: if (svalue=='no') { choicewrite(' checked="checked"'); }
740: choicewrite(' /> No</label><br />');
1.37 albertel 741: choicewrite('<label><input name="stringval" value="resource"'+
742: ' type="radio" '+callradiostringeval('resource'));
1.53 bisitz 743: if (svalue=='resource') { choicewrite(' checked="checked"'); }
1.64.2.4! raeburn 744: choicewrite(' /> Yes, and the scope of the slot is a single resource.</label><br />');
1.38 albertel 745: choicewrite('<label><input name="stringval" value="map"'+
746: ' type="radio" '+callradiostringeval('map'));
1.53 bisitz 747: if (svalue=='map') { choicewrite(' checked="checked"'); }
1.64.2.4! raeburn 748: choicewrite(' /> Yes, and the scope of the slot is the enclosing map/folder. When checking in, it applies to only one resource.</label><br />');
1.39 albertel 749: choicewrite('<label><input name="stringval" value="map_map"'+
1.40 albertel 750: ' type="radio" '+callradiostringeval('map_map'));
1.53 bisitz 751: if (svalue=='map_map') { choicewrite(' checked="checked"'); }
1.64.2.4! raeburn 752: choicewrite(' /> Yes, and the scope of the slot is the enclosing map/folder. When checking in, all resources in the map/folder are checked in.</label><br />');
1.54 bisitz 753: choicewrite('</td></tr></table>');
1.6 www 754: }
1.21 www 755: }
756:
757: if (ptype=='color') {
758: tablestart('Choose a Color');
759: choicewrite('<table>');
760: if (svalue) {
1.23 www 761: choicewrite('<tr><td colspan="9">Current choice:</td><td bgcolor="'+
1.46 albertel 762: escapeHTML(svalue)+'" colspan="2"> </td></tr>');
1.21 www 763: }
1.23 www 764: for (var ir=0; ir<=10; ir++) {
765: for (var ig=0; ig<=10; ig++) {
1.21 www 766: choicewrite('<tr>');
1.23 www 767: for (var ib=0; ib<=10; ib++) {
1.21 www 768: colorfield(ir,ig,ib);
769: }
770: choicewrite('</tr>');
771: }
772: }
773: choicewrite('</table></td></table>');
1.1 www 774: }
775:
1.40 albertel 776: choicewrite('</form>');
1.1 www 777: choiceend();
778: }
779:
780: function sopt(va,text) {
781: selwrite('<option value="'+va+'"');
1.2 www 782: if (va==pscat) {
1.54 bisitz 783: selwrite(' selected="selected"');
1.1 www 784: }
785: selwrite('>'+text+'</option>');
786: }
787:
788: function catchange() {
789: var sform=selector.document.forms.fsel.fcat;
1.2 www 790: pscat=sform.options[sform.selectedIndex].value;
1.1 www 791: draw();
792: }
793:
794: function assemble() {
1.2 www 795: if ((ptype=='date') && (pscat!='interval')) {
1.41 www 796: svalue=Math.floor(cdate.getTime()/1000);
1.2 www 797: }
1.12 www 798: if (ptype=='tolerance') {
799: if (pscat=='relative_sym') {
800: svalue=choices.document.forms.sch.val2.value+'%';
801: if (choices.document.forms.sch.val3.checked) {
802: svalue+='+';
803: }
804: }
805: if (pscat=='absolute_sym') {
806: svalue=choices.document.forms.sch.val2.value;
807: if (choices.document.forms.sch.val3.checked) {
808: svalue+='+';
809: }
810: }
811: if (pscat=='absolute') {
812: svalue=choices.document.forms.sch.val2.value;
813: if (choices.document.forms.sch.val3.checked) {
814: svalue+='+';
815: }
816: svalue+=','+choices.document.forms.sch.val4.value;
817: if (choices.document.forms.sch.val5.checked) {
818: svalue+='+';
819: }
820: }
821: if (pscat=='relative') {
822: svalue=choices.document.forms.sch.val2.value+'%';
823: if (choices.document.forms.sch.val3.checked) {
824: svalue+='+';
825: }
826: svalue+=','+choices.document.forms.sch.val4.value+'%';
827: if (choices.document.forms.sch.val5.checked) {
828: svalue+='+';
829: }
830: }
1.14 www 831: }
832: if ((ptype=='int') && (pscat=='range')) {
833: svalue=choices.document.forms.sch.val2.value+','+
834: choices.document.forms.sch.val4.value;
1.12 www 835: }
1.6 www 836: if (pscat=='default') { svalue=''; }
1.2 www 837: stype=ptype+'_'+pscat;
1.1 www 838: }
839:
840:
841: function init() {
842: var i;
1.2 www 843: var subs=new Array();
1.1 www 844: var namevalue=this.window.location.search.split('&');
845: namevalue[0]=namevalue[0].substr(1,namevalue[0].length-1);
846:
847: for (i=0;i<namevalue.length;i++) {
848: var pair=namevalue[i].split('=');
1.3 www 849: pair[1]=unescape(pair[1]);
1.1 www 850: if (pair[0]=='value') { pvalue=pair[1]; }
1.2 www 851: if (pair[0]=='type') { subs=pair[1].split('_');
852: ptype=subs[0];
853: pscat=subs[1];
1.11 www 854: if (typeof(subs[2])!="undefined") {
855: pscat+='_'+subs[2];
856: }
857: if ((pscat=='') || (typeof(pscat)=="undefined")) {
1.6 www 858: pscat='default';
859: }
1.2 www 860: }
1.1 www 861: if (pair[0]=='return') { preturn=pair[1]; }
862: if (pair[0]=='call') { pcode=pair[1]; }
1.2 www 863: if (pair[0]=='marker') { pmarker=pair[1]; }
1.1 www 864: if (pair[0]=='name') { pname=pair[1]; }
1.63 www 865: if (pair[0]=='modal') { pmodal=pair[1]; }
1.34 albertel 866: if (pair[0]=='defhour' && pair[1] >= 0 && pair[1] < 24 ) {
867: defhour=pair[1];
868: }
869: if (pair[0]=='defmin' && pair[1] >= 0 && pair[1] < 60) { defmin=pair[1]; }
870: if (pair[0]=='defsec' && pair[1] >= 0 && pair[1] < 60) { defsec=pair[1]; }
1.1 www 871: }
872:
873: svalue=pvalue;
1.6 www 874: if (((ptype=='float') || (ptype=='string') || (ptype=='int')) &&
875: (pscat=='default') &&
1.11 www 876: (typeof(svalue)!="undefined") &&
877: (svalue!=0) && (svalue!='')) { pscat='any'; }
1.1 www 878:
1.13 www 879: if (ptype=='tolerance') {
880: var tperc=0;
881: var trange=0;
882: if (typeof(svalue)!='undefined') {
883: if (svalue.indexOf('%')!=-1) { tperc=1; }
884: if (svalue.indexOf(',')!=-1) { trange=1; }
885: if (trange) {
886: if (tperc) { pscat='relative'; } else { pscat='absolute'; }
887: } else {
888: if (tperc) { pscat='relative_sym'; } else { pscat='absolute_sym'; }
889: }
890: }
891: }
892:
1.61 raeburn 893: this.window.selector.document.open();
1.62 raeburn 894: selwrite('<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">');
895: selwrite('<html xmlns="http://www.w3.org/1999/xhtml">');
1.55 bisitz 896: selwrite('<head>');
1.62 raeburn 897: selwrite('<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />');
898: selwrite('<title>LON-CAPA</title>');
1.55 bisitz 899: selwrite('<style type="text/css">');
900: selwrite('<!--');
901: selwrite('body {');
902: selwrite('font-family: Verdana,Arial,Helvetica,sans-serif;');
903: selwrite('line-height:130%;');
904: selwrite('font-size:0.83em;');
905: selwrite('background: #FFFFFF;');
906: selwrite('}');
907: selwrite('-->');
908: selwrite('</style>');
909: selwrite('</head>');
1.62 raeburn 910: selwrite('<body>');
911: selwrite('<form name="fsel" action=""><b>'+pname+'</b><br />');
1.64.2.1 raeburn 912: selwrite('Format of Value(s): <select name="fcat" onchange="parent.catchange();">');
1.12 www 913:
1.1 www 914: if (ptype=='tolerance') {
915: sopt('default','Default');
916: sopt('relative_sym','Relative Tolerance, Symmetric (percent)');
917: sopt('relative','Relative Tolerance (percentages)');
918: sopt('absolute_sym','Absolute Tolerance, Symmetric (value)');
919: sopt('absolute','Absolute Tolerance (values)');
920: }
921:
922: if (ptype=='date') {
1.48 albertel 923: if (pscat != 'interval') {
924: sopt('default','Default');
925: sopt('start','Starting Date');
926: sopt('end','Ending Date');
927: } else {
928: sopt('interval','Time Interval');
929: }
930:
1.11 www 931: if ((pvalue!='') && (typeof(pvalue)!="undefined")) {
1.2 www 932: cdate.setTime(pvalue*1000);
1.30 www 933: } else {
1.31 www 934: cdate.setSeconds(defsec);
935: cdate.setMinutes(defmin);
936: cdate.setHours(defhour);
1.2 www 937: }
938:
939: months[0]='January';
940: months[1]='February';
941: months[2]='March';
942: months[3]='April';
943: months[4]='May';
944: months[5]='June';
945: months[6]='July';
946: months[7]='August';
947: months[8]='September';
948: months[9]='October';
949: months[10]='November';
950: months[11]='December';
1.1 www 951: }
1.2 www 952:
1.6 www 953: if (ptype=='int') {
954: sopt('default','Default');
955: sopt('pos','Positive Integer, Not Zero');
956: sopt('zeropos','Positive Integer or Zero');
1.13 www 957: sopt('inrange','Integer in Range');
958: sopt('range','Range of Integers');
1.6 www 959: sopt('any','Integer');
1.1 www 960: }
961:
1.6 www 962: if (ptype=='float') {
963: sopt('default','Default');
964: sopt('zeroone','Floating Point between 0 and 1');
965: sopt('pos','Positive Floating Point');
966: sopt('any','Floating Point');
1.1 www 967:
968: }
969:
1.6 www 970: if (ptype=='string') {
1.44 albertel 971: //sopt('default','Default');
972: if (pscat == 'yesno') { sopt('yesno','Yes/No'); }
1.47 albertel 973: else if (pscat == 'problemstatus'){ sopt('problemstatus','Problem Status'); }
1.45 albertel 974: else if (pscat == 'examtype') { sopt('examtype','Exam Type'); }
975: else if (pscat == 'questiontype') { sopt('questiontype','Question Type'); }
1.60 raeburn 976: else if (pscat == 'lenient') { sopt('lenient','Lenient Grading (Partial Credit)'); }
1.64 raeburn 977: else if (pscat == 'discussvote') { sopt('discussvote','Discussion Voting'); }
1.45 albertel 978: else if (pscat == 'ip') { sopt('ip','IP Number/Name'); }
979: else if (pscat == 'fileext') { sopt('fileext','File Extension'); }
980: else if (pscat == 'useslots') { sopt('useslots','Slots control access'); }
981: else { pscat = 'any'; }
1.28 albertel 982: sopt('any','String Value');
1.22 www 983: }
984:
985: if (ptype=='color') {
986: sopt('default','Use Default Color');
987: sopt('custom','Use Custom Color');
1.1 www 988: }
989:
990: selwrite('</select></form>');
1.63 www 991: var targ='parent.opener';
992: if (pmodal==1) {
993: targ='parent.parent';
994: }
1.2 www 995: selwrite('<a href="javascript:parent.assemble();');
1.1 www 996: if (preturn!='') {
1.63 www 997: selwrite(targ+'.document.'+preturn+'_value.value=parent.window.svalue;');
998: selwrite(targ+'.document.'+preturn+'_type.value=parent.window.stype;');
1.2 www 999: }
1000: if (pmarker!='') {
1.63 www 1001: selwrite(targ+'.document.'+preturn+'_marker.value=parent.window.pmarker;');
1.1 www 1002: }
1003: if (pcode!='') {
1.63 www 1004: selwrite(targ+'.'+pcode+'();');
1.1 www 1005: }
1.43 albertel 1006: selwrite('">Save</a> ');
1.5 www 1007:
1008: selwrite('<a href="javascript:');
1.63 www 1009: selwrite(targ+'.document.'+preturn+'_value.value='+"'';");
1.5 www 1010: if (pmarker!='') {
1011: selwrite(
1.63 www 1012: targ+'.document.'+preturn+'_marker.value=parent.window.pmarker;');
1.5 www 1013: }
1014: if (pcode!='') {
1.63 www 1015: selwrite(targ+'.'+pcode+'();');
1.5 www 1016: }
1017: selwrite('">Delete</a> ');
1.4 www 1018:
1.1 www 1019: selwrite('</body></html>');
1020: this.window.selector.document.close();
1.2 www 1021: draw();
1.64.2.4! raeburn 1022:
1.1 www 1023: }
1024:
1.56 raeburn 1025: // ]]>
1.1 www 1026: </script>
1.56 raeburn 1027: </head>
1.1 www 1028:
1.56 raeburn 1029: <frameset rows="120,*" onload="init();">
1030: <frame name="selector" src="empty.html" />
1031: <frame name="choices" src="empty.html" />
1.1 www 1032: </frameset>
1033:
1034:
1035:
1.16 albertel 1036: </html>
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>