--- rat/client/parameter.html	2013/01/28 18:17:21	1.65
+++ rat/client/parameter.html	2015/09/13 21:48:37	1.68
@@ -5,7 +5,7 @@
 The LearningOnline Network with CAPA
 Parameter Input Window
 //
-// $Id: parameter.html,v 1.65 2013/01/28 18:17:21 bisitz Exp $
+// $Id: parameter.html,v 1.68 2015/09/13 21:48:37 raeburn Exp $
 //
 // Copyright Michigan State University Board of Trustees
 //
@@ -39,6 +39,7 @@ Parameter Input Window
 
 var ptype='';
 var pvalue='';
+var pmodval='';
 var preturn='';
 var pcode='';
 var pscat='';
@@ -301,7 +302,25 @@ function intcalc() {
              sform.hours.options[sform.hours.selectedIndex].value*1)*60+
              sform.minutes.options[sform.minutes.selectedIndex].value*1)*60+
              sform.seconds.options[sform.seconds.selectedIndex].value*1;
-    draw();
+    if ((ptype=='date') && (pscat=='interval')) {
+        var newpmodval = '';
+        if (sform.donebutton.length) {
+            for (var i=0; i<sform.donebutton.length; i++) {
+                if (sform.donebutton[i].checked) {
+                    if (sform.donebutton[i].value == '_done') {
+                        newpmodval = sform.donebutton[i].value;
+                    }
+                }
+            }
+        }
+        pmodval = newpmodval;
+        draw();
+        if (pmodval) {
+            svalue += pmodval;
+        }
+    } else {
+        draw();
+    }
 }
 
 function integereval() {
@@ -342,11 +361,13 @@ function radiostringeval(newval) {
 }
 
 function callradiostringeval(newval) {
-   return 'onchange="parent.radiostringeval(\''
-          +newval+'\')" onclick="parent.radiostringeval(\''
-          +newval+'\')"';
+    return 'onclick="parent.radiostringeval(\''+newval+'\')"';
 }
 
+function callintervalpmodval() {
+    return 'onclick="parent.intcalc()"';
+} 
+
 function intervaldis() {
     csecs=svalue;
     cdays=Math.floor(csecs/86400);
@@ -480,8 +501,20 @@ function draw() {
          intday();choicewrite('days ');
          inthour();choicewrite('hours ');
          intminute(); choicewrite('mins '); intsecond();
-         choicewrite('secs</td></tr></table>');         
-      } else { 
+         choicewrite('secs</td></tr></table>');
+         choicewrite('<br />');
+         tablestart('Provide a "Done" button to students?');
+         choicewrite('<tr><td>Value:</td><td colspan="2">');
+         choicewrite('<label><input name="donebutton" value="_done"'+
+                     ' type="radio" '+callintervalpmodval());
+         if (pmodval =='_done') { choicewrite(' checked="checked"'); }
+         choicewrite(' /> Yes</label><br />');
+         choicewrite('<label><input name="donebutton" value=""'+
+                     ' type="radio" '+callintervalpmodval());
+         if (pmodval != '_done') { choicewrite(' checked="checked"'); }
+         choicewrite(' /> No</label><br />');
+         choicewrite('</td></tr></table>');
+      } else {
          choicewrite('<tr><td colspan="3">'
          +cdate.toString()+
          '</td></tr><tr><td>Date:</td><td colspan="2">');
@@ -832,6 +865,7 @@ function assemble() {
 function init() {
   var i;
   var subs=new Array();
+  var doneRegExp = /_done/;
   var namevalue=this.window.location.search.split('&');
   namevalue[0]=namevalue[0].substr(1,namevalue[0].length-1);
 
@@ -861,6 +895,13 @@ function init() {
      if (pair[0]=='defsec' && pair[1] >= 0 && pair[1] < 60) { defsec=pair[1]; }
   }
 
+  if (ptype=='date' && pscat == 'interval') {
+      if (doneRegExp.test(pvalue)) {
+          var pnumval = pvalue.replace(doneRegExp,'');
+          pmodval = pvalue.match(doneRegExp);
+          pvalue = pnumval;
+      }
+  }
   svalue=pvalue;
   if (((ptype=='float') || (ptype=='string') || (ptype=='int')) &&
       (pscat=='default') && 
@@ -900,7 +941,7 @@ function init() {
   selwrite('</head>');
   selwrite('<body>');
   selwrite('<form name="fsel" action=""><b>'+pname+'</b><br />');
-  selwrite('<select name="fcat" onchange="parent.catchange();">');
+  selwrite('Format of Value(s): <select name="fcat" onchange="parent.catchange();">');
 
   if (ptype=='tolerance') {
      sopt('default','Default');
