Rev 12821 | Rev 16915 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 12821 | Rev 16914 | ||
---|---|---|---|
Line 2... | Line 2... | ||
2 | !distribute lines $wims_firstname\ |
2 | !distribute lines $wims_firstname\ |
3 | $wims_lastname\ |
3 | $wims_lastname\ |
4 | $newmsgcnt\ |
4 | $newmsgcnt\ |
5 | into\ |
5 | into\ |
6 | m_firstname,m_lastname,m_newmsgcnt |
6 | m_firstname,m_lastname,m_newmsgcnt |
- | 7 | ||
- | 8 | !! --- in case of use of file of the document in the presentation page |
|
- | 9 | !if $class_homepage!=yes |
|
- | 10 | !let m_filedir=$wims_ref_name?session=$wims_session&+cmd=getfile&+special_parm=doc |
|
- | 11 | !let tmp=!replace internal / by , in $class_homepage |
|
- | 12 | !sh if [ -d $wims_home/log/classes/$wims_class/doc/$(tmp[1])/files ]; then\ |
|
- | 13 | cd $wims_home/$wims_sesdir;\ |
|
- | 14 | mkdir -p getfile;\ |
|
- | 15 | cd getfile;\ |
|
- | 16 | rm -f doc;\ |
|
- | 17 | ln -s $wims_home/log/classes/$wims_class/doc/$(tmp[1])/files doc;\ |
|
- | 18 | fi |
|
- | 19 | !endif |
|
7 | 20 | ||
8 | !set m_today=!char 1 to 8 of $wims_now |
21 | !set m_today=!char 1 to 8 of $wims_now |
9 | !set m_sheets=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheets |
22 | !set m_sheets=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheets |
10 | !set m_exams=!recordcnt wimshome/log/classes/$wims_class/exams/.exams |
23 | !set m_exams=!recordcnt wimshome/log/classes/$wims_class/exams/.exams |
11 | !set m_user_login=$wims_user |
24 | !set m_user_login=$wims_user |
Line 16... | Line 29... | ||
16 | !set m_userdaymessage=!record 0 of wimshome/log/classes/$wims_class/motd/def/$wims_user |
29 | !set m_userdaymessage=!record 0 of wimshome/log/classes/$wims_class/motd/def/$wims_user |
17 | 30 | ||
18 | !for i=1 to $m_sheets |
31 | !for i=1 to $m_sheets |
19 | !set l_=!record $i of wimshome/log/classes/$wims_class/sheets/.sheets |
32 | !set l_=!record $i of wimshome/log/classes/$wims_class/sheets/.sheets |
20 | !distribute lines $l_ into m_status$i,m_expiration$i,m_title$i,m_desc$i |
33 | !distribute lines $l_ into m_status$i,m_expiration$i,m_title$i,m_desc$i |
21 |
|
34 | !next i |
22 | !for i=1 to $m_exams |
35 | !for i=1 to $m_exams |
23 | !set l_=!record $i of wimshome/log/classes/$wims_class/exams/.exams |
36 | !set l_=!record $i of wimshome/log/classes/$wims_class/exams/.exams |
24 | !distribute lines $l_ into m_statusE$i,m_expirationE$i,m_titleE$i,m_descE$i |
37 | !distribute lines $l_ into m_statusE$i,m_expirationE$i,m_titleE$i,m_descE$i |
25 | !next i |
38 | !next i |
26 | !let save_trustfile=$wims_trustfile |
39 | !let save_trustfile=$wims_trustfile |