[BACK]Return to default_assesscalc CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / interface / spreadsheet
File:  [LON-CAPA] / loncom / interface / spreadsheet / default_assesscalc
Revision 1.7: download - view: text, annotated - select for diffs
Fri Aug 1 13:47:26 2003 UTC (20 years, 9 months ago) by matthew
Branches: MAIN
CVS tags: version_2_9_X, version_2_9_99_0, version_2_9_1, version_2_9_0, version_2_8_X, version_2_8_99_1, version_2_8_99_0, version_2_8_2, version_2_8_1, version_2_8_0, version_2_7_X, version_2_7_99_1, version_2_7_99_0, version_2_7_1, version_2_7_0, version_2_6_X, version_2_6_99_1, version_2_6_99_0, version_2_6_3, version_2_6_2, version_2_6_1, version_2_6_0, version_2_5_X, version_2_5_99_1, version_2_5_99_0, version_2_5_2, version_2_5_1, version_2_5_0, version_2_4_X, version_2_4_99_0, version_2_4_2, version_2_4_1, version_2_4_0, version_2_3_X, version_2_3_99_0, version_2_3_2, version_2_3_1, version_2_3_0, version_2_2_X, version_2_2_99_1, version_2_2_99_0, version_2_2_2, version_2_2_1, version_2_2_0, version_2_1_X, version_2_1_99_3, version_2_1_99_2, version_2_1_99_1, version_2_1_99_0, version_2_1_3, version_2_1_2, version_2_1_1, version_2_1_0, version_2_11_0_RC2, version_2_11_0_RC1, version_2_10_X, version_2_10_1, version_2_10_0_RC2, version_2_10_0_RC1, version_2_10_0, version_2_0_X, version_2_0_99_1, version_2_0_2, version_2_0_1, version_2_0_0, version_1_99_3, version_1_99_2, version_1_99_1_tmcc, version_1_99_1, version_1_99_0_tmcc, version_1_99_0, version_1_3_X, version_1_3_3, version_1_3_2, version_1_3_1, version_1_3_0, version_1_2_X, version_1_2_99_1, version_1_2_99_0, version_1_2_1, version_1_2_0, version_1_1_X, version_1_1_99_5, version_1_1_99_4, version_1_1_99_3, version_1_1_99_2, version_1_1_99_1, version_1_1_99_0, version_1_1_3, version_1_1_2, version_1_1_1, version_1_1_0, version_1_0_99_3, version_1_0_99_2, version_1_0_99_1, version_1_0_99, version_1_0_3, version_1_0_2, version_1_0_1, version_1_0_0, version_0_99_5, version_0_99_4, loncapaMITrelate_1, language_hyphenation_merge, language_hyphenation, bz6209-base, bz6209, bz5969, bz2851, PRINT_INCOMPLETE_base, PRINT_INCOMPLETE, HEAD, GCI_3, GCI_2, GCI_1, BZ5971-printing-apage, BZ5434-fox, BZ4492-merge, BZ4492-feature_horizontal_radioresponse
Bug 840, default spreadsheet should show proper available points on
excused and partially excused problems.

    1: <field col=A row=0>
    2: if ("[stores_0_solved]" eq 'excused') {
    3:     'excused';
    4: } elsif (M0) { 
    5:     if(K0) {
    6:         if (K0 == M0) {
    7:             "correct";
    8:         } elsif (K0 < M0) {
    9:             K0.'/'.M0.' correct';
   10:         } else {
   11:             'correct';
   12:         }
   13:     } else {
   14:         "incorrect";
   15:     }
   16: } else {
   17:     '';
   18: }
   19: </field>
   20: 
   21: <field col=B row=0>'Tries:'</field>
   22: <field col=C row=0>
   23: if (M0) {
   24:     [&EXPANDSUM(PART;stores_PART_tries)]/M0;
   25: } else {
   26:     '';
   27: }
   28: </field>
   29: 
   30: <field col=D row=0>'Timestamp:'</field>
   31: <field col=E row=0>[timestamp]</field>
   32: <field col=F row=0>
   33: if ([timestamp]>100000000) { 
   34:     $tmp = localtime([timestamp]); 
   35:     $tmp =~ s/\s/&nbsp;/g;
   36:     $tmp;
   37: } else {
   38:     '';
   39: }
   40: </field>
   41: 
   42: <field col=G row=0>'Duedate:'</field>
   43: <field col=H row=0>[parameter_0_duedate]</field>
   44: <field col=I row=0>
   45: if ([parameter_0_duedate]>100000000) { 
   46:     $tmp = localtime([parameter_0_duedate]); 
   47:     $tmp =~ s/\s/&nbsp;/g;
   48:     $tmp;
   49: } else {
   50:     '';
   51: }
   52: </field>
   53: 
   54: <field col=J row=0>'Attempted Parts:'</field>
   55: <field col=K row=0>
   56: [&EXPANDSUM(PART;(stores_PART_solved !~ /^(\W?excused\W?|)$/ ?1:0))]
   57: </field>
   58: 
   59: <field col=L row=0>'Solved Parts:'</field>
   60: <field col=M row=0>[&EXPANDSUM(PART;(stores_PART_awarded?1:0))]</field>
   61: 
   62: <field col=W row=0>'Available Points:'</field>
   63: <field col=X row=0>
   64: if ("[stores_0_solved]" eq 'excused') {
   65:     0 
   66: } else { 
   67:     [&EXPANDSUM(PART;parameter_PART_weight*(stores_PART_solved !~ /^\W?excused\W?$/ ? 1 : 0))];
   68: }
   69: </field>
   70: 
   71: <field col=Y row=0>'Awarded Points:'</field>
   72: <field col=Z row=0>
   73: if ("[stores_0_solved]" eq 'excused') { 
   74:     0 
   75: } else { 
   76:     [&EXPANDSUM(PART;parameter_PART_weight*stores_PART_awarded)]
   77: }
   78: </field>
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>