Subversion Repositories wimsdev

Rev

Rev 18582 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 18582 Rev 18598
Line 59... Line 59...
59 
  msgmod=$save_msg
 59 
  msgmod=$save_msg
60 
!endif
 60 
!endif
61 
 
 61 
 
62 
!if $save_sendotherteacher=1
 62 
!if $save_sendotherteacher=1
63 
  !! ----------- send copie msg to teacher of the class
 63 
  !! ----------- send copie msg to teacher of the class
64 
  cnt_teacher=!recordcnt wimshome/sessions/$wims_session/.userteacher_mail
 64 
  cnt_teacher=!recordcnt wimshome/sessions/$wims_session/.teacherlist_mail
65 
  !for l_ =1 to $cnt_teacher
 65 
  !for l_ =1 to $cnt_teacher
66 
    u=!record $l_ of wimshome/sessions/$wims_session/.userteacher_mail
 66 
    u=!record $l_ of wimshome/sessions/$wims_session/.teacherlist_mail
67 
    login=!append item $(u[3]) to $login
 67 
    login=!append item $(u[3]) to $login
68 
    teachername=!append item $(u[1]) $(u[2]) to $teachername
 68 
    teachername=!append item $(u[1]) $(u[2]) to $teachername
69 
    !mailto $(u[4])\
 69 
    !mailto $(u[4])\
70 
$sender\
 70 
$sender\
71 
[WIMS $wims_classname] $save_subject\
 71 
[WIMS $wims_classname] $save_subject\