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

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.97    ! raeburn     8: // $Id: parameter.html,v 1.96 2025/06/28 14:35:11 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.70      raeburn    43: var pextraval='';
1.71      raeburn    44: var pextravaltwo='';
1.1       www        45: var preturn='';
                     46: var pcode='';
1.2       www        47: var pscat='';
1.85      raeburn    48: var psmap='';
1.2       www        49: var pmarker='';
1.63      www        50: var pmodal='';
1.1       www        51: var pname='';
1.76      raeburn    52: var precursive='';
                     53: var pnonreccol='';
                     54: var pmarkerst='';
                     55: var pparm='';
1.80      raeburn    56: var pextra='';
1.1       www        57: 
1.31      www        58: var defhour=0;
                     59: var defmin=0;
                     60: var defsec=0;
                     61: 
1.1       www        62: var svalue;
1.2       www        63: var stype;
                     64: var smarker;
1.1       www        65: 
                     66: var vars=new Array();
                     67: 
1.2       www        68: var cdate=new Date();
                     69: 
                     70: var csec;
                     71: var cmin;
                     72: var chour;
                     73: var cday;
                     74: 
                     75: var months=new Array();
                     76: 
                     77: 
1.1       www        78: function selwrite(text) {
                     79:   this.window.selector.document.write(text);
                     80: }
                     81: 
                     82: function choicestart() {
1.61      raeburn    83:   this.window.choices.document.open();
1.62      raeburn    84:   choicewrite('<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">');
                     85:   choicewrite('<html xmlns="http://www.w3.org/1999/xhtml">');
1.55      bisitz     86:   choicewrite('<head>');
1.62      raeburn    87:   choicewrite('<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />');
                     88:   choicewrite('<title>LON-CAPA</title>');
1.55      bisitz     89:   choicewrite('<style type="text/css">');
                     90:   choicewrite('<!--');
                     91:   choicewrite('body {');
                     92:   choicewrite('font-family: Verdana,Arial,Helvetica,sans-serif;');
                     93:   choicewrite('line-height:130%;');
                     94:   choicewrite('font-size:0.83em;');
                     95:   choicewrite('background: #FFFFFF;');
                     96:   choicewrite('}');
                     97:   choicewrite('table.LC_parmsel_table {font-size: 90%;}');
                     98:   choicewrite('table.LC_parmsel_table tr td { padding: 5px; border: 1px solid #C8C8C8;}');
1.96      raeburn    99:   choicewrite('fieldset.LC_grace { display:inline; }');
                    100:   choicewrite('fieldset.LC_grace > legend { font-weight: normal; }');
1.55      bisitz    101:   choicewrite('-->');
                    102:   choicewrite('</style>');
                    103:   choicewrite('</head>');
1.62      raeburn   104:   choicewrite('<body>');
1.1       www       105: }
                    106: 
                    107: function choiceend() {
                    108:   choicewrite('</body></html>');
                    109:   this.window.choices.document.close();
                    110: }
                    111: 
                    112: function choicewrite(text) {
                    113:   this.window.choices.document.write(text);
                    114: }
                    115: 
                    116: function tablestart(headtext) {
1.55      bisitz    117:   choicewrite('<table class="LC_parmsel_table"><tr bgcolor="#C5DB99"><th colspan="3">'+
1.1       www       118:               headtext+'</th></tr>');
                    119: }
                    120: 
                    121: function valline(text,id1,id2) {
1.52      bisitz    122:   choicewrite('<tr><td>'+text+
1.51      bisitz    123:               '</td><td><input type="text" size="4" name="val'+
1.53      bisitz    124:               id1+'" /></td><td>incl:<input type="checkbox" name="val'+
                    125:               id2+'" /></td></tr>');
1.1       www       126: }
                    127: 
