Annotation of rat/client/parameter.html, revision 1.69

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

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>