diff options
| author | Eugeniy E. Mikhailov <evgmik@gmail.com> | 2018-05-11 00:38:49 -0400 |
|---|---|---|
| committer | Eugeniy E. Mikhailov <evgmik@gmail.com> | 2018-05-11 00:38:49 -0400 |
| commit | b5a49563be3338b40e238e42539d84e3d5511bf7 (patch) | |
| tree | f7343a41a436835f26bdc9fedb7e325eb5bd2073 | |
| parent | e9d4c779a3b9583e0e9de004df77650119e320d8 (diff) | |
| download | GradeBook-b5a49563be3338b40e238e42539d84e3d5511bf7.tar.gz GradeBook-b5a49563be3338b40e238e42539d84e3d5511bf7.zip | |
added regimental student grade positioning marker in histogram
| -rwxr-xr-x | GradeBook_lib.tcl | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/GradeBook_lib.tcl b/GradeBook_lib.tcl index 89206b7..c75c082 100755 --- a/GradeBook_lib.tcl +++ b/GradeBook_lib.tcl @@ -1345,6 +1345,7 @@ proc getPhotoUrl { IdNum } { proc htmlFormatColVal { col_value columnname user user_shown permission_list {font_style {}} } { global script_name global GradebookServerConfig + set col_value_raw $col_value set html_str {} set font_style_strt {} set font_style_end {} @@ -1394,6 +1395,14 @@ proc htmlFormatColVal { col_value columnname user user_shown permission_list {fo UserHiddenGradeCategories \ ] + # adding histogram marker + if { ([SelectColValue4User GroupName $user_shown] ne "inforow") && ($user ni $special_user_names) && ($columnname ni $embeded_actions_excluded_special_columns) } { + array set v [getColAndValForUserName _The_Grades_Hist_Limits_ [colList2sqlColStr [list $columnname]] {}] + set col_histogram_limits $v($columnname) + set histPositionMarker [markNthBin [binInHistogram $col_value_raw $col_histogram_limits]] + set col_str_value $histPositionMarker<p>$col_str_value + } + if { ([SelectColValue4User GroupName $user_shown] ne "inforow") && ($user ni $special_user_names) && ($category ne "weighted_column") && ($columnname ni $embeded_actions_excluded_special_columns) } { if { [isActionGranted edit_user_grade $permission_list $user] && ($user_shown ne "_UNSET_") } { set col_str_value "<a href=\"$script_name?action=edit_user_grade_request&user2modify=$user_shown&column2modify=$columnname\">${col_str_value}</a>" |