[LON-CAPA-cvs] cvs: loncom /homework default_homework.lcpm /html/adm/help/tex Problem_LON-CAPA_Functions.tex Script_Functions.tex

[www]

www		Sat May 21 14:08:11 2011 EDT

  Modified files:              
    /loncom/homework	default_homework.lcpm 
    /loncom/html/adm/help/tex	Problem_LON-CAPA_Functions.tex 
                             	Script_Functions.tex 
  Log:
  Accessing additional course data
  
  
Index: loncom/homework/default_homework.lcpm
diff -u loncom/homework/default_homework.lcpm:1.152 loncom/homework/default_homework.lcpm:1.153
--- loncom/homework/default_homework.lcpm:1.152	Sat Feb 26 17:50:13 2011
+++ loncom/homework/default_homework.lcpm	Sat May 21 14:08:06 2011
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA 
 # used by lonxml::xmlparse() as input variable $safeinit to Apache::run::run()
 #
-# $Id: default_homework.lcpm,v 1.152 2011/02/26 17:50:13 raeburn Exp $
+# $Id: default_homework.lcpm,v 1.153 2011/05/21 14:08:06 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1125,11 +1125,24 @@
     return $course;
 }
 
+sub classid {
+    my $courseid = &EXT('request.course.id');
+    $courseid = '' if $courseid eq "";
+    return $courseid;
+}
+
 sub firstname {
     my $firstname = &EXT('environment.firstname');
     $firstname = '' if $firstname eq "";
     return $firstname;
 }
+
+sub middlename {
+    my $middlename = &EXT('environment.middlename');
+    $middlename = '' if $middlename eq "";
+    return $middlename;
+}
+
                                                                                 
 sub lastname {
     my $lastname = &EXT('environment.lastname');
Index: loncom/html/adm/help/tex/Problem_LON-CAPA_Functions.tex
diff -u loncom/html/adm/help/tex/Problem_LON-CAPA_Functions.tex:1.19 loncom/html/adm/help/tex/Problem_LON-CAPA_Functions.tex:1.20
--- loncom/html/adm/help/tex/Problem_LON-CAPA_Functions.tex:1.19	Fri Feb  5 21:49:02 2010
+++ loncom/html/adm/help/tex/Problem_LON-CAPA_Functions.tex	Sat May 21 14:08:10 2011
@@ -128,10 +128,10 @@
 \&to\_string(\$x), \&to\_string(\$x,\$y)  & If x is an integer, returns a string. If x is real than the output is a string with format given by y. For example, if x = 12.3456, \&to\_string(x,''.3F'') = 12.345 and \&to\_string(x,''.3E'') = 1.234E+01. \\
 \hline
  
-\&class(), \&sec()  & Returns null string, class descriptive name, section number, set number and null string. \\
+\&class(), \&sec(), \&classid()  & Returns null string, class descriptive name, section number, class id, set number and null string. \\
 \hline
  
-\&name(), \&student\_number(), \&firstname(), \&lastname()  & Return the full name in the following format: lastname, firstname initial. Student\_number returns the student 9-alphanumeric string. The functions firstname and lastname return just that part of the name. If undefined, the functions return null. \\
+\&name(), \&student\_number(), \&firstname(), \&middlename(), \&lastname()  & Return the full name in the following format: lastname, firstname initial. Student\_number returns the student 9-alphanumeric string. The functions firstname, middlename, and lastname return just that part of the name. If undefined, the functions return null. \\
 \hline
 \&check\_status(\$partid) &Returns a number identifying the current status of a part. True values mean that a part is ``done'' (either unanswerable because of tries exhaustion, or correct) or a false value if a part can still be attempted. If \$part is unspecified, it will check either the current $<$part$>$'s status or if outside of a $<$part$>$, check the status of previous $<$part$>$. The full set of return codes are: 'undef' means it is unattempted, 0 means it is attempted and wrong but still has tries, 1 means it is marked correct, 2 means they have exceed maximum number of tries, 3 means it after the answer date.\\
 \hline
Index: loncom/html/adm/help/tex/Script_Functions.tex
diff -u loncom/html/adm/help/tex/Script_Functions.tex:1.10 loncom/html/adm/help/tex/Script_Functions.tex:1.11
--- loncom/html/adm/help/tex/Script_Functions.tex:1.10	Sat Jun 14 16:41:34 2008
+++ loncom/html/adm/help/tex/Script_Functions.tex	Sat May 21 14:08:10 2011
@@ -28,8 +28,8 @@
 \item tex({}``a'',''b'') or tex(a,b) 
 \item var\_in\_tex(a) 
 \item to\_string(x), to\_string(x,y) 
-\item class(), sec() 
-\item name(), firstname(), lastname(), student\_number()
+\item class(), sec(), classid() 
+\item name(), firstname(), middlename(), lastname(), student\_number()
 \item check\_status(partid)
 \item open\_date(partid), due\_date(partid), answer\_date(partid) 
 \item open\_date\_epoch(partid), due\_date\_epoch(partid), answer\_date\_epoch(partid)