Subversion Repositories wimsdev

Rev

Rev 14338 | Rev 14733 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 14338 Rev 14646
Line 57... Line 57...
57 
  !endif
 57 
  !endif
58 
!endif
 58 
!endif
59 
 
 59 
 
60 
!if $wims_sheet>0 or P isin $wims_sheet
 60 
!if $wims_sheet>0 or P isin $wims_sheet
61 
  !if $(wims_exofeedback[$wims_exo;])!=$empty
 61 
  !if $(wims_exofeedback[$wims_exo;])!=$empty
- 
 
 62 
    !if $module_score!=$empty
62 
    !set feedexo=$(wims_exofeedback[$wims_exo;])
 63 
      !set feedexotot=!declosing $(wims_exofeedback[$wims_exo;])
- 
 
 64 
      !set feedexocnt=!itemcnt $(feedexotot[;1])
- 
 
 65 
      !for t=1 to $feedexocnt
- 
 
 66 
        !set feedexo=$(feedexotot[$t;])
63 
    !if $module_score!=$empty and $module_score < $(feedexo[2]) and $module_score >= $(feedexo[3])
 67 
        !if $module_score < $(feedexo[2]) and $module_score >= $(feedexo[3])
64 
      !if $(feedexo[3])=0 or $(feedexo[3])=$empty
 68 
          !if $module_score < 10
65 
        !set 5_=!append line feedbackexo,7,$(feedexo[1]),mfeed to $5_
 69 
            !set 5_=!append line feedbackexo,7,$(feedexo[1]),mfeed to $5_
66 
      !else
 70 
          !else
67 
        !set 5_=!append line feedbackplus,7,$(feedexo[1]),mfeed to $5_
 71 
            !set 5_=!append line feedbackplus,7,$(feedexo[1]),mfeed to $5_
- 
 
 72 
          !endif
68 
      !endif
 73 
        !endif
- 
 
 74 
      !next
69 
    !endif
 75 
    !endif
70 
  !endif
 76 
  !endif
71 
!endif
 77 
!endif
72 
 
 78 
 
73 
!!********* Link #3 : "Resume"
 79 
!!********* Link #3 : "Resume"