1.46      albertel  128: function escapeHTML(text) {
                    129:   text = text.replace(/&/g, '&amp;');
                    130:   text = text.replace(/"/g, '&quot;');
                    131:   text = text.replace(/</g, '&lt;');
                    132:   text = text.replace(/>/g, '&gt;');
                    133:   return text;
                    134: }
                    135: 
1.2       www       136: function datecalc() {
                    137:     var sform=choices.document.forms.sch;
                    138: 
                    139:     cdate.setHours(sform.hours.options[sform.hours.selectedIndex].value);
                    140:     cdate.setMinutes(sform.minutes.options[sform.minutes.selectedIndex].value);
                    141:     cdate.setSeconds(sform.minutes.options[sform.seconds.selectedIndex].value);
                    142:     cdate.setDate(sform.date.options[sform.date.selectedIndex].value);
                    143:     cdate.setMonth(sform.month.options[sform.month.selectedIndex].value);
                    144:     cdate.setFullYear(sform.year.options[sform.year.selectedIndex].value);
                    145: 
                    146:     draw();
                    147: }
                    148: 
                    149: function hour() {
                    150:    var thishour=cdate.getHours();
                    151:     var i; var j;
1.53      bisitz    152:     choicewrite('<select name="hours" onchange="parent.datecalc();">');
1.2       www       153:     for (i=0;i<=23;i++) {
1.54      bisitz    154:         choicewrite('<option value="'+i+'"');
1.2       www       155:         if (i==thishour) {
1.54      bisitz    156:             choicewrite(' selected="selected"');
1.2       www       157:         }
                    158:         choicewrite('>');
                    159:         if (i==12) { choicewrite('noon'); } else {
                    160:            if (i==0) { choicewrite('midnight') } else {
                    161:               
                    162:                  if (i<12) { choicewrite(i+' am'); } else {
                    163:                     j=i-12; choicewrite(j+' pm');
                    164:                  }
                    165:               
                    166:            }
                    167:         }
                    168:         choicewrite('</option>');
                    169:     }
                    170:     choicewrite('</select>');
                    171: }
                    172: 
                    173: function minute() {
                    174:    var thisminutes=cdate.getMinutes();
                    175:     var i;
1.53      bisitz    176:     choicewrite('<select name="minutes" onchange="parent.datecalc();">');
1.2       www       177:     for (i=0;i<=59;i++) {
1.54      bisitz    178:         choicewrite('<option value="'+i+'"');
1.2       www       179:         if (i==thisminutes) {
1.54      bisitz    180:             choicewrite(' selected="selected"');
1.2       www       181:         }
                    182:         choicewrite('>'+i+'</option>');
                    183:     }
                    184:     choicewrite('</select>');
                    185: } 
                    186: 
                    187: function second() {
                    188:    var thisseconds=cdate.getSeconds();
                    189:     var i;
1.53      bisitz    190:     choicewrite('<select name="seconds" onchange="parent.datecalc();">');
1.2       www       191:     for (i=0;i<=59;i++) {
1.54      bisitz    192:         choicewrite('<option value="'+i+'"');
1.2       www       193:         if (i==thisseconds) {
1.54      bisitz    194:             choicewrite(' selected="selected"');
1.2       www       195:         }
                    196:         choicewrite('>'+i+'</option>');
                    197:     }
                    198:     choicewrite('</select>');
1.79      raeburn   199: }
1.2       www       200: 
                    201: 
                    202: function date() {
                    203:    var thisdate=cdate.getDate();
                    204:     var i;
1.53      bisitz    205:     choicewrite('<select name="date" onchange="parent.datecalc();">');
1.2       www       206:     for (i=1;i<=31;i++) {
1.54      bisitz    207:         choicewrite('<option value="'+i+'"');
1.2       www       208:         if (i==thisdate) {
1.54      bisitz    209:             choicewrite(' selected="selected"');
1.2       www       210:         }
                    211:         choicewrite('>'+i+'</option>');
                    212:     }
                    213:     choicewrite('</select>');
                    214: }
                    215: 
                    216: function year() {
                    217:    var thisyear=cdate.getFullYear();
1.19      www       218:    var nowdate=new Date();
                    219:    var nowyear=nowdate.getFullYear();
1.33      albertel  220:    if ( !thisyear ) { thisyear=nowyear; }
1.19      www       221:    var loweryear=thisyear-2;
                    222:    var upperyear=thisyear+5;
                    223:    if (thisyear>nowyear) { loweryear=nowyear-2; }
                    224:    if (thisyear<nowyear) { upperyear=nowyear+5; } 
1.2       www       225:     var i;
1.53      bisitz    226:     choicewrite('<select name="year" onchange="parent.datecalc();">');
1.19      www       227:     for (i=loweryear;i<=upperyear;i++) {
1.54      bisitz    228:         choicewrite('<option value="'+i+'"');
1.2       www       229:         if (i==thisyear) {
1.54      bisitz    230:             choicewrite(' selected="selected"');
1.2       www       231:         }
                    232:         choicewrite('>'+i+'</option>');
                    233:     }
                    234:     choicewrite('</select>');
                    235: }
                    236: 
                    237: function month() {
                    238:     var thismonth=cdate.getMonth();
                    239:     var i;
1.53      bisitz    240:     choicewrite('<select name="month" onchange="parent.datecalc();">');
1.2       www       241:     for (i=0;i<=11;i++) {
1.54      bisitz    242:         choicewrite('<option value="'+i+'"');
1.2       www       243:         if (i==thismonth) {
1.54      bisitz    244:             choicewrite(' selected="selected"');
1.2       www       245:         }
                    246:         choicewrite('>'+months[i]+'</option>');
                    247:     }
                    248:     choicewrite('</select>');
                    249: }
1.79      raeburn   250: 
                    251: 
1.96      raeburn   252: function intminute(mins) {
                    253:     var thisminutes;
                    254:     if ((typeof mins === 'number') && (!isNaN(mins))) {
                    255:         thisminutes=mins;
                    256:     } else {
                    257:         thisminutes=cmins;
                    258:     }
1.2       www       259:     var i;
1.69      musolffc  260:     var result = '';
1.96      raeburn   261:     var funcname = '';
                    262:     if (pscat == 'grace') {
                    263:         funcname = 'parent.gracestringeval()';
                    264:     } else {
                    265:         funcname = 'parent.intcalc()';
                    266:     }
                    267:     result += '<select name="minutes" onchange="'+funcname+';">';
1.2       www       268:     for (i=0;i<=59;i++) {
1.69      musolffc  269:         result += '<option value="'+i+'"';
1.2       www       270:         if (i==thisminutes) {
1.69      musolffc  271:             result += ' selected="selected"';
1.2       www       272:         }
1.69      musolffc  273:         result += '>'+i+'</option>';
1.2       www       274:     }
1.69      musolffc  275:     result += '</select>';
                    276:     return result;
1.2       www       277: } 
                    278: 
1.96      raeburn   279: function inthour(hours) {
                    280:     var thishours;
                    281:     if ((typeof hours === 'number') && (!isNaN(hours))) {
                    282:         thishours=hours;
                    283:     } else {
                    284:         thishours=chours;
                    285:     }
1.2       www       286:     var i;
1.69      musolffc  287:     var result = '';
1.96      raeburn   288:     var funcname = '';
                    289:     if (pscat == 'grace') {
                    290:         funcname = 'parent.gracestringeval()';
                    291:     } else {
                    292:         funcname = 'parent.intcalc()';
                    293:     }
                    294:     result += '<select name="hours" onchange="'+funcname+';">';
1.2       www       295:     for (i=0;i<=23;i++) {
1.69      musolffc  296:         result += '<option value="'+i+'"';
1.2       www       297:         if (i==thishours) {
1.69      musolffc  298:             result += ' selected="selected"';
1.2       www       299:         }
1.69      musolffc  300:         result += '>'+i+'</option>';
1.2       www       301:     }
1.69      musolffc  302:     result += '</select>';
                    303:     return result;
1.71      raeburn   304: }
1.2       www       305: 
1.96      raeburn   306: function intsecond(secs) {
                    307:     var thisseconds;
                    308:     if ((typeof secs === 'number') && (!isNaN(secs))) {
                    309:         thisseconds=secs;
                    310:     } else {
                    311:         thisseconds=csecs;
                    312:     }
1.2       www       313:     var i;
1.69      musolffc  314:     var result = '';
1.96      raeburn   315:     var funcname = '';
                    316:     if (pscat == 'grace') {
                    317:         funcname = 'parent.gracestringeval()';
                    318:     } else {
                    319:         funcname = 'parent.intcalc()';
                    320:     }
                    321:     result += '<select name="seconds" onchange="'+funcname+';">';
1.2       www       322:     for (i=0;i<=59;i++) {
1.69      musolffc  323:         result += '<option value="'+i+'"';
1.2       www       324:         if (i==thisseconds) {
1.69      musolffc  325:             result += ' selected="selected"';
1.2       www       326:         }
1.69      musolffc  327:         result += '>'+i+'</option>';
1.2       www       328:     }
1.69      musolffc  329:     result += '</select>';
                    330:     return result;
1.97    ! raeburn   331: }
        !           332: 
        !           333: function intweek(weeks) {
        !           334:     var thisweek;
        !           335:     if ((typeof weeks === 'number') && (!isNaN(weeks))) {
        !           336:         thisweek=weeks;
        !           337:     }
        !           338:     var i;
        !           339:     var result ='';
        !           340:     var funcname = '';
        !           341:     if (pscat == 'grace') {
        !           342:         funcname = 'parent.gracestringeval()';
        !           343:     }
        !           344:     result += '<select name="weeks" onchange="'+funcname+';">';
        !           345:     for (i=0;i<=52;i++) {
        !           346:         result += '<option value="'+i+'"';
        !           347:         if (i==thisweek) {
        !           348:             result += ' selected="selected"';
        !           349:         }
        !           350:         result += '>'+i+'</option>';
        !           351:     }
        !           352:     result += '</select>';
        !           353:     return result;
        !           354: }
1.2       www       355: 
1.96      raeburn   356: function intday(days) {
                    357:     var thisdate;
1.97    ! raeburn   358:     var maxallowed;
1.96      raeburn   359:     if ((typeof days === 'number') && (!isNaN(days))) {
                    360:         thisdate=days;
                    361:     } else {
                    362:         thisdate=cdays;
                    363:     }
1.2       www       364:     var i;
1.69      musolffc  365:     var result ='';
1.96      raeburn   366:     var funcname = '';
                    367:     if (pscat == 'grace') {
                    368:         funcname = 'parent.gracestringeval()';
1.97    ! raeburn   369:         maxallowed = 6;
1.96      raeburn   370:     } else {
                    371:         funcname = 'parent.intcalc()';
1.97    ! raeburn   372:         maxallowed = 31;
1.96      raeburn   373:     }
                    374:     result += '<select name="date" onchange="'+funcname+';">';
1.97    ! raeburn   375:     for (i=0;i<=maxallowed;i++) {
1.69      musolffc  376:         result += '<option value="'+i+'"';
1.2       www       377:         if (i==thisdate) {
1.69      musolffc  378:             result += ' selected="selected"';
1.2       www       379:         }
1.69      musolffc  380:         result += '>'+i+'</option>';
1.2       www       381:     }
1.69      musolffc  382:     result += '</select>';
                    383:     return result;
1.2       www       384: }
                    385: 
                    386: function intcalc() {
                    387:     var sform=choices.document.forms.sch;
                    388:     svalue=((sform.date.options[sform.date.selectedIndex].value*24+
                    389:              sform.hours.options[sform.hours.selectedIndex].value*1)*60+
                    390:              sform.minutes.options[sform.minutes.selectedIndex].value*1)*60+
                    391:              sform.seconds.options[sform.seconds.selectedIndex].value*1;
1.68      raeburn   392:     if ((ptype=='date') && (pscat=='interval')) {
                    393:         var newpmodval = '';
1.70      raeburn   394:         var newpextraval = '';
1.71      raeburn   395:         var newpextravaltwo = 'Done';
1.68      raeburn   396:         if (sform.donebutton.length) {
                    397:             for (var i=0; i<sform.donebutton.length; i++) {
                    398:                 if (sform.donebutton[i].checked) {
                    399:                     if (sform.donebutton[i].value == '_done') {
                    400:                         newpmodval = sform.donebutton[i].value;
1.71      raeburn   401:                         newpextravaltwo = sform.donebutton_text.value;
1.70      raeburn   402:                     } else {
                    403:                         if (sform.donebutton[i].value == '_done_proctor') { 
                    404:                             newpmodval = sform.donebutton[i].value;
                    405:                             newpextraval = sform.donebutton_proctorkey.value;
1.71      raeburn   406:                             newpextravaltwo = sform.donebutton_text.value;
                    407:                             newpextravaltwo = newpextravaltwo.replace(/:/g,'');
1.70      raeburn   408:                         }
1.68      raeburn   409:                     }
                    410:                 }
                    411:             }
                    412:         }
                    413:         pmodval = newpmodval;
1.70      raeburn   414:         pextraval = newpextraval;
1.71      raeburn   415:         pextravaltwo = newpextravaltwo;
1.68      raeburn   416:         draw();
                    417:         if (pmodval) {
1.71      raeburn   418:             var doneRegExp = /^(_done)(|_proctor)$/;
                    419:             var donevals = pmodval.match(doneRegExp);
                    420:             if (donevals.length == 3) {
                    421:                 svalue += donevals[1];
                    422:             }
                    423:             if (newpextravaltwo) {
                    424:                 if (newpextravaltwo != 'Done') { 
                    425:                     svalue += ':'+newpextravaltwo+':';
                    426:                 }
                    427:             }
                    428:             if (donevals[2] != '') {
                    429:                 svalue += donevals[2];
                    430:                 if (pextraval != '') {
                    431:                     svalue += '_'+pextraval;
                    432:                 }
                    433:             }
1.70      raeburn   434:         }
1.68      raeburn   435:     } else {
                    436:         draw();
                    437:     }
1.2       www       438: }
                    439: 
1.70      raeburn   440: function toggleSecret() {
                    441:     var sform=choices.document.forms.sch;
                    442:     if (sform.donebutton.length) {
                    443:         for (var i=0; i<sform.donebutton.length; i++) {
                    444:             if (sform.donebutton[i].checked) {
1.71      raeburn   445:                 if (sform.donebutton[i].value == '') {
                    446:                     if (document.getElementById('donebuttontextdiv')) {
                    447:                         document.getElementById('donebuttontextdiv').style.display='none';
                    448:                     }
                    449:                 } else {
                    450:                     if (document.getElementById('donebuttontextdiv')) {
                    451:                         document.getElementById('donebuttontextdiv').style.display='block';
                    452:                     }
                    453:                 }
1.70      raeburn   454:                 if (sform.donebutton[i].value == '_done_proctor') {
                    455:                     if (document.getElementById('done_proctorkey')) {
                    456:                         document.getElementById('done_proctorkey').type='text';
                    457:                     }
                    458:                 } else {
                    459:                     if (document.getElementById('done_proctorkey')) {
                    460:                         document.getElementById('done_proctorkey').type='hidden';
                    461:                         document.getElementById('done_proctorkey').value='';
                    462:                     }
                    463:                 }
                    464:             }
                    465:         }
                    466:     }
                    467: }
                    468: 
                    469: function validateInterval() {
                    470:     var sform=choices.document.forms.sch;
                    471:     if (sform.donebutton.length) {
                    472:         for (var i=0; i<sform.donebutton.length; i++) {
                    473:             if (sform.donebutton[i].checked) {
                    474:                 if (sform.donebutton[i].value == '_done_proctor') {
1.88      raeburn   475:                     var keyval = sform.donebutton_proctorkey.value;
                    476:                     if ((keyval == '') || (typeof(keyval) == 'undefined')) {
1.84      raeburn   477:                         alert('Please enter a key for a proctor to enter when a student uses the "Done" button.');
1.70      raeburn   478:                         return;
                    479:                     }
                    480:                 }
                    481:             }
                    482:         }
                    483:     }
                    484:     intcalc();
                    485:     assemble();
                    486: }
                    487: 
1.80      raeburn   488: function validateDeepLink() {
                    489:     var sform=choices.document.forms.sch;
1.86      raeburn   490:     svalue = sform.deeplinkstate.options[sform.deeplinkstate.selectedIndex].value+',';
                    491:     svalue += sform.deeplinkothers.options[sform.deeplinkothers.selectedIndex].value+','; 
                    492:     svalue += sform.deeplinklisted.options[sform.deeplinklisted.selectedIndex].value+',';
1.80      raeburn   493:     svalue += sform.deeplinkacc.options[sform.deeplinkacc.selectedIndex].value+',';
1.84      raeburn   494:     var keyRegExp = /^[a-zA-Z\d_.!@#$%^&*()+=-]+$/;
                    495:     var numRegExp = /^\d+$/;
1.90      raeburn   496:     var exitTextRegExp = /^[^'":;,]+$/;
1.86      raeburn   497:     if (sform.deeplinkprotect.length) {
                    498:         for (var i=0; i<sform.deeplinkprotect.length; i++) {
                    499:             if (sform.deeplinkprotect[i].checked) {
                    500:                 svalue += sform.deeplinkprotect[i].value;
                    501:                 if (sform.deeplinkprotect[i].value == 'key') {
1.80      raeburn   502:                     var posskey = sform.deeplinkkey.value;
                    503:                     posskey = posskey.replace(/^\s+|\s+$/g,'');
                    504:                     if (keyRegExp.test(posskey)) {
                    505:                         svalue += ':'+posskey;
1.84      raeburn   506:                     } else {
                    507:                         alert('Please enter a value for the key containing one or more of: a-zA-Z0-9_.!@#$%^&*()+=-\n'+
                    508:                               'or choose a different supported link type.');
                    509:                         return; 
1.80      raeburn   510:                     }
1.86      raeburn   511:                 } else if (sform.deeplinkprotect[i].value == 'ltic') {
                    512:                     var possltic = sform.linkpossltic.options[sform.linkpossltic.selectedIndex].value;
                    513:                     if ((numRegExp.test(possltic)) && (possltic > 0)) {
                    514:                         svalue += ':'+possltic;
                    515:                     } else {
                    516:                         alert('Please select an LTI launcher, or choose a different supported link type.');
                    517:                         return;
                    518:                     }
                    519:                 } else if (sform.deeplinkprotect[i].value == 'ltid') {
                    520:                     var possltid = sform.linkpossltid.options[sform.linkpossltid.selectedIndex].value;
                    521:                     if ((numRegExp.test(possltid)) && (possltid > 0)) {
                    522:                         svalue += ':'+possltid;
1.84      raeburn   523:                     } else {
                    524:                         alert('Please select an LTI launcher, or choose a different supported link type.');
                    525:                         return;
                    526:                     }
                    527:                 }
                    528:                 break;
                    529:             }
                    530:         }
                    531:     }
                    532:     svalue += ',';
                    533:     if (sform.deeplinkmenus.length) {
                    534:         for (var i=0; i<sform.deeplinkmenus.length; i++) {
                    535:             if (sform.deeplinkmenus[i].checked) {
                    536:                 if (sform.deeplinkmenus[i].value == 'std') {
                    537:                     svalue += '0';
                    538:                 } else if (sform.deeplinkmenus[i].value == 'collnum') {
                    539:                     var posscoll = sform.linkpossmenu.options[sform.linkpossmenu.selectedIndex].value;
                    540:                     if ((numRegExp.test(posscoll)) && (posscoll > 0)) { 
                    541:                         svalue += posscoll;
                    542:                     } else {
                    543:                         alert("Please select either a numbered collection or check 'Standard (all menus)'.");
                    544:                         return;
1.80      raeburn   545:                     }
                    546:                 }
                    547:                 break;
                    548:             }
                    549:         }
                    550:     }
1.87      raeburn   551:     svalue += ',';
                    552:     svalue += sform.deeplinktarget.options[sform.deeplinktarget.selectedIndex].value;
1.90      raeburn   553:     svalue += ',';
                    554:     if (sform.deeplinkexit.length) {
                    555:         for (var i=0; i<sform.deeplinkexit.length; i++) {
                    556:             if (sform.deeplinkexit[i].checked) {
                    557:                 if (sform.deeplinkexit[i].value == 'no') {
                    558:                     svalue += sform.deeplinkexit[i].value;
                    559:                 } else {
                    560:                     var exittext = sform.deeplinkexittext.value;
                    561:                     exittext = exittext.replace(/^\s+|\s+$/g,'');
                    562:                     if ((exittext.length) && (exitTextRegExp.test(exittext))) {
                    563:                         svalue += sform.deeplinkexit[i].value;
                    564:                         if (exittext !== 'Exit Tool') {
                    565:                             svalue += ':'+exittext;
                    566:                         }
                    567:                     } else {
                    568:                         alert('Please enter the button text. Disallowed characters are ;,":\'\n'+
                    569:                               'or check "not in use" option for "Exit Tool Link"');
                    570:                         return;
                    571:                     }
                    572:                 }
                    573:                 break;
                    574:             }
                    575:         }
                    576:     }
1.80      raeburn   577:     assemble();
                    578: }
                    579: 
1.84      raeburn   580: function toggleDeepLink(caller) {
1.80      raeburn   581:     var sform=choices.document.forms.sch;
1.86      raeburn   582:     if ((caller == 'protect') && (sform.deeplinkprotect.length)) {
1.80      raeburn   583:         var frame = window.frames["choices"];
1.86      raeburn   584:         for (var i=0; i<sform.deeplinkprotect.length; i++) {
                    585:             if (sform.deeplinkprotect[i].checked) {
                    586:                 if (frame.document.getElementById('deeplinkkey')) {
                    587:                     if (sform.deeplinkprotect[i].value == 'key') {
1.80      raeburn   588:                         frame.document.getElementById('deeplinkkey').type='text';
1.86      raeburn   589:                     } else {
                    590:                         frame.document.getElementById('deeplinkkey').type='hidden';
1.80      raeburn   591:                     }
1.86      raeburn   592:                 }
                    593:                 if (frame.document.getElementById('deeplinklticdiv')) {
                    594:                     if (sform.deeplinkprotect[i].value == 'ltic') {
                    595:                         frame.document.getElementById('deeplinklticdiv').style.display='block';
                    596:                     } else {
                    597:                         frame.document.getElementById('deeplinklticdiv').style.display='none';
1.80      raeburn   598:                     }
1.86      raeburn   599:                 }
                    600:                 if (frame.document.getElementById('deeplinkltiddiv')) {
                    601:                     if (sform.deeplinkprotect[i].value == 'ltid') {
                    602:                         frame.document.getElementById('deeplinkltiddiv').style.display='block';
                    603:                     } else {
                    604:                         frame.document.getElementById('deeplinkltiddiv').style.display='none';
1.80      raeburn   605:                     }
                    606:                 }
                    607:                 break;
                    608:             }
                    609:         }
                    610:     }
1.84      raeburn   611:     if ((caller == 'menus') && (sform.deeplinkmenus.length)) {
                    612:         var frame = window.frames["choices"];
                    613:         for (var i=0; i<sform.deeplinkmenus.length; i++) {
                    614:             if (sform.deeplinkmenus[i].checked) {
                    615:                 if (frame.document.getElementById('deeplinkmenusdiv')) {
                    616:                     if (sform.deeplinkmenus[i].value == 'collnum') {
                    617:                         frame.document.getElementById('deeplinkmenusdiv').style.display='inline-block';
                    618:                     } else {
                    619:                         frame.document.getElementById('deeplinkmenusdiv').style.display='none';
                    620:                     }
                    621:                 }
                    622:                 break;
                    623:             }
                    624:         }
                    625:     }
1.90      raeburn   626:     if ((caller == 'exit') && (sform.deeplinkexit.length)) {
                    627:         var frame = window.frames["choices"];
                    628:         for (var i=0; i<sform.deeplinkexit.length; i++) {
                    629:             if (sform.deeplinkexit[i].checked) {
                    630:                 if (frame.document.getElementById('deeplinkexitdiv')) {
                    631:                     if (sform.deeplinkexit[i].value == 'no') {
                    632:                         frame.document.getElementById('deeplinkexitdiv').style.display='none';
                    633:                         sform.deeplinkexittext.value = '';
                    634:                     } else {
                    635:                         frame.document.getElementById('deeplinkexitdiv').style.display='inline-block';
                    636:                         if (sform.deeplinkexittext.value == '') {
                    637:                             sform.deeplinkexittext.value = 'Exit Tool';
                    638:                         }
                    639:                         frame.document.getElementById('deeplinkexitdiv').scrollIntoView();
                    640:                     }
                    641:                 }
                    642:                 break;
                    643:             }
                    644:         }
                    645:     }
1.80      raeburn   646: }
                    647: 
1.84      raeburn   648: function calldeeplink(caller) {
                    649:     return 'onclick="parent.toggleDeepLink(\''+caller+'\')"';
1.80      raeburn   650: }
                    651: 
1.6       www       652: function integereval() {
                    653:    svalue=choices.document.forms.sch.intval.value;
                    654:    svalue=Math.round(svalue);
                    655:    if (pscat=='zeropos') { svalue=Math.abs(svalue); }
                    656:    if ((pscat=='pos') && (svalue==0)) {
                    657:       svalue='';
                    658:    }
1.12      www       659:    if (pscat.indexOf('inrange')!=-1) {
1.10      www       660:       var rangeparts=new Array;
                    661:       rangeparts=split('_',pscat);
1.12      www       662:       rangeparts=split(',',rangeparts[1]);
1.10      www       663:       if (svalue<rangeparts[0]) { svalue=rangeparts[0]; }
                    664:       if (svalue>rangeparts[1]) { svalue=rangeparts[1]; }
                    665:    }
1.6       www       666:    draw();
                    667: }
                    668: 
                    669: function floateval() {
                    670:    svalue=choices.document.forms.sch.floatval.value;
                    671:    svalue=1.0*svalue;
                    672:    if (pscat=='pos') { svalue=Math.abs(svalue); }
                    673:    if ((pscat=='zeroone') && ((svalue<0) || (svalue>1))) {
                    674:       svalue='';
                    675:    }
                    676:    draw();
                    677: }
                    678: 
                    679: function stringeval() {
                    680:    svalue=choices.document.forms.sch.stringval.value;
                    681:    draw();
                    682: }
                    683: 
1.73      raeburn   684: function ipstringeval() {
                    685:     var patternIp = /^([\[\]a-zA-Z\.\d\*\-]+)$/;
                    686:     var acctypes = new Array;
                    687:     acctypes = ['allow','deny'];
                    688:     svalue = '';
                    689:     for (var i=0; i<acctypes.length; i++) {
                    690:         var items = choices.document.getElementsByName('setip'+acctypes[i]);
1.74      raeburn   691:         if (items.length > 0) { 
1.73      raeburn   692:             for (var j=0; j<items.length; j++) {
                    693:                 if (items[j].type == "text") {
1.79      raeburn   694:                     var possip = items[j].value;
1.73      raeburn   695:                     possip = possip.replace(/^\s+|\s+$/g,'');
                    696:                     if (patternIp.test(possip)) {
                    697:                         if (acctypes[i] == 'deny') {
                    698:                             possip = '!'+possip;
                    699:                         }
                    700:                         if (svalue == '') {
                    701:                             svalue = possip;
                    702:                         } else {
                    703:                             svalue += ','+possip;
                    704:                         }
                    705:                     }
                    706:                 }
                    707:             }
                    708:         }
                    709:     }
                    710: }
                    711: 
                    712: function addIpRule(iptype) {
                    713:     var frame = window.frames["choices"];
                    714:     if (frame.document.getElementById('LC_string_ipacc_inner_'+iptype)) {
                    715:         var innerDiv = frame.document.getElementById('LC_string_ipacc_inner_'+iptype);
                    716:         var ipDiv = frame.document.createElement('div');
1.95      raeburn   717:         ipDiv.innerHTML = '<input type="text" size="12" name="setip'+iptype+'" onblur="parent.ipstringeval();" />'+"\n"+
                    718:                           '<a href="#" onclick="parent.removeIpRule(this,\''+iptype+'\');return false;">Remove</a>';
                    719:         innerDiv.appendChild(ipDiv);
1.73      raeburn   720:     }
1.95      raeburn   721:     return;
1.73      raeburn   722: }
                    723: 
1.93      raeburn   724: function removeIpRule(caller,iptype) {
1.73      raeburn   725:     var frame = window.frames["choices"];
                    726:     if (frame.document.getElementById('LC_string_ipacc_inner_'+iptype)) {
                    727:         var innerDiv = frame.document.getElementById('LC_string_ipacc_inner_'+iptype);
1.93      raeburn   728:         var divToRemove = caller.closest('div');
1.95      raeburn   729:         if (divToRemove) {
                    730:             innerDiv.removeChild(divToRemove);
                    731:             ipstringeval();
                    732:         }
1.73      raeburn   733:     }
1.95      raeburn   734:     return;
1.73      raeburn   735: }
                    736: 
1.96      raeburn   737: function gracestringeval() {
                    738:     var items = choices.document.getElementsByName('setgrace');
                    739:     if (items.length) {
                    740:         if (items.length > 0) {
                    741:             svalue = '';
                    742:             for (var i=0; i<items.length; i++) {
                    743:                 var graceDiv = items[i].closest('div');
                    744:                 var timeSels = graceDiv.getElementsByTagName("select");
                    745:                 var total = 0;
                    746:                 if (timeSels.length) {
                    747:                     for (var j=0; j<timeSels.length; j++) {
                    748:                         var sname = timeSels[j].getAttribute('name');
                    749:                         var poss = parseInt(timeSels[j].options[timeSels[j].selectedIndex].value);
1.97    ! raeburn   750:                         if (sname == 'weeks') {
        !           751:                             if ((poss > 0) && (poss <= 52)) {
        !           752:                                 total += (poss * 604800);
        !           753:                             }
        !           754:                         } else if (sname == 'date') {
        !           755:                             if ((poss > 0) && (poss < 7)) {
1.96      raeburn   756:                                 total += (poss * 86400);
                    757:                             }
                    758:                         } else if (sname == 'hours') {
                    759:                             if ((poss > 0) && (poss < 24)) {
                    760:                                 total += (poss * 3600);
                    761:                             }
                    762:                         } else if (sname == 'minutes') {
                    763:                             if ((poss > 0) && (poss < 60)) {
                    764:                                 total += (poss * 60);
                    765:                             }
                    766:                         }
                    767:                     }
                    768:                 }
                    769:                 var inputElems = graceDiv.getElementsByTagName("input");
                    770:                 var frac = '';
                    771:                 var grad = '';
                    772:                 if (inputElems.length) {
                    773:                     for (var j=0; j<inputElems.length; j++) {
                    774:                         var iname = inputElems[j].getAttribute('name');
                    775:                         if (iname == 'frac') {
                    776:                             var ival = inputElems[j].value;
                    777:                             ival.trim();
                    778:                             var poss = parseFloat(ival);
                    779:                             if ((typeof poss === 'number') && (!isNaN(poss))) {
                    780:                                 if ((poss => 0) && (poss <= 1)) {
                    781:                                     frac = poss;
                    782:                                 }
                    783:                             }
                    784:                         } else if (iname == 'grad') {
                    785:                             if (inputElems[j].checked) {
                    786:                                 grad = 1;
                    787:                             } else {
                    788:                                 grad = 0;
                    789:                             }
                    790:                         }
                    791:                     }
                    792:                 }
                    793:                 if (svalue === '') {
                    794:                     svalue = total+':'+frac+':'+grad;
                    795:                 } else {
                    796:                     svalue += ','+total+':'+frac+':'+grad;
                    797:                 }
                    798:             }
                    799:         }
                    800:     }
                    801: }
                    802: 
                    803: function graceitem(current) {
1.97    ! raeburn   804:     var gweeks = 0;
1.96      raeburn   805:     var gdays = 0;
                    806:     var ghours = 0;
                    807:     var gmins = 0;
                    808:     var gsecs = 0;
                    809:     var gfrac = '';
                    810:     var checktext = '';
                    811:     var patternGrace = /^\d+:(0|1).?\d*:(0|1)$/;
                    812:     if ((current != '') && (current != 'undefined') && (patternGrace.test(current))) {
                    813:         var graceItems = new Array;
                    814:         graceItems = current.split(':');
                    815:         gsecs=graceItems[0];
1.97    ! raeburn   816:         gweeks=Math.floor(gsecs/604800);
        !           817:         gsecs -= gweeks*604800;
1.96      raeburn   818:         gdays=Math.floor(gsecs/86400);
                    819:         gsecs -= gdays*86400;
                    820:         ghours=Math.floor(gsecs/3600);
                    821:         gsecs -= ghours*3600;
                    822:         gmins=Math.floor(gsecs/60);
                    823:         gsecs -= gmins*60;
                    824:         gfrac = graceItems[1];
                    825:         if (graceItems[2] == 1) {
                    826:             checktext = ' checked="checked"';
                    827:         }
                    828:     }
                    829:     return '<input type="hidden" name="setgrace" value="" />'+
                    830:            '<fieldset class="LC_grace"><legend>Time past due</legend>'+
1.97    ! raeburn   831:            '<span style="white-space:nowrap">'+intweek(gweeks)+' weeks </span>'+
        !           832:            '<span style="white-space:nowrap">'+intday(gdays)+' days </span><br />'+
        !           833:            '<span style="white-space:nowrap">'+inthour(ghours)+' hours </span>'+
        !           834:            '<span style="white-space:nowrap">'+intminute(gmins)+' mins </span>'+
1.96      raeburn   835:            '</fieldset><fieldset class="LC_grace"><legend>Partial Credit</legend>'+
                    836:            '<input type="text" size="3" name="frac" value="'+gfrac+'" onblur="parent.gracestringeval();" />'+
                    837:            '&nbsp;&nbsp;<label><input type="checkbox" value="1" name="grad"'+checktext+' onclick="parent.gracestringeval();" />'+
                    838:            'gradual</label></fieldset>'+
                    839:            '<a href="#" onclick="parent.removeGrace(this);return false;">Remove</a><hr />';
                    840: }
                    841: 
                    842: function addGrace() {
                    843:     var frame = window.frames["choices"];
                    844:     if (frame.document.getElementById('LC_string_grace_inner')) {
                    845:         var innerDiv = frame.document.getElementById('LC_string_grace_inner');
                    846:         var graceDiv = frame.document.createElement('div');
                    847:         graceDiv.innerHTML = graceitem();
                    848:         innerDiv.appendChild(graceDiv);
                    849:     }
                    850:     return;
                    851: }
                    852: 
                    853: function removeGrace(caller) {
                    854:     var frame = window.frames["choices"];
                    855:     if (frame.document.getElementById('LC_string_grace_inner')) {
                    856:         var innerDiv = frame.document.getElementById('LC_string_grace_inner');
                    857:         var divToRemove = caller.closest('div');
                    858:         if (divToRemove) {
                    859:             innerDiv.removeChild(divToRemove);
                    860:             gracestringeval();
                    861:         }
                    862:     }
                    863:     return;
                    864: }
                    865: 
1.25      www       866: function radiostringeval(newval) {
                    867:    svalue=newval;
                    868:    draw();
                    869: }
                    870: 
1.29      www       871: function callradiostringeval(newval) {
1.67      raeburn   872:     return 'onclick="parent.radiostringeval(\''+newval+'\')"';
1.29      www       873: }
                    874: 
1.72      raeburn   875: function lenienteval(newval) {
                    876:     if (newval == 'weighted') {
                    877:         if (document.getElementById('lenientweighteddiv')) {
                    878:             document.getElementById('lenientweighteddiv').style.display='block';
                    879:         }
                    880:         var patternRelWeight = /^\-?[\d.]+$/;
1.79      raeburn   881:         var sform=choices.document.forms.sch;
1.88      raeburn   882:         var relwtlength = sform.lenientrelwt.length;
                    883:         if ((relwtlength != '') && (typeof(relwtlength) != 'undefined')) {
1.72      raeburn   884:             for (var i=0; i<sform.lenientrelwt.length; i++) {
                    885:                 var relweight = sform.lenientrelwt[i].value;
                    886:                 relweight = relweight.replace(/^\s+|\s+$/g,'');
                    887:                 if (!patternRelWeight.test(relweight)) {
                    888:                     if (i<2) {
                    889:                         relweight = '1.0';
                    890:                     } else {
                    891:                         relweight = '0.0';
                    892:                     }
                    893:                 }
                    894:                 sform.lenientrelwt[i].value = relweight;
                    895:                 if (i==0) {
                    896:                     svalue = relweight;
                    897:                 } else {
                    898:                     svalue += ','+relweight;
                    899:                 }
                    900:             }
                    901:         }
                    902:     } else {
                    903:         if (document.getElementById('lenientweighteddiv')) {
                    904:             document.getElementById('lenientweighteddiv').style.display='none';
                    905:         }
                    906:         svalue=newval;
1.73      raeburn   907:     }
1.72      raeburn   908:     draw();
                    909: }
                    910: 
                    911: function calllenientradioeval(newval) {
                    912:     return 'onclick="parent.lenienteval(\''+newval+'\')"';
                    913: }
                    914: 
1.68      raeburn   915: function callintervalpmodval() {
1.70      raeburn   916:     return 'onclick="parent.intcalc();parent.toggleSecret()"';
1.79      raeburn   917: }
1.68      raeburn   918: 
1.2       www       919: function intervaldis() {
                    920:     csecs=svalue;
                    921:     cdays=Math.floor(csecs/86400);
                    922:     csecs-=cdays*86400;
                    923:     chours=Math.floor(csecs/3600);
                    924:     csecs-=chours*3600;
                    925:     cmins=Math.floor(csecs/60);
                    926:     csecs-=cmins*60;
1.69      musolffc  927:     return cdays+' days '+chours+' hours '+cmins+' mins '+csecs+' secs';
1.2       www       928: }
1.21      www       929: 
                    930: function pickcolor(picked) {
                    931:   svalue=picked;
                    932:   draw();
                    933: }
                    934: 
                    935: function colorfield(ir,ig,ib) {
                    936:    var col=new Array;
1.23      www       937:    col=["00","11","22","44","66","88","AA","CC","DD","EE","FF"];
1.21      www       938:    var color='#'+col[ir]+col[ig]+col[ib];
1.23      www       939:    var selection="<font color='"+color+"'>X</font>";
                    940:    if (color==svalue) { selection="<font color='#"+col[10-ir]+col[10-ig]+col[10-ib]+"'>X</font>"; }
1.21      www       941:    choicewrite('<td bgcolor="'+color+'"><a href="javascript:parent.pickcolor('+"'"+
                    942:                color+"'"+')">'+selection+'</a></td>');
1.80      raeburn   943: }
1.21      www       944: 
1.1       www       945: function draw() {
                    946:    choicestart();
1.51      bisitz    947:    choicewrite('<form name="sch"');
1.6       www       948:    if (ptype=='int') {
                    949:       choicewrite(' action="javascript:integereval();"');
                    950:    }
                    951:    if (ptype=='float') {
                    952:       choicewrite(' action="javascript:floateval();"');
                    953:    }
                    954:    if (ptype=='string') {
1.73      raeburn   955:       if (pscat == 'ip') {
                    956:           choicewrite(' action="javascript:ipstringeval();"');
1.96      raeburn   957:       } else if (pscat == 'grace') {
                    958:           choicewrite(' action="javascript:gracestringeval();"');
1.73      raeburn   959:       } else {
                    960:           choicewrite(' action="javascript:stringeval();"');
                    961:       }
1.6       www       962:    }
1.62      raeburn   963:    if (ptype != 'int' && ptype != 'float' && ptype != 'string') {
                    964:        choicewrite(' action=""');
                    965:    }
1.6       www       966:    choicewrite('>');
1.1       www       967:    if (ptype=='tolerance') {
1.2       www       968: // 0: pscat
                    969:       if (pscat=='default') {
1.1       www       970:          tablestart('Use default value or algorithm of resource');
                    971:       }
1.2       www       972:       if (pscat=='relative_sym') {
1.1       www       973: // 2: percentage
                    974: // 3: open
                    975:          tablestart('Percentage error, symmetric around value');
                    976:          valline('Percentage',2,3);
1.13      www       977:          if ((svalue!='') && (typeof(svalue)!="undefined")) {
                    978:             choices.document.forms.sch.val2.value=parseInt(svalue);
                    979:             if (svalue.indexOf('+')!=-1) {
                    980:                choices.document.forms.sch.val3.checked=true;
                    981:             }
                    982:          }
1.1       www       983:       }
1.2       www       984:       if (pscat=='relative') {
1.1       www       985: // 2: left
                    986: // 3: open
                    987: // 4: right
                    988: // 5: open
                    989:          tablestart('Percentage error, asymmetric around value');
                    990:          valline('Upper percentage',2,3);
                    991:          valline('Lower percentage',4,5);
1.17      matthew   992:          var range1=new Array;
1.13      www       993:          if ((svalue!='') && (typeof(svalue)!="undefined")) {
1.17      matthew   994:             range1=svalue.split(',');
                    995:             if (typeof(range1[1])=='undefined') { range1[1]=range1[0]; }
                    996:             choices.document.forms.sch.val2.value=parseFloat(range1[0]);
                    997:             if (range1[0].indexOf('+')!=-1) {
1.13      www       998:                choices.document.forms.sch.val3.checked=true;
                    999:             }
1.17      matthew  1000:             choices.document.forms.sch.val4.value=parseFloat(range1[1]);
                   1001:             if (range1[1].indexOf('+')!=-1) {
1.13      www      1002:                choices.document.forms.sch.val5.checked=true;
                   1003:             }
                   1004:          }
1.1       www      1005:       }
1.2       www      1006:       if (pscat=='absolute_sym') {
1.1       www      1007:          tablestart('Absolute error, symmetric around value');
                   1008:          valline('Value',2,3);
1.13      www      1009:          if ((svalue!='') && (typeof(svalue)!="undefined")) {
1.15      www      1010:             choices.document.forms.sch.val2.value=parseFloat(svalue);
1.13      www      1011:             if (svalue.indexOf('+')!=-1) {
                   1012:                choices.document.forms.sch.val3.checked=true;
                   1013:             }
                   1014:          }
1.1       www      1015:       }
1.2       www      1016:       if (pscat=='absolute') {
1.1       www      1017:          tablestart('Absolute error, asymmetric around value');
                   1018:          valline('Upper value',2,3);
                   1019:          valline('Lower value',4,5);
1.17      matthew  1020:          var range2=new Array;
1.13      www      1021:          if ((svalue!='') && (typeof(svalue)!="undefined")) {
                   1022:             range=svalue.split(',');
1.17      matthew  1023:             if (typeof(range2[1])=='undefined') { range2[1]=range2[0]; }
                   1024:             choices.document.forms.sch.val2.value=parseFloat(range2[0]);
                   1025:             if (range2[0].indexOf('+')!=-1) {
1.13      www      1026:                choices.document.forms.sch.val3.checked=true;
                   1027:             }
1.17      matthew  1028:             choices.document.forms.sch.val4.value=parseFloat(range2[1]);
                   1029:             if (range2[1].indexOf('+')!=-1) {
1.13      www      1030:                choices.document.forms.sch.val5.checked=true;
                   1031:             }
                   1032:          }
1.1       www      1033:       }
                   1034:    }
                   1035: 
                   1036:    if (ptype=='date') {
1.2       www      1037:      if (pscat=='default') {
                   1038:          tablestart('Default value or none');
                   1039:          choicewrite('</table>');
                   1040:      } else {
                   1041:       if (pscat=='start') {
1.24      www      1042:          tablestart('Date and time');
1.2       www      1043:       }
                   1044:       if (pscat=='end') {
1.24      www      1045:          tablestart('Date and time');
1.2       www      1046:       }
                   1047:       if (pscat=='interval') {
1.70      raeburn  1048:          var proctorkeytype = 'hidden'; 
1.71      raeburn  1049:          var donebuttontext = 'none';
1.70      raeburn  1050:          if (pmodval == '_done_proctor') {
                   1051:              proctorkeytype = 'text';
1.71      raeburn  1052:              donebuttontext = 'block';
                   1053:          }
                   1054:          if (pmodval == '_done') {
                   1055:              donebuttontext = 'block';
1.70      raeburn  1056:          }
1.2       www      1057:          tablestart('Time interval');
1.69      musolffc 1058:          choicewrite( [
                   1059:             '<tr><td colspan="3">'+intervaldis()+'</td></tr>',
                   1060:             '<tr><td>Time:</td><td colspan="2">',
                   1061:                 '<span style="white-space:nowrap">'+intday()+' days </span>',
                   1062:                 '<span style="white-space:nowrap">'+inthour()+' hours</span>',
                   1063:                 '<span style="white-space:nowrap">'+intminute()+' mins</span>',
                   1064:                 '<span style="white-space:nowrap">'+intsecond()+' secs</span>',
                   1065:             '</td></tr>',
                   1066:             '</table>',
                   1067:             '<br />',
                   1068:             ].join("\n"));
1.68      raeburn  1069:          tablestart('Provide a "Done" button to students?');
                   1070:          choicewrite('<tr><td>Value:</td><td colspan="2">');
1.70      raeburn  1071:          choicewrite('<label><input name="donebutton" value=""'+
                   1072:                      ' type="radio" '+callintervalpmodval());
                   1073:          if (pmodval == '') { choicewrite(' checked="checked"'); }
                   1074:          choicewrite(' /> No</label><br />');
1.68      raeburn  1075:          choicewrite('<label><input name="donebutton" value="_done"'+
                   1076:                      ' type="radio" '+callintervalpmodval());
1.70      raeburn  1077:          if (pmodval == '_done') { choicewrite(' checked="checked"'); }
1.68      raeburn  1078:          choicewrite(' /> Yes</label><br />');
1.70      raeburn  1079:          choicewrite('<span style="white-space:nowrap">'+
                   1080:                      '<label><input name="donebutton" value="_done_proctor"'+
1.68      raeburn  1081:                      ' type="radio" '+callintervalpmodval());
1.70      raeburn  1082:          if (pmodval == '_done_proctor') { choicewrite(' checked="checked"'); }
                   1083:          choicewrite(' /> Yes, with proctor key</label>');
                   1084:          choicewrite('&nbsp;<input name="donebutton_proctorkey" value='+
                   1085:                      '"'+escapeHTML(pextraval)+'" type="'+proctorkeytype+
1.71      raeburn  1086:                      '" id="done_proctorkey" size="10"'+
                   1087:                      ' onblur="parent.intcalc();" /></span><br />'+
                   1088:                      '<div id="donebuttontextdiv" style="display:'+donebuttontext+'">'+
                   1089:                      '<br /><span style="white-space:nowrap">'+
                   1090:                      'Button text:'+
                   1091:                      '<input name="donebutton_text" value='+
                   1092:                      '"'+escapeHTML(pextravaltwo)+'" type="text" '+
                   1093:                      'size="10" onblur="parent.intcalc();" /></span></div>');
1.68      raeburn  1094:          choicewrite('</td></tr></table>');
                   1095:       } else {
1.52      bisitz   1096:          choicewrite('<tr><td colspan="3">'
1.2       www      1097:          +cdate.toString()+
1.52      bisitz   1098:          '</td></tr><tr><td>Date:</td><td colspan="2">');
1.2       www      1099:          month();date();year();
1.52      bisitz   1100:          choicewrite('</td></tr><tr><td>Time:'
1.51      bisitz   1101:          +'</td><td colspan="2">');hour();choicewrite('h ');minute();
1.2       www      1102:          choicewrite('m ');second();
                   1103:          choicewrite('s</td></tr></table>');
                   1104:       }
                   1105:      }
1.1       www      1106:    }
                   1107: 
1.6       www      1108:    if (ptype=='int') {
1.19      www      1109:       var pscatparts=new Array;
                   1110:       pscatparts=pscat.split(',');
                   1111:       pscat=pscatparts[0];
1.6       www      1112:       if (pscat=='default') {
                   1113:          tablestart('Default value or none');
1.14      www      1114:          choicewrite('</table>');
1.6       www      1115:       } else {
1.14      www      1116:        if (pscat=='range') {
                   1117:          tablestart('Integer range');      
1.52      bisitz   1118:          choicewrite('<tr><td>Lower Value:'+
1.51      bisitz   1119:               '</td><td colspan="2"><input type="text" size="4" name="val2'+
1.53      bisitz   1120:               '" /></td></tr>');
1.52      bisitz   1121:          choicewrite('<tr><td>Upper Value:'+
1.51      bisitz   1122:               '</td><td colspan="2"><input type="text" size="4" name="val4'+
1.53      bisitz   1123:               '" /></td></tr></table>');
1.14      www      1124:          var range=new Array;
                   1125:          if ((svalue!='') && (typeof(svalue)!="undefined")) {
                   1126:             range=svalue.split(',');
                   1127:             if (typeof(range[1])=='undefined') { range[1]=range[0]; }
                   1128:             choices.document.forms.sch.val2.value=parseInt(range[0]);
                   1129:             choices.document.forms.sch.val4.value=parseInt(range[1]);
                   1130:          }
                   1131:        } else {
1.6       www      1132:         if (pscat=='pos') {
                   1133:            tablestart('Positive (non-zero) integer');
                   1134:         }
                   1135:         if (pscat=='zeropos') {
                   1136:            tablestart('Positive integer or zero');
                   1137:         }
1.12      www      1138:         if (pscat.indexOf('inrange')!=-1) {
1.10      www      1139:            var rangeparts=new Array;
1.12      www      1140:            rangeparts=split(',',pscat);
1.10      www      1141:            tablestart('Integer in the range ['+rangeparts[1]+']');
                   1142:         }
1.6       www      1143:         if (pscat=='any') {
                   1144:            tablestart('Integer');
                   1145:         }
1.52      bisitz   1146:         choicewrite('<tr><td>Value:</td><td colspan="2">');
1.51      bisitz   1147:         choicewrite('<input name="intval" size="10" value="'+escapeHTML(svalue)+
1.53      bisitz   1148:                     '" onchange="parent.integereval()" />');
1.54      bisitz   1149:         choicewrite('</td></tr></table>');
1.6       www      1150:       }
1.14      www      1151:      }
1.1       www      1152:    }
                   1153: 
1.6       www      1154:    if (ptype=='float') {
                   1155:       if (pscat=='default') {
                   1156:          tablestart('Default value or none');
1.79      raeburn  1157:          choicewrite('</table>');
1.6       www      1158:       } else {
                   1159:         if (pscat=='pos') {
                   1160:            tablestart('Positive floating point number or zero');
                   1161:         }
                   1162:         if (pscat=='zeroone') {
                   1163:            tablestart('Floating point number between zero and one');
                   1164:         }
                   1165:         if (pscat=='any') {
                   1166:            tablestart('Floating point number');
                   1167:         }
1.52      bisitz   1168:         choicewrite('<tr><td>Value:</td><td colspan="2">');
1.51      bisitz   1169:         choicewrite('<input name="floatval" size="10" value="'+escapeHTML(svalue)+
1.53      bisitz   1170:                     '" onchange="parent.floateval()" />');
1.54      bisitz   1171:         choicewrite('</td></tr></table>');
1.6       www      1172:       }
1.1       www      1173:    }
                   1174: 
1.6       www      1175:    if (ptype=='string') {
1.83      raeburn  1176:         if ((pscat=='any') || (pscat=='') || (pscat=='default') || 
1.42      albertel 1177:             (typeof(pscat)=='undefined')) {
1.6       www      1178:            tablestart('Text');
1.54      bisitz   1179:            choicewrite('<tr><td>Value:</td><td colspan="2">');
1.46      albertel 1180:            choicewrite('<input name="stringval" size="20" value="'+escapeHTML(svalue)+
1.53      bisitz   1181:                     '" type="text" onchange="parent.stringeval()" />');
1.25      www      1182:         }
                   1183:         if (pscat=='yesno') {
                   1184:            tablestart('Yes/No');
1.52      bisitz   1185: 	   choicewrite('<tr><td>Value:</td><td colspan="2">');
1.32      albertel 1186:            choicewrite('<label><input name="stringval" value="yes"'+
1.29      www      1187:                   ' type="radio" '+callradiostringeval('yes'));
1.53      bisitz   1188:            if (svalue=='yes') { choicewrite(' checked="checked"'); }
                   1189:            choicewrite(' /> Yes</label><br />');
1.32      albertel 1190:            choicewrite('<label><input name="stringval" value="no"'+
1.29      www      1191:                   ' type="radio" '+callradiostringeval('no'));
1.53      bisitz   1192:            if (svalue=='no') { choicewrite(' checked="checked"'); }
                   1193:            choicewrite(' /> No</label><br />');
1.25      www      1194:         }
1.47      albertel 1195:         if (pscat=='problemstatus') {
                   1196:            tablestart('Problem Status');
1.52      bisitz   1197: 	   choicewrite('<tr><td>Value:</td><td colspan="2">');
1.47      albertel 1198:            choicewrite('<label><input name="stringval" value="yes"'+
                   1199:                   ' type="radio" '+callradiostringeval('yes'));
1.53      bisitz   1200:            if (svalue=='yes') { choicewrite(' checked="checked"'); }
                   1201:            choicewrite(' /> Yes</label><br />');
1.49      albertel 1202:            choicewrite('<label><input name="stringval" value="answer"'+
                   1203:                   ' type="radio" '+callradiostringeval('answer'));
1.53      bisitz   1204:            if (svalue=='answer') { choicewrite(' checked="checked"'); }
                   1205:            choicewrite(' /> Yes, and show correct answer if they exceed the maximum number of tries.</label><br />');
1.47      albertel 1206:            choicewrite('<label><input name="stringval" value="no"'+
                   1207:                   ' type="radio" '+callradiostringeval('no'));
1.53      bisitz   1208:            if (svalue=='no') { choicewrite(' checked="checked"'); }
                   1209:            choicewrite(' /> No, don\'t show correct/incorrect feedback.</label><br />');
1.47      albertel 1210:            choicewrite('<label><input name="stringval" value="no_feedback_ever"'+
                   1211:                   ' type="radio" '+callradiostringeval('no_feedback_ever'));
1.53      bisitz   1212:            if (svalue=='no_feedback_ever') { choicewrite(' checked="checked"'); }
                   1213:            choicewrite(' /> No, show no feedback at all.</label><br />');
1.47      albertel 1214:         }
1.25      www      1215:         if (pscat=='examtype') {
                   1216:            tablestart('Exam Type');
1.52      bisitz   1217: 	   choicewrite('<tr><td>Value:</td><td colspan="2">');
1.32      albertel 1218:            choicewrite('<label><input name="stringval" value="online"'+
1.29      www      1219:                 ' type="radio" '+callradiostringeval('online'));
1.53      bisitz   1220:            if (svalue=='online') { choicewrite(' checked="checked"'); }
                   1221:            choicewrite(' /> Online</label><br />');
1.32      albertel 1222:            choicewrite('<label><input name="stringval" value="checkout"'+
1.29      www      1223:               ' type="radio" '+callradiostringeval('checkout'));
1.53      bisitz   1224:            if (svalue=='checkout') { choicewrite(' checked="checked"'); }
                   1225:            choicewrite(' /> Check out</label><br />');
1.25      www      1226:        }
                   1227:         if (pscat=='questiontype') {
                   1228:            tablestart('Question Type');
1.52      bisitz   1229: 	   choicewrite('<tr><td>Value:</td><td colspan="2">');
1.32      albertel 1230:            choicewrite('<label><input name="stringval" value="problem"'+
1.29      www      1231:                ' type="radio" '+callradiostringeval('problem'));
1.53      bisitz   1232:            if (svalue=='problem') { choicewrite(' checked="checked"'); }
                   1233:            choicewrite(' /> Standard Problem</label><br />');
1.36      albertel 1234: //	   choicewrite('<label><input name="stringval" value="quiz"'+
                   1235: //                ' type="radio" '+callradiostringeval('quiz'));
1.53      bisitz   1236: //         if (svalue=='quiz') { choicewrite(' checked="checked"'); }
                   1237: //         choicewrite(' /> Quiz</label><br />');
1.35      albertel 1238:            choicewrite('<label><input name="stringval" value="practice"'+
                   1239:                   ' type="radio" '+callradiostringeval('practice'));
1.53      bisitz   1240:            if (svalue=='practice') { choicewrite(' checked="checked"'); }
                   1241:            choicewrite(' /> Practice</label><br />');
1.32      albertel 1242:            choicewrite('<label><input name="stringval" value="exam"'+
1.29      www      1243:                   ' type="radio" '+callradiostringeval('exam'));
1.53      bisitz   1244:            if (svalue=='exam') { choicewrite(' checked="checked"'); }
1.65      bisitz   1245:            choicewrite(' /> Bubblesheet Exam</label><br />');
1.36      albertel 1246: //         choicewrite('<label><input name="stringval" value="assess"'+
                   1247: //              ' type="radio" '+callradiostringeval('assess'));
1.53      bisitz   1248: //         if (svalue=='assess') { choicewrite(' checked="checked"'); }
                   1249: //         choicewrite(' /> Assessment</label><br />');
1.32      albertel 1250:            choicewrite('<label><input name="stringval" value="survey"'+
1.29      www      1251:                 ' type="radio" '+callradiostringeval('survey'));
1.53      bisitz   1252:            if (svalue=='survey') { choicewrite(' checked="checked"'); }
                   1253:            choicewrite(' /> Survey</label><br />');
1.36      albertel 1254: //         choicewrite('<label><input name="stringval" value="form"'+
                   1255: //                ' type="radio" '+callradiostringeval('form'));
1.53      bisitz   1256: //         if (svalue=='form') { choicewrite(' checked="checked"'); }
1.36      albertel 1257: //         choicewrite('> Input Form</label><br />');
1.57      raeburn  1258:            choicewrite('<label><input name="stringval" value="surveycred"'+
                   1259:                 ' type="radio" '+callradiostringeval('surveycred'));
                   1260:            if (svalue=='surveycred') { choicewrite(' checked="checked"'); }
                   1261:            choicewrite('> Survey (credit for submission)</label><br />');
                   1262:            choicewrite('<label><input name="stringval" value="anonsurvey"'+
                   1263:                 ' type="radio" '+callradiostringeval('anonsurvey'));
                   1264:            if (svalue=='anonsurvey') { choicewrite(' checked="checked"'); }
                   1265:            choicewrite('> Anonymous Survey</label><br />');
                   1266:            choicewrite('<label><input name="stringval" value="anonsurveycred"'+
                   1267:                 ' type="radio" '+callradiostringeval('anonsurveycred'));
                   1268:            if (svalue=='anonsurveycred') { choicewrite(' checked="checked"'); }
                   1269:            choicewrite('> Anonymous Survey (credit for submission)</label><br />');
1.59      raeburn  1270:            choicewrite('<label><input name="stringval" value="randomizetry"'+
                   1271:                 ' type="radio" '+callradiostringeval('randomizetry'));
                   1272:            if (svalue=='randomizetry') { choicewrite(' checked="checked"'); }
                   1273:            choicewrite('> New Randomization Each N Tries (default N=1)</label><br />');
1.32      albertel 1274:            choicewrite('<label><input name="stringval" value="library"'+
1.29      www      1275:                ' type="radio" '+callradiostringeval('library'));
1.53      bisitz   1276:            if (svalue=='library') { choicewrite(' checked="checked"'); }
                   1277:            choicewrite(' /> Library</label><br />');
1.25      www      1278:         }
1.60      raeburn  1279:         if (pscat=='lenient') {
1.72      raeburn  1280:            var patternLenientStd = /^(yes|no|default)$/;
                   1281:            var patternLenientRel = /^([\-\d\.]+)\,([\-\d\.]+)\,([\-\d\.]+)\,([\-\d\.]+)$/;
                   1282:            var lenientweighted = 'none';
                   1283:            var relatives = new Array;
1.60      raeburn  1284:            tablestart('Lenient Grading (Partial Credit)');
                   1285:            choicewrite('<tr><td>Value:</td><td colspan="2">');
                   1286:            choicewrite('<label><input name="stringval" value="yes"'+
1.72      raeburn  1287:                   ' type="radio" '+calllenientradioeval('yes'));
1.60      raeburn  1288:            if (svalue=='yes') { choicewrite(' checked="checked"'); }
                   1289:            choicewrite(' /> Yes</label><br />');
                   1290:            choicewrite('<label><input name="stringval" value="no"'+
1.72      raeburn  1291:                   ' type="radio" '+calllenientradioeval('no'));
1.60      raeburn  1292:            if (svalue=='no') { choicewrite(' checked="checked"'); }
                   1293:            choicewrite(' /> No</label><br />');
                   1294:            choicewrite('<label><input name="stringval" value="default"'+
1.72      raeburn  1295:                ' type="radio" '+calllenientradioeval('default'));
1.60      raeburn  1296:            if (svalue=='default') { choicewrite(' checked="checked"'); }
                   1297:            choicewrite(' /> Default (only bubblesheet grading is lenient)</label><br />');
1.72      raeburn  1298:            choicewrite('<label><input name="stringval" value="weighted"'+
                   1299:                ' type="radio" '+calllenientradioeval('weighted'));
                   1300:            if (!patternLenientStd.test(svalue) && svalue != '') {
                   1301:               choicewrite(' checked="checked"');
                   1302:               lenientweighted='block';
                   1303:               var relatives = svalue.match(patternLenientRel);
                   1304:            }
                   1305:            choicewrite(' />Yes, weighted (optionresponse in checkbox mode)</label><br /><br />'+
                   1306:                        '<div id="lenientweighteddiv" style="display:'+lenientweighted+'">'+
                   1307:                        '<table class="LC_parmsel_table"><tr bgcolor="#C5DB99">'+
                   1308:                        '<th colspan="2">Foil submission status</th><th>Points</th></tr>');
                   1309:            var lenienttypes = ['Correct (checked)','Correct (unchecked)','Incorrect (checked)','Incorrect (unchecked)'];
                   1310:            for (var i=0; i<lenienttypes.length; i++) {
                   1311:                var j = i+1;
                   1312:                if (relatives[j] == '') {
                   1313:                    if (i < 2) {
                   1314:                        relatives[j] = '1.0';
                   1315:                    } else {
                   1316:                        relatives[j] = '0.0';
                   1317:                    }
                   1318:                }
                   1319:                choicewrite('<tr><td colspan="2">'+lenienttypes[i]+'</td>'+
                   1320:                            '<td><input type="text" name="lenientrelwt" value="'+relatives[j]+'"'+
                   1321:                            ' size="3" onblur="parent.lenienteval(\'weighted\')" /></td></tr>');
                   1322:            }
                   1323:            choicewrite('</table></div>');
1.60      raeburn  1324:         }
1.64      raeburn  1325:         if (pscat=='discussvote') {
                   1326:            tablestart('Discussion Voting');
                   1327:            choicewrite('<tr><td>Value:</td><td colspan="2">');
                   1328:            choicewrite('<label><input name="stringval" value="yes"'+
                   1329:                   ' type="radio" '+callradiostringeval('yes'));
                   1330:            if (svalue=='yes') { choicewrite(' checked="checked"'); }
                   1331:            choicewrite(' /> Yes</label><br />');
                   1332:            choicewrite('<label><input name="stringval" value="notended"'+
                   1333:                   ' type="radio" '+callradiostringeval('notended'));
                   1334:            if (svalue=='notended') { choicewrite(' checked="checked"'); }
                   1335:            choicewrite(' /> Yes, unless discussion ended</label><br />');
                   1336:            choicewrite('<label><input name="stringval" value="no"'+
                   1337:                   ' type="radio" '+callradiostringeval('no'));
                   1338:            if (svalue=='no') { choicewrite(' checked="checked"'); }
                   1339:            choicewrite(' /> No</label><br />');
                   1340:         }
1.91      raeburn  1341:         if (pscat=='tex') {
                   1342:            tablestart('TeX file display');
                   1343:            choicewrite('<tr><td>Value:</td><td colspan="2">');
                   1344:            choicewrite('<label><input name="stringval" value="tth"'+
                   1345:                   ' type="radio" '+callradiostringeval('tth'));
                   1346:            if (svalue=='tth') { choicewrite(' checked="checked"'); }
                   1347:            choicewrite(' /> tth (TeX to HTML)</label><br />');
                   1348:            choicewrite('<label><input name="stringval" value="mathjax"'+
                   1349:                   ' type="radio" '+callradiostringeval('mathjax'));
                   1350:            if (svalue=='mathjax') { choicewrite(' checked="checked"'); }
                   1351:            choicewrite(' /> MathJax</label><br />');
                   1352:         }
1.25      www      1353:         if (pscat=='ip') {
1.83      raeburn  1354:             var currallow = new Array;
1.73      raeburn  1355:             var currdeny = new Array;
1.88      raeburn  1356:             if ((svalue != '') && (typeof(svalue) != 'undefined')) {
1.73      raeburn  1357:                 var patternComma = /,/;
                   1358:                 var patternAllow = /^([\[\]a-zA-Z\.\d\*\-]+)$/;
                   1359:                 var patternDeny = /^\!([\[\]a-zA-Z\.\d\*\-]+)$/;
                   1360:                 var current = new Array;
1.83      raeburn  1361:                 if (patternComma.test(svalue)) {
1.73      raeburn  1362:                     current = svalue.split(',');
                   1363:                 } else {
1.81      raeburn  1364:                     current = [svalue];
1.73      raeburn  1365:                 }
                   1366:                 for (var i=0; i<current.length; i++) {
                   1367:                     if (patternDeny.test(current[i])) {
                   1368:                         var denied = current[i].replace(/^!/,'');
                   1369:                         currdeny.push(denied);
                   1370:                     } else {
                   1371:                         if (patternAllow.test(current[i])) {
                   1372:                             currallow.push(current[i]);
1.83      raeburn  1373:                         }
1.73      raeburn  1374:                     }
                   1375:                 }
                   1376:             }
                   1377:             if (currdeny.length == 0) {
                   1378:                 currdeny = ('');
                   1379:             }
                   1380:             if (currallow.length == 0) {
                   1381:                 currallow = ('');
                   1382:             }
                   1383:             var curripaccess = [currallow,currdeny];
                   1384:             tablestart('IP Number/Name');
1.95      raeburn  1385:             choicewrite('<tr><th>Allow from</th><th>Deny from</th></tr><tr>'+"\n");
1.73      raeburn  1386:             var acctypes = ['allow','deny'];
                   1387:             for (var i=0; i<acctypes.length; i++) {
1.95      raeburn  1388:                 choicewrite(['<td valign="top">',
                   1389:                              '<div>',
                   1390:                              '<div id="LC_string_ipacc_inner_'+acctypes[i]+'">'].join("\n"));
1.73      raeburn  1391:                 for (var j=0; j<curripaccess[i].length; j++) {
1.95      raeburn  1392:                     choicewrite(['<div><input type="text" size="12" name="setip'+acctypes[i]+'" value="'+curripaccess[i][j]+'" onblur="parent.ipstringeval();" />',
                   1393:                                  '<a href="#" onclick="parent.removeIpRule(this,\''+acctypes[i]+'\');return false;">Remove</a>',
                   1394:                                  '</div>'].join("\n"));
1.73      raeburn  1395:                 }
1.95      raeburn  1396:                 choicewrite('</div><button onclick="parent.addIpRule(\''+acctypes[i]+'\');return false;">Add item</button>'+"\n");
1.73      raeburn  1397:             }
1.95      raeburn  1398:             choicewrite('</div></td></tr></table>'+"\n");
1.6       www      1399:         }
1.26      www      1400:         if (pscat=='fileext') {
                   1401:             tablestart('Allowed File Extensions');
1.52      bisitz   1402: 	   choicewrite('<tr><td>Value:</td><td colspan="2">');
1.32      albertel 1403:            choicewrite('<label><input name="radstringval" value="txt"'+
1.29      www      1404:                ' type="radio" '+callradiostringeval('txt'));
1.53      bisitz   1405:            if (svalue=='txt') { choicewrite(' checked="checked"'); }
                   1406:            choicewrite(' /> Plain Text</label><br />');
1.32      albertel 1407:            choicewrite('<label><input name="radstringval" value="png,jpg,jpeg,gif"'+
1.29      www      1408:                ' type="radio" '+callradiostringeval('png,jpg,jpeg,gif'));
1.53      bisitz   1409:            if (svalue=='png,jpg,jpeg,gif') { choicewrite(' checked="checked"'); }
                   1410:            choicewrite(' /> Picture File</label><br />');
1.58      raeburn  1411:            choicewrite('<label><input name="radstringval" value="doc,docx,xls,xlsx,ppt,pptx"'+
                   1412:                ' type="radio" '+callradiostringeval('doc,docx,xls,xlsx,ppt,pptx'));
                   1413:            if (svalue=='doc,docx,xls,xlsx,ppt,pptx') { choicewrite(' checked="checked"'); }
1.53      bisitz   1414:            if (svalue=='doc,xls,ppt') { choicewrite(' checked="checked"'); }
                   1415:            choicewrite(' /> Office Document</label><br />');
1.46      albertel 1416:            choicewrite('<input name="stringval" size="20" value="'+escapeHTML(svalue)+
1.53      bisitz   1417:                     '" onchange="parent.stringeval()" />');
1.26      www      1418:        }
1.37      albertel 1419:        if (pscat=='useslots') {
                   1420:            tablestart('Slots control access');
1.52      bisitz   1421: 	   choicewrite('<tr><td>Value:</td><td colspan="2">');
1.37      albertel 1422:            choicewrite('<label><input name="stringval" value="no"'+
                   1423:                   ' type="radio" '+callradiostringeval('no'));
1.53      bisitz   1424:            if (svalue=='no') { choicewrite(' checked="checked"'); }
                   1425:            choicewrite(' /> No</label><br />');
1.37      albertel 1426:            choicewrite('<label><input name="stringval" value="resource"'+
                   1427:                   ' type="radio" '+callradiostringeval('resource'));
1.53      bisitz   1428:            if (svalue=='resource') { choicewrite(' checked="checked"'); }
1.82      raeburn  1429:            choicewrite(' /> Yes, and the scope of the slot is a single resource.</label><br />');
1.38      albertel 1430:            choicewrite('<label><input name="stringval" value="map"'+
                   1431:                   ' type="radio" '+callradiostringeval('map'));
1.53      bisitz   1432:            if (svalue=='map') { choicewrite(' checked="checked"'); }
1.82      raeburn  1433:            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 1434:            choicewrite('<label><input name="stringval" value="map_map"'+
1.40      albertel 1435:                   ' type="radio" '+callradiostringeval('map_map'));
1.53      bisitz   1436:            if (svalue=='map_map') { choicewrite(' checked="checked"'); }
1.82      raeburn  1437:            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.79      raeburn  1438:            choicewrite('</td></tr></table>');
1.80      raeburn  1439:        }
                   1440:        if (pscat=='deeplink') {
                   1441:            var deeplinkvals = new Array();
1.86      raeburn  1442:            var linkprotectparts = new Array();
1.89      raeburn  1443:            var ltikeyRegExp = /^(ltic:\d+|ltid:\d+|key:[a-zA-Z\d_.!@#$%^&*()+=-]+)$/;
1.90      raeburn  1444:            var linkexitparts = new Array();
                   1445:            var dlinkexitRegExp = /^(yes|url|no)(|:[^:,;'"]+)$/;
1.80      raeburn  1446:            var dlinkkeysty = 'hidden';
1.84      raeburn  1447:            var dlinkkeyval = '';
1.86      raeburn  1448:            var dlinklticdivsty = 'none';
                   1449:            var dlinkltiddivsty = 'none';
1.84      raeburn  1450:            var dlinkmenusdivsty = 'none';
1.90      raeburn  1451:            var dlinkexitdivsty = 'none';
                   1452:            var dlinkexittextval = '';
1.88      raeburn  1453:            if ((svalue != '') && (typeof(svalue) != 'undefined')) {
1.80      raeburn  1454:                deeplinkvals = svalue.split(',');
1.86      raeburn  1455:                if (ltikeyRegExp.test(deeplinkvals[4])) {
                   1456:                    linkprotectparts = deeplinkvals[4].split(':');
                   1457:                    deeplinkvals[4] = linkprotectparts[0];
                   1458:                    if (linkprotectparts[0] == 'key') {
1.80      raeburn  1459:                        dlinkkeysty = 'text';
1.86      raeburn  1460:                        dlinkkeyval = linkprotectparts[1];
                   1461:                    } else if (linkprotectparts[0] == 'ltic') {
                   1462:                        dlinklticdivsty = 'block';
                   1463:                    } else if (linkprotectparts[0] == 'ltid') {
                   1464:                        dlinkltiddivsty = 'block';
1.80      raeburn  1465:                    }
                   1466:                }
1.86      raeburn  1467:                if (deeplinkvals[5] >= 1) {
1.84      raeburn  1468:                    dlinkmenusdivsty = 'inline-block';
                   1469:                }
1.90      raeburn  1470:                if (dlinkexitRegExp.test(deeplinkvals[7])) {
                   1471:                    linkexitparts = deeplinkvals[7].split(':');
                   1472:                    deeplinkvals[7] = linkexitparts[0];
                   1473:                    if (deeplinkvals[7] != 'no') {
                   1474:                        dlinkexitdivsty = 'inline-block'; 
                   1475:                        if (!linkexitparts[1]) {
                   1476:                            dlinkexittextval = 'Exit Tool';
                   1477:                        } else {
                   1478:                            dlinkexittextval = linkexitparts[1];
                   1479:                        }
                   1480:                    }
                   1481:                }
1.80      raeburn  1482:            } else {
1.90      raeburn  1483:                deeplinkvals = ['off','unhide','full','res','','0','_self','no'];
1.80      raeburn  1484:            }
1.86      raeburn  1485:            var deeplinkstate = new Array();
                   1486:            deeplinkstate = ['only','off','both'];
                   1487:            var deeplinkstatetxt = new Array();
                   1488:            deeplinkstatetxt = ['deep only','deeplink off','regular + deep'];
                   1489:            var deeplinkothers = new Array();
                   1490:            deeplinkothers = ['hide','unhide'];
                   1491:            var deeplinkotherstxt = new Array();
                   1492:            deeplinkotherstxt = ['Hidden','Unhidden'];
1.80      raeburn  1493:            var deeplinklisting = new Array();
                   1494:            deeplinklisting = ['full','absent','grades','details','datestatus'];
                   1495:            var deeplinklisttxt = new Array();
                   1496:            deeplinklisttxt = ['Listed (linked) in both','Not listed','Listed in grades only','Listed (unlinked) in both','Listed (unlinked) inc. status in both'];
                   1497:            var deeplinkscopes = new Array();
                   1498:            deeplinkscopes = ['res','map','rec'];
                   1499:            var deeplinkscopetxt = new Array();
                   1500:            deeplinkscopetxt = ['resource only','enclosing map/folder','recursive map/folder'];
1.86      raeburn  1501:            var deeplinkprotect = new Array();
                   1502:            deeplinkprotect = ['none','key','ltic','ltid'];
1.87      raeburn  1503:            var deeplinktarget = new Array();
                   1504:            deeplinktarget = ['_self','_top'];
                   1505:            var deeplinktargettxt = new Array();
                   1506:            deeplinktargettxt = ['Embedded','Not embedded'];
1.90      raeburn  1507:            var deeplinkexit = ['yes','url','no'];
1.78      raeburn  1508:            tablestart('Deep-linked items');
1.86      raeburn  1509:            choicewrite('<tr><td>Access status?</td><td>');
                   1510:            choicewrite('<select name="deeplinkstate">');
                   1511:            for (var i=0; i<deeplinkstate.length; i++) {
                   1512:                choicewrite('<option value="'+deeplinkstate[i]+'"');
                   1513:                if (deeplinkvals[0] == deeplinkstate[i]) {
                   1514:                    choicewrite(' selected="selected"');
                   1515:                }
                   1516:                choicewrite('>'+deeplinkstatetxt[i]+'</option>');
                   1517:            }
                   1518:            choicewrite('</select></td></tr>');
                   1519:            choicewrite('<tr><td>Hide other resources?</td><td>');
                   1520:            choicewrite('<select name="deeplinkothers">');
                   1521:            for (var i=0; i<deeplinkothers.length; i++) {
                   1522:                choicewrite('<option value="'+deeplinkothers[i]+'"');
                   1523:                if (deeplinkvals[1] == deeplinkothers[i]) {
                   1524:                    choicewrite(' selected="selected"');
                   1525:                }
                   1526:                choicewrite('>'+deeplinkotherstxt[i]+'</option>');
                   1527:            }
                   1528:            choicewrite('</select></td></tr>');
1.84      raeburn  1529:            choicewrite('<tr><td>In Contents + Gradebook?</td><td>');
1.80      raeburn  1530:            choicewrite('<select name="deeplinklisted">');
                   1531:            for (var i=0; i<deeplinklisting.length; i++) {
                   1532:                choicewrite('<option value="'+deeplinklisting[i]+'"');
1.86      raeburn  1533:                if (deeplinkvals[2] == deeplinklisting[i]) {
1.80      raeburn  1534:                    choicewrite(' selected="selected"');
                   1535:                }
                   1536:                choicewrite('>'+deeplinklisttxt[i]+'</option>');
                   1537:            }
                   1538:            choicewrite('</select></td></tr>');
1.86      raeburn  1539:            choicewrite('<tr><td>Access scope for link</td><td>');
1.80      raeburn  1540:            choicewrite('<select name="deeplinkacc">');
                   1541:            for (var i=0; i<deeplinkscopes.length; i++) {
                   1542:                choicewrite('<option value="'+deeplinkscopes[i]+'"');
1.86      raeburn  1543:                if (deeplinkvals[3] == deeplinkscopes[i]) {
1.80      raeburn  1544:                    choicewrite(' selected="selected"');
                   1545:                }
                   1546:                choicewrite('>'+deeplinkscopetxt[i]+'</option>');
                   1547:            }
                   1548:            choicewrite('</select></td></tr>');
1.86      raeburn  1549:            choicewrite('<tr><td>Link protection</td><td>');
1.80      raeburn  1550:            choicewrite('<span style="white-space: nowrap;"><label>');
1.86      raeburn  1551:            choicewrite('<input name="deeplinkprotect" value="none"'+
                   1552:                   ' type="radio" '+calldeeplink('protect'));
                   1553:            if (deeplinkvals[4]=='none') { choicewrite(' checked="checked"'); }
                   1554:            choicewrite(' /> not in use</label>');
                   1555:            choicewrite('<input name="deeplinkprotect" value="key"'+
                   1556:                   ' type="radio" '+calldeeplink('protect'));
                   1557:            if (deeplinkvals[4]=='key') { choicewrite(' checked="checked"'); }
                   1558:            choicewrite(' /> key access</label>');
1.84      raeburn  1559:            choicewrite('<input type="'+dlinkkeysty+'" name="deeplinkkey" id="deeplinkkey" value="'+dlinkkeyval+'" size="10" />');
1.80      raeburn  1560:            choicewrite('</span><br />');
1.84      raeburn  1561: 
                   1562:            var possmenus = new Array();
1.88      raeburn  1563:            if ((pextra != '') && (typeof(pextra) != 'undefined')) {
1.86      raeburn  1564:                var lticRegExp = /^ltic_/;
                   1565:                var ltidRegExp = /^ltid_/;
1.84      raeburn  1566:                var menusRegExp = /^menus_/;
                   1567:                var extras = pextra.split('&');
                   1568:                for (var i=0; i<extras.length; i++) {
1.86      raeburn  1569:                    if (lticRegExp.test(extras[i])) {
                   1570:                        extras[i] = extras[i].replace(lticRegExp,'');
                   1571:                        var possltic = extras[i].split(',');
                   1572:                        if (possltic.length >= 1) {
                   1573:                            var lticnums = new Array();
                   1574:                            var ltictitles = new Array();
                   1575:                            for (var j=0; j<possltic.length; j++) {
                   1576:                                var entries = possltic[j].split(':');
                   1577:                                lticnums[j] = entries[0];
                   1578:                                ltictitles[j] = decodeURIComponent(entries[1]);
1.80      raeburn  1579:                            }
1.86      raeburn  1580:                            if (lticnums.length) {
1.84      raeburn  1581:                                choicewrite('<span style="white-space: nowrap;"><label>');
1.86      raeburn  1582:                                choicewrite('<input name="deeplinkprotect" value="ltic"'+
                   1583:                                            ' type="radio" '+calldeeplink('protect'));
                   1584:                                if (deeplinkvals[4]=='ltic') { choicewrite(' checked="checked"'); }
                   1585:                                choicewrite(' /> course LTI launch</label>');
                   1586:                                choicewrite('<div id="deeplinklticdiv" style="display:'+dlinklticdivsty+'">');
                   1587:                                choicewrite('<select name="linkpossltic">');
1.84      raeburn  1588:                                var sel='';
1.86      raeburn  1589:                                if (deeplinkvals[4]!='ltic') {
1.84      raeburn  1590:                                    sel = ' selected="selected"';
                   1591:                                }
1.86      raeburn  1592:                                if (lticnums.length > 1) {
1.84      raeburn  1593:                                    choicewrite('<option value=""'+sel+'>Select</option>');
                   1594:                                }
1.86      raeburn  1595:                                for (var j=0; j<lticnums.length; j++) {
1.84      raeburn  1596:                                    sel = '';
1.86      raeburn  1597:                                    if (deeplinkvals[4]=='ltic') {
                   1598:                                        if (linkprotectparts.length) {
                   1599:                                            if (lticnums[j] == linkprotectparts[1]) {
1.84      raeburn  1600:                                                sel = ' selected="selected"';
                   1601:                                            }
1.80      raeburn  1602:                                        }
                   1603:                                    }
1.86      raeburn  1604:                                    choicewrite('<option value="'+lticnums[j]+'"'+sel+'>'+ltictitles[j]+'</option>');
1.80      raeburn  1605:                                }
1.84      raeburn  1606:                                choicewrite('</select></div></span><br />');
1.80      raeburn  1607:                            }
                   1608:                        }
1.86      raeburn  1609:                    } else if (ltidRegExp.test(extras[i])) {
                   1610:                        extras[i] = extras[i].replace(ltidRegExp,'');
                   1611:                        var possltid = extras[i].split(',');
                   1612:                        if (possltid.length >= 1) {
                   1613:                            var ltidnums = new Array();
                   1614:                            var ltidtitles = new Array();
                   1615:                            for (var j=0; j<possltid.length; j++) {
                   1616:                                var entries = possltid[j].split(':');
                   1617:                                ltidnums[j] = entries[0];
                   1618:                                ltidtitles[j] = decodeURIComponent(entries[1]);
                   1619:                            }
                   1620:                            if (ltidnums.length) {
                   1621:                                choicewrite('<span style="white-space: nowrap;"><label>');
                   1622:                                choicewrite('<input name="deeplinkprotect" value="ltid"'+
                   1623:                                            ' type="radio" '+calldeeplink('protect'));
                   1624:                                if (deeplinkvals[4]=='ltid') { choicewrite(' checked="checked"'); }
                   1625:                                choicewrite(' />domain LTI launch</label>');
                   1626:                                choicewrite('<div id="deeplinkltiddiv" style="display:'+dlinkltiddivsty+'">');
                   1627:                                choicewrite('<select name="linkpossltid">');
                   1628:                                var sel='';
                   1629:                                if (deeplinkvals[4]!='ltid') {
                   1630:                                    sel = ' selected="selected"';
                   1631:                                }
                   1632:                                if (ltidnums.length > 1) {
                   1633:                                    choicewrite('<option value=""'+sel+'>Select</option>');
                   1634:                                }
                   1635:                                for (var j=0; j<ltidnums.length; j++) {
                   1636:                                    sel = '';
                   1637:                                    if (deeplinkvals[4]=='ltid') {
                   1638:                                        if (linkprotectparts.length) {
                   1639:                                            if (ltidnums[j] == linkprotectparts[1]) {
                   1640:                                                sel = ' selected="selected"';
                   1641:                                            }
                   1642:                                        }
                   1643:                                    }
                   1644:                                    choicewrite('<option value="'+ltidnums[j]+'"'+sel+'>'+ltidtitles[j]+'</option>');
                   1645:                                }
                   1646:                                choicewrite('</select></div></span><br />');
                   1647:                            }
                   1648:                        }
                   1649: 
1.84      raeburn  1650:                    } else if (menusRegExp.test(extras[i])) {
                   1651:                        extras[i] = extras[i].replace(menusRegExp,'');
                   1652:                        possmenus = extras[i].split(',');
1.80      raeburn  1653:                    }
                   1654:                }
                   1655:            }
1.84      raeburn  1656:            choicewrite('<tr><td>Menu Items Displayed</td><td>');
                   1657:            choicewrite('<span style="white-space: nowrap;"><label>');
                   1658:            choicewrite('<input name="deeplinkmenus" value="std"'+
                   1659:                        ' type="radio" '+calldeeplink('menus'));
1.86      raeburn  1660:            if (deeplinkvals[5] == 0) {
1.84      raeburn  1661:                choicewrite(' checked="checked"');
                   1662:            }
                   1663:            choicewrite(' /> Standard (all menus)</label></span><br />');
                   1664:            if (possmenus.length >= 1) {  
                   1665:                choicewrite('<span style="white-space: nowrap;"><label>');
                   1666:                choicewrite('<input name="deeplinkmenus" value="collnum"'+
                   1667:                            ' type="radio" '+calldeeplink('menus'));
1.86      raeburn  1668:                if (deeplinkvals[5] > 0) { choicewrite(' checked="checked"'); }
1.84      raeburn  1669:                choicewrite(' /> Numbered collection</label>');
                   1670:                choicewrite('<div id="deeplinkmenusdiv" style="display:'+dlinkmenusdivsty+'">');
                   1671:                choicewrite('<select name="linkpossmenu">');
                   1672:                var sel='';
1.86      raeburn  1673:                if (deeplinkvals[5] == 0) {
1.84      raeburn  1674:                    sel = ' selected="selected"';
                   1675:                }
                   1676:                if (possmenus.length > 1) {
                   1677:                    choicewrite('<option value=""'+sel+'>Select</option>');
                   1678:                }
                   1679:                for (var i=0; i<possmenus.length; i++) {
                   1680:                    sel = '';
1.86      raeburn  1681:                    if (deeplinkvals[5] == possmenus[i]) {
1.84      raeburn  1682:                        sel = ' selected="selected"';
                   1683:                    }
                   1684:                    choicewrite('<option value="'+possmenus[i]+'"'+sel+'>'+possmenus[i]+'</option>');
                   1685:                }
                   1686:                choicewrite('</select></div></span><br />');
                   1687:            }
1.87      raeburn  1688:            choicewrite('</td></tr>');
                   1689:            choicewrite('<tr><td>Embedded?</td><td>');
                   1690:            choicewrite('<select name="deeplinktarget">');
                   1691:            for (var i=0; i<deeplinktarget.length; i++) {
                   1692:                choicewrite('<option value="'+deeplinktarget[i]+'"');
                   1693:                if (deeplinkvals[6] == deeplinktarget[i]) {
                   1694:                    choicewrite(' selected="selected"');
                   1695:                }
                   1696:                choicewrite('>'+deeplinktargettxt[i]+'</option>');
                   1697:            }
                   1698:            choicewrite('</select>');
1.90      raeburn  1699:            choicewrite('</td></tr>');
                   1700:            choicewrite('<tr><td>Exit Button?</td><td>');
                   1701:            choicewrite('<span style="white-space: nowrap;"><label>');
                   1702:            choicewrite('<input name="deeplinkexit" value="no"'+
                   1703:                   ' type="radio" '+calldeeplink('exit'));
                   1704:            if (deeplinkvals[7]=='no') { choicewrite(' checked="checked"'); }
                   1705:            choicewrite(' />not in use</label></span><br />');
                   1706:            choicewrite('<span style="white-space: nowrap;"><label>');
                   1707:            choicewrite('<input name="deeplinkexit" value="yes"'+
                   1708:                   ' type="radio" '+calldeeplink('exit'));
                   1709:            if (deeplinkvals[7]=='yes') { choicewrite(' checked="checked"'); }
                   1710:            choicewrite(' />in use, no redirect</label></span> ');
                   1711:            choicewrite('<span style="white-space: nowrap;"><label>');
                   1712:            choicewrite('<input name="deeplinkexit" value="url"'+
                   1713:                   ' type="radio" '+calldeeplink('exit'));
                   1714:            if (deeplinkvals[7]=='url') { choicewrite(' checked="checked"'); }
                   1715:            choicewrite(' />in use, redirect to URL</label></span><br />');
                   1716:            choicewrite('<div id="deeplinkexitdiv" style="display:'+dlinkexitdivsty+'">');
                   1717:            choicewrite('<br /><span style="white-space: nowrap;">Button text:&nbsp;');
                   1718:            choicewrite('<input type="text" name="deeplinkexittext" id="deeplinkexittext" value="'+dlinkexittextval+'" size="10" />');
                   1719:            choicewrite('</span></div>');
1.78      raeburn  1720:            choicewrite('</td></tr></table>');
1.80      raeburn  1721:        }
1.96      raeburn  1722:        if (pscat=='grace') {
                   1723:            tablestart('Grace period after due date');
                   1724:            choicewrite('<tr><td colspan="3" valign="top">'+
                   1725:                        '<div id="LC_string_grace_wrap">'+
                   1726:                        '<div id="LC_string_grace_inner">');
                   1727:            if ((svalue != '') && (typeof(svalue) != 'undefined')) {
                   1728:                var patternComma = /,/;
                   1729:                var patternGrace = /^\d+:(0|1).?\d*:(0|1)$/;
                   1730:                var current = new Array;
                   1731:                if (patternComma.test(svalue)) {
                   1732:                    current = svalue.split(',');
                   1733:                } else {
                   1734:                    current = [svalue];
                   1735:                } 
                   1736:                for (var i=0; i<current.length; i++) {
                   1737:                    if (patternGrace.test(current[i])) {
                   1738:                        choicewrite('<div>');
                   1739:                        choicewrite(graceitem(current[i]));
                   1740:                        choicewrite('</div>');
                   1741:                    }
                   1742:                }
                   1743:            } else {
                   1744:                choicewrite('<div>');
                   1745:                choicewrite(graceitem());
                   1746:                choicewrite('</div>');
                   1747:            }
                   1748:            choicewrite('</div><button onclick="parent.addGrace();return false;">Add another?</button>');
                   1749:            choicewrite('</div></td></tr></table>');
                   1750:        }
1.21      www      1751:    }
1.79      raeburn  1752: 
1.21      www      1753:    if (ptype=='color') {
                   1754:       tablestart('Choose a Color');
                   1755:       choicewrite('<table>');
                   1756:       if (svalue) {
1.23      www      1757:          choicewrite('<tr><td colspan="9">Current choice:</td><td bgcolor="'+
1.46      albertel 1758:                      escapeHTML(svalue)+'" colspan="2">&nbsp;</td></tr>');
1.21      www      1759:       }
1.23      www      1760:       for (var ir=0; ir<=10; ir++) {
                   1761:           for (var ig=0; ig<=10; ig++) {
1.21      www      1762:               choicewrite('<tr>');
1.23      www      1763:               for (var ib=0; ib<=10; ib++) {
1.21      www      1764:                   colorfield(ir,ig,ib);
                   1765: 	      }
                   1766:               choicewrite('</tr>');
1.79      raeburn  1767: 	  }
1.21      www      1768:       }
                   1769:       choicewrite('</table></td></table>');
1.1       www      1770:    }
                   1771: 
1.40      albertel 1772:    choicewrite('</form>');
1.1       www      1773:    choiceend();
                   1774: }
                   1775: 
                   1776: function sopt(va,text) {
                   1777:    selwrite('<option value="'+va+'"');
1.2       www      1778:    if (va==pscat) {
1.54      bisitz   1779:      selwrite(' selected="selected"');
1.1       www      1780:    }
                   1781:    selwrite('>'+text+'</option>');
                   1782: }
                   1783: 
                   1784: function catchange() {
                   1785:    var sform=selector.document.forms.fsel.fcat;
1.2       www      1786:    pscat=sform.options[sform.selectedIndex].value;
1.1       www      1787:    draw();
                   1788: }
                   1789: 
1.76      raeburn  1790: function recursechange() {
                   1791:    var rform=selector.document.forms.frec;
                   1792:    var count = rform.recurse.length;
                   1793:    if (count > 0) {
                   1794:        for (var i=0; i<count; i++) {
                   1795:            if (rform.recurse[i].checked) {
                   1796:                var colnum = pnonreccol;
                   1797:                if (rform.recurse[i].value == 1) {
                   1798:                    colnum++;
                   1799:                }
1.79      raeburn  1800:                pmarker = pmarkerst+'_'+pparm+'&'+colnum;
1.76      raeburn  1801:            }
                   1802:        }
                   1803:    }
                   1804: }
                   1805: 
1.1       www      1806: function assemble() {
1.2       www      1807:     if ((ptype=='date') && (pscat!='interval')) {
1.41      www      1808:         svalue=Math.floor(cdate.getTime()/1000);
1.2       www      1809:     }
1.12      www      1810:     if (ptype=='tolerance') {
                   1811:        if (pscat=='relative_sym') {
                   1812:           svalue=choices.document.forms.sch.val2.value+'%';
                   1813:           if (choices.document.forms.sch.val3.checked) {
                   1814:              svalue+='+';
                   1815:           }
                   1816:        }
                   1817:        if (pscat=='absolute_sym') {
                   1818:           svalue=choices.document.forms.sch.val2.value;
                   1819:           if (choices.document.forms.sch.val3.checked) {
                   1820:              svalue+='+';
                   1821:           }
                   1822:        }
                   1823:        if (pscat=='absolute') {
                   1824:           svalue=choices.document.forms.sch.val2.value;
                   1825:           if (choices.document.forms.sch.val3.checked) {
                   1826:              svalue+='+';
                   1827:           }
                   1828:           svalue+=','+choices.document.forms.sch.val4.value;
                   1829:           if (choices.document.forms.sch.val5.checked) {
                   1830:              svalue+='+';
                   1831:           }
                   1832:        }
                   1833:        if (pscat=='relative') {
                   1834:           svalue=choices.document.forms.sch.val2.value+'%';
                   1835:           if (choices.document.forms.sch.val3.checked) {
                   1836:              svalue+='+';
                   1837:           }
                   1838:           svalue+=','+choices.document.forms.sch.val4.value+'%';
                   1839:           if (choices.document.forms.sch.val5.checked) {
                   1840:              svalue+='+';
                   1841:           }
                   1842:        }
1.14      www      1843:     }
                   1844:     if ((ptype=='int') && (pscat=='range')) {
                   1845:           svalue=choices.document.forms.sch.val2.value+','+
                   1846:                  choices.document.forms.sch.val4.value;
1.12      www      1847:     }
1.6       www      1848:     if (pscat=='default') { svalue=''; }
1.2       www      1849:     stype=ptype+'_'+pscat;
1.1       www      1850: }
                   1851: 
                   1852: 
                   1853: function init() {
                   1854:   var i;
1.2       www      1855:   var subs=new Array();
1.71      raeburn  1856:   var doneRegExp = /_done(|\:[^\:]+\:)/;
                   1857:   var doneproctorRegExp = /_done(|\:[^\:]+\:)_proctor/;
1.70      raeburn  1858:   var proctorkeyRegExp = /^(\d+)_(.+)$/;
1.71      raeburn  1859:   var donetextRegExp = /\:([^\:]+)\:/;
1.79      raeburn  1860:   var markerRegExp = /^(.+)_([A-Za-z0-9]+)\&(\d+)$/;
1.1       www      1861:   var namevalue=this.window.location.search.split('&');
                   1862:   namevalue[0]=namevalue[0].substr(1,namevalue[0].length-1);
                   1863: 
                   1864:   for (i=0;i<namevalue.length;i++) {
                   1865:      var pair=namevalue[i].split('=');
1.3       www      1866:      pair[1]=unescape(pair[1]);
1.1       www      1867:      if (pair[0]=='value') { pvalue=pair[1]; }
1.2       www      1868:      if (pair[0]=='type') { subs=pair[1].split('_');
                   1869:                             ptype=subs[0];
                   1870:                             pscat=subs[1];
1.79      raeburn  1871:                             if (typeof(subs[2])!="undefined") {
                   1872:                                pscat+='_'+subs[2];
1.11      www      1873:                             }
1.79      raeburn  1874:                             if ((pscat=='') || (typeof(pscat)=="undefined")) {
1.6       www      1875:                                pscat='default';
                   1876:                             }
1.2       www      1877:                            }
1.1       www      1878:      if (pair[0]=='return') { preturn=pair[1]; }
                   1879:      if (pair[0]=='call') { pcode=pair[1]; }
1.2       www      1880:      if (pair[0]=='marker') { pmarker=pair[1]; }
1.1       www      1881:      if (pair[0]=='name') { pname=pair[1]; }
1.63      www      1882:      if (pair[0]=='modal') { pmodal=pair[1]; }
1.34      albertel 1883:      if (pair[0]=='defhour' && pair[1] >= 0 && pair[1] < 24 ) {
                   1884:          defhour=pair[1];
                   1885:      }
                   1886:      if (pair[0]=='defmin' && pair[1] >= 0 && pair[1] < 60) { defmin=pair[1]; }
                   1887:      if (pair[0]=='defsec' && pair[1] >= 0 && pair[1] < 60) { defsec=pair[1]; }
1.80      raeburn  1888:      if (pair[0]=='extra') { pextra=pair[1]; }
1.1       www      1889:   }
                   1890: 
1.79      raeburn  1891:   var tablecol = '';
1.76      raeburn  1892:   var ismap = '';
                   1893:   if (markerRegExp.test(pmarker)) {
                   1894:       var markerinfo = pmarker.match(markerRegExp);
                   1895:       if (markerinfo.length == 4) {
                   1896:           pmarkerst = markerinfo[1];
                   1897:           pparm = markerinfo[2];
1.79      raeburn  1898:           tablecol = markerinfo[3];
1.76      raeburn  1899:           if (tablecol == 17 || tablecol == 16) {
                   1900:               ismap = 1;
                   1901:               if (tablecol == 17) {
                   1902:                   precursive = 1;
                   1903:               }
                   1904:               pnonreccol = 16;
1.79      raeburn  1905:           } else if (tablecol == 11 || tablecol == 10) {
1.76      raeburn  1906:               ismap = 1;
                   1907:               if (tablecol == 11) {
                   1908:                   precursive = 1;
                   1909:               }
                   1910:               pnonreccol = 10;
                   1911:           } else if (tablecol == 7 || tablecol == 6) {
                   1912:               ismap = 1;
                   1913:               if (tablecol == 7) {
                   1914:                   precursive = 1;
                   1915:               }
                   1916:               pnonreccol = 6;
                   1917:           } else if (tablecol == 3 || tablecol == 2) {
                   1918:               ismap = 1;
                   1919:               if (tablecol == 3) {
                   1920:                   precursive = 1;
                   1921:               }
                   1922:               pnonreccol = 2;
                   1923:           }
                   1924:       }
                   1925:   }
1.85      raeburn  1926:   psmap = ismap;
1.76      raeburn  1927: 
                   1928: 
1.68      raeburn  1929:   if (ptype=='date' && pscat == 'interval') {
1.70      raeburn  1930:       if (doneproctorRegExp.test(pvalue)) {
1.71      raeburn  1931:           var current = pvalue.match(doneproctorRegExp);
                   1932:           if (current.length == 2) {
                   1933:               var textstr = current[1];
                   1934:               if (textstr != '') {
                   1935:                   var textvals = textstr.match(donetextRegExp);
                   1936:                   if (textvals.length == 2) {
                   1937:                       pextravaltwo = textvals[1];
                   1938:                   }
                   1939:               }
                   1940:           }
1.70      raeburn  1941:           var intervalwithkey = pvalue.replace(doneproctorRegExp,'');
                   1942:           if (proctorkeyRegExp.test(intervalwithkey)) {
                   1943:               var currvals = intervalwithkey.match(proctorkeyRegExp);
                   1944:               if (currvals.length == 3) {
                   1945:                   pvalue = currvals[1];
                   1946:                   pextraval = currvals[2];
1.71      raeburn  1947:                   pmodval = '_done_proctor';
1.70      raeburn  1948:               } else {
                   1949:                   pmodval = '';
                   1950:               }
                   1951:           }
                   1952:       } else {
                   1953:           if (doneRegExp.test(pvalue)) {
1.79      raeburn  1954:               var current = pvalue.match(doneRegExp);
1.71      raeburn  1955:               if (current.length == 2) {
                   1956:                   var textstr = current[1];
                   1957:                   if (textstr != '') {
                   1958:                       var textvals = textstr.match(donetextRegExp);
                   1959:                       if (textvals.length == 2) {
                   1960:                           pextravaltwo = textvals[1];
                   1961:                       }
                   1962:                   }
                   1963:               }
1.70      raeburn  1964:               var pnumval = pvalue.replace(doneRegExp,'');
1.71      raeburn  1965:               pmodval = '_done';
1.70      raeburn  1966:               pvalue = pnumval;
                   1967:           }
1.68      raeburn  1968:       }
                   1969:   }
1.1       www      1970:   svalue=pvalue;
1.6       www      1971:   if (((ptype=='float') || (ptype=='string') || (ptype=='int')) &&
1.79      raeburn  1972:       (pscat=='default') &&
                   1973:       (typeof(svalue)!="undefined") &&
1.11      www      1974:       (svalue!=0) && (svalue!='')) { pscat='any'; }
1.1       www      1975: 
1.13      www      1976:   if (ptype=='tolerance') {
                   1977:      var tperc=0;
                   1978:      var trange=0;
                   1979:      if (typeof(svalue)!='undefined') {
                   1980:         if (svalue.indexOf('%')!=-1) { tperc=1;  }
                   1981:         if (svalue.indexOf(',')!=-1) { trange=1; }
                   1982:         if (trange) {
                   1983:            if (tperc) { pscat='relative'; } else { pscat='absolute'; }
                   1984:         } else {
                   1985:            if (tperc) { pscat='relative_sym'; } else { pscat='absolute_sym'; }
                   1986:         }
                   1987:      }
                   1988:   }
                   1989: 
1.61      raeburn  1990:   this.window.selector.document.open();
1.62      raeburn  1991:   selwrite('<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">');
                   1992:   selwrite('<html xmlns="http://www.w3.org/1999/xhtml">');
1.55      bisitz   1993:   selwrite('<head>');
1.62      raeburn  1994:   selwrite('<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />');
                   1995:   selwrite('<title>LON-CAPA</title>');
1.55      bisitz   1996:   selwrite('<style type="text/css">');
                   1997:   selwrite('<!--');
                   1998:   selwrite('body {');
                   1999:   selwrite('font-family: Verdana,Arial,Helvetica,sans-serif;');
                   2000:   selwrite('line-height:130%;');
                   2001:   selwrite('font-size:0.83em;');
                   2002:   selwrite('background: #FFFFFF;');
                   2003:   selwrite('}');
                   2004:   selwrite('-->');
                   2005:   selwrite('</style>');
                   2006:   selwrite('</head>');
1.62      raeburn  2007:   selwrite('<body>');
                   2008:   selwrite('<form name="fsel" action=""><b>'+pname+'</b><br />');
1.66      bisitz   2009:   selwrite('Format of Value(s): <select name="fcat" onchange="parent.catchange();">');
1.12      www      2010: 
1.1       www      2011:   if (ptype=='tolerance') {
                   2012:      sopt('default','Default');
                   2013:      sopt('relative_sym','Relative Tolerance, Symmetric (percent)');
                   2014:      sopt('relative','Relative Tolerance (percentages)');
                   2015:      sopt('absolute_sym','Absolute Tolerance, Symmetric (value)');
                   2016:      sopt('absolute','Absolute Tolerance (values)');
                   2017:   }
                   2018: 
                   2019:   if (ptype=='date') {
1.48      albertel 2020:      if (pscat != 'interval') {
                   2021:          sopt('default','Default');
                   2022: 	 sopt('start','Starting Date');
                   2023: 	 sopt('end','Ending Date');
                   2024:      } else {
                   2025:          sopt('interval','Time Interval');
                   2026:      }
                   2027: 
1.11      www      2028:      if ((pvalue!='') && (typeof(pvalue)!="undefined")) {
1.2       www      2029:         cdate.setTime(pvalue*1000);
1.30      www      2030:      } else {        
1.31      www      2031:         cdate.setSeconds(defsec);
                   2032:         cdate.setMinutes(defmin);
                   2033:         cdate.setHours(defhour);
1.2       www      2034:      }
                   2035:  
                   2036:      months[0]='January';
                   2037:      months[1]='February';
                   2038:      months[2]='March';
                   2039:      months[3]='April';
                   2040:      months[4]='May';
                   2041:      months[5]='June';
                   2042:      months[6]='July';
                   2043:      months[7]='August';
                   2044:      months[8]='September';
                   2045:      months[9]='October';
                   2046:      months[10]='November';
                   2047:      months[11]='December';
1.1       www      2048:   }
1.79      raeburn  2049: 
1.6       www      2050:   if (ptype=='int') {
                   2051:      sopt('default','Default');
                   2052:      sopt('pos','Positive Integer, Not Zero');
                   2053:      sopt('zeropos','Positive Integer or Zero');
1.13      www      2054:      sopt('inrange','Integer in Range');
                   2055:      sopt('range','Range of Integers');
1.6       www      2056:      sopt('any','Integer');
1.1       www      2057:   }
                   2058: 
1.6       www      2059:   if (ptype=='float') {
                   2060:      sopt('default','Default');
                   2061:      sopt('zeroone','Floating Point between 0 and 1');
                   2062:      sopt('pos','Positive Floating Point');
                   2063:      sopt('any','Floating Point');
1.1       www      2064: 
                   2065:   }
                   2066: 
1.6       www      2067:   if (ptype=='string') {
1.44      albertel 2068:      //sopt('default','Default');
                   2069:      if (pscat == 'yesno')        { sopt('yesno','Yes/No'); }
1.47      albertel 2070:      else if (pscat == 'problemstatus'){ sopt('problemstatus','Problem Status'); }
1.45      albertel 2071:      else if (pscat == 'examtype')     { sopt('examtype','Exam Type'); }
                   2072:      else if (pscat == 'questiontype') { sopt('questiontype','Question Type'); }
1.60      raeburn  2073:      else if (pscat == 'lenient')      { sopt('lenient','Lenient Grading (Partial Credit)'); }
1.64      raeburn  2074:      else if (pscat == 'discussvote')  { sopt('discussvote','Discussion Voting'); }
1.45      albertel 2075:      else if (pscat == 'ip')           { sopt('ip','IP Number/Name'); }
                   2076:      else if (pscat == 'fileext')      { sopt('fileext','File Extension'); }
                   2077:      else if (pscat == 'useslots')     { sopt('useslots','Slots control access'); }
1.78      raeburn  2078:      else if (pscat == 'deeplink')     { sopt('deeplink','Deep-linked items'); }
1.92      raeburn  2079:      else if (pscat == 'tex')          { sopt('texdisplay','TeX File Display'); }
1.96      raeburn  2080:      else if (pscat == 'grace')        { sopt('grace','Grace period'); }
1.45      albertel 2081:      else { pscat = 'any'; }
1.80      raeburn  2082:      if (pscat != 'deeplink') { sopt('any','String Value'); }
1.22      www      2083:   }
                   2084: 
                   2085:   if (ptype=='color') {
                   2086:      sopt('default','Use Default Color');
                   2087:      sopt('custom','Use Custom Color');
1.1       www      2088:   }
                   2089: 
                   2090:   selwrite('</select></form>');
1.77      raeburn  2091:   if (ismap == 1) {
1.76      raeburn  2092:       if ((pparm != 'hiddenresource') && (pparm != 'encrypturl')) {
                   2093:           selwrite('<form name="frec" action="">');
                   2094:           selwrite('Recursive: <label><input type="radio" name="recurse" value="1" ');
                   2095:           if (precursive == 1) {
                   2096:               selwrite('checked="checked" ');
                   2097:           }
                   2098:           selwrite('onclick="parent.recursechange();" />Yes</label>&nbsp;&nbsp;');
                   2099:           selwrite('<label><input type="radio" name="recurse" value="0" ');
                   2100:           if (precursive != 1) {
                   2101:               selwrite('checked="checked" ');
                   2102:           }
1.83      raeburn  2103:           selwrite('onclick="parent.recursechange();" />No</label>');
1.76      raeburn  2104:           selwrite('</form><br />');
                   2105:       }
                   2106:   }
1.63      www      2107:   var targ='parent.opener';
                   2108:   if (pmodal==1) {
                   2109:      targ='parent.parent';
1.70      raeburn  2110:   }
                   2111:   if ((ptype=='date') && (pscat=='interval')) {
                   2112:       selwrite('<a href="javascript:parent.validateInterval();');
1.80      raeburn  2113:   } else if ((ptype=='string') && (pscat=='deeplink')) {
                   2114:       selwrite('<a href="javascript:parent.validateDeepLink();');
1.70      raeburn  2115:   } else {
                   2116:       selwrite('<a href="javascript:parent.assemble();');
                   2117:   }
1.1       www      2118:   if (preturn!='') {
1.63      www      2119:      selwrite(targ+'.document.'+preturn+'_value.value=parent.window.svalue;');
                   2120:      selwrite(targ+'.document.'+preturn+'_type.value=parent.window.stype;');
1.2       www      2121:   }
                   2122:   if (pmarker!='') {
1.63      www      2123:      selwrite(targ+'.document.'+preturn+'_marker.value=parent.window.pmarker;');
1.1       www      2124:   }
                   2125:   if (pcode!='') {
1.63      www      2126:      selwrite(targ+'.'+pcode+'();');
1.1       www      2127:   }
1.43      albertel 2128:   selwrite('">Save</a>&nbsp;&nbsp;');
1.5       www      2129: 
                   2130:   selwrite('<a href="javascript:');
1.63      www      2131:   selwrite(targ+'.document.'+preturn+'_value.value='+"'';");
1.5       www      2132:   if (pmarker!='') {
                   2133:      selwrite(
1.63      www      2134:      targ+'.document.'+preturn+'_marker.value=parent.window.pmarker;');
1.5       www      2135:   }
                   2136:   if (pcode!='') {
1.63      www      2137:      selwrite(targ+'.'+pcode+'();');
1.5       www      2138:   }
                   2139:   selwrite('">Delete</a>&nbsp;&nbsp;');
1.4       www      2140:  
1.1       www      2141:   selwrite('</body></html>');
                   2142:   this.window.selector.document.close();
1.84      raeburn  2143:   if (pscat == 'deeplink') {
1.85      raeburn  2144:       if (psmap==1) {
                   2145:           document.getElementById("LCparampopup").rows="100,*";
                   2146:       } else {  
                   2147:           document.getElementById("LCparampopup").rows="60,*";
                   2148:       }
1.84      raeburn  2149:   }
1.96      raeburn  2150:   if (pscat == 'grace')  {
                   2151:       if (psmap==1) {
                   2152:           document.getElementById("LCparampopup").rows="105,*";
                   2153:       } else {
                   2154:           document.getElementById("LCparampopup").rows="65,*";
                   2155:       }
                   2156:   }
1.2       www      2157:   draw();
1.83      raeburn  2158:  
1.1       www      2159: }
                   2160: 
1.56      raeburn  2161: // ]]>
1.1       www      2162: </script>
1.56      raeburn  2163: </head>
1.1       www      2164: 
1.84      raeburn  2165: <frameset id="LCparampopup" rows="125,*" onload="init();">
1.56      raeburn  2166: <frame name="selector" src="empty.html" />
                   2167: <frame name="choices" src="empty.html" />
1.1       www      2168: </frameset>
                   2169: 
                   2170: 
                   2171: 
1.16      albertel 2172: </html>

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