[Aimmath-commit] AIM/WEB-INF/maple/aim Quiz.mpl,1.8.2.3,1.8.2.4 SOAP.mpl,1.1.2.3,1.1.2.4

[Neil S. <nps...@us...>]

Update of /cvsroot/aimmath/AIM/WEB-INF/maple/aim
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv6326/maple/aim

Modified Files:
      Tag: aim-xml
	Quiz.mpl SOAP.mpl 
Log Message:


Index: Quiz.mpl
===================================================================
RCS file: /cvsroot/aimmath/AIM/WEB-INF/maple/aim/Quiz.mpl,v
retrieving revision 1.8.2.3
retrieving revision 1.8.2.4
diff -C2 -d -r1.8.2.3 -r1.8.2.4
*** Quiz.mpl	22 Apr 2005 07:15:43 -0000	1.8.2.3
--- Quiz.mpl	25 Apr 2005 22:36:46 -0000	1.8.2.4
***************
*** 1621,1625 ****
       [["inputhidden",
          "name" = "Command",
!         "value" = "Mark"]],
       seedfield,
       ["h1",
--- 1621,1625 ----
       [["inputhidden",
          "name" = "Command",
!         "value" = "MarkQuiz"]],
       seedfield,
       ["h1",

Index: SOAP.mpl
===================================================================
RCS file: /cvsroot/aimmath/AIM/WEB-INF/maple/aim/Attic/SOAP.mpl,v
retrieving revision 1.1.2.3
retrieving revision 1.1.2.4
diff -C2 -d -r1.1.2.3 -r1.1.2.4
*** SOAP.mpl	22 Apr 2005 07:15:44 -0000	1.1.2.3
--- SOAP.mpl	25 Apr 2005 22:36:46 -0000	1.1.2.4
***************
*** 85,89 ****
  
   ['Input',"source"::`XML/string`],
!  ['Input',"format"::`XML/anyURI`],
   ['Input',"index"::`XML/unsignedInt` = 0],
  
--- 85,90 ----
  
   ['Input',"source"::`XML/string`],
!  ['Input',"format"::`XML/anyURI` =
! 	 "http://www.aiminfo.net/itemFormats/aimsource"],
   ['Input',"index"::`XML/unsignedInt` = 0],
  
***************
*** 103,106 ****
--- 104,109 ----
    proc(inp,out)
     local item,errs;
+    out["format"] := inp["format"];
+    out["maxScore"] := round(100 * item['Value']);
     try 
      item := `aim/SOAP/GetItem`(inp);
***************
*** 114,119 ****
      return();
     end try;
-    out["format"] := inp["format"];
-    out["maxScore"] := round(100 * item['Value']);
     return();
    end
--- 117,120 ----