fradrive/templates/exam-correct.hamlet
2020-02-06 16:08:55 +01:00

63 lines
2.9 KiB
Plaintext

$newline never
<section>
<div uw-hide-columns="exam-correct" .scrolltable .scrolltable--bordered>
<table .table .table--striped table--hover uw-exam-correct=#{toPathPiece examCorrectIdent} uw-sort-table=exam-correct-#{toPathPiece examCorrectIdent}>
<thead>
<tr .table__row .table__row--head>
<th .table__th .uw-exam-correct--date-cell uw-exam-correct-header="date" uw-hide-column-header="date">
_{MsgExamCorrectHeadDate}
<th .table__th .uw-exam-correct--user-cell uw-exam-correct-header="user" uw-hide-column-header="user">
_{MsgExamCorrectHeadParticipant}
^{iconTooltip participantHeadTooltip Nothing True}
$forall ExamPart{examPartNumber,examPartName} <- examParts
<th .table__th .uw-exam-correct--part-cell uw-exam-correct-header=#{examPartNumber} uw-hide-column-header=#{examPartNumber}>
$maybe name <- examPartName
<span .tooltip>
<span>
_{MsgExamCorrectHeadPart examPartNumber}
<span .tooltip__content>
_{MsgExamCorrectHeadPartName name}
$nothing
_{MsgExamCorrectHeadPart examPartNumber}
$if mayEditResults
<th .table__th .uw-exam-correct--result-cell uw-exam-correct-header="result" uw-hide-column-header="result" colspan=2>
_{MsgExamResult}
<th .table__th uw-exam-correct-header="status" uw-hide-column-header="status">
_{MsgExamCorrectHeadStatus}
<tbody>
<tr .table__row #exam-correct__new>
<td .table__td .uw-exam-correct--date-cell>
<td .table__td .exam-correct--input-status>
<input #exam-correct__user .uw-exam-correct--user-cell type="text" autofocus minLength=1>
<i #exam-correct__user-status .fas .fa-fw>
<ul #exam-correct__user-candidates>
$forall ExamPart{examPartNumber} <- examParts
<td .table__td .uw-exam-correct--part-cell>
^{ptsInput examPartNumber}
$if mayEditResults
<td .table__td #uw-exam-correct__result>
<select>
<option>
_{MsgExamResultNone}
$if examShowGrades
<option>
_{MsgExamResult}
$else
<option>
_{MsgExamPassed}
<option>
_{MsgExamNotPassed}
<option>
_{MsgExamResultVoided}
<option>
_{MsgExamResultNoShow}
<td .table__td #uw-exam-correct__result__grade>
<select>
$forall grade <- (toPathPiece <$> examGrades)
<option>
#{grade}
<td #exam-correct__status .table__td>
<button #exam-correct__send-btn .btn .btn-primary>
_{MsgExamCorrectButtonSend}