Rev 16946 | Rev 17037 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 16946 | Rev 17036 | ||
---|---|---|---|
Line 64... | Line 64... | ||
64 | !while $cpta<$nbactivity and $(activity[1])<$date |
64 | !while $cpta<$nbactivity and $(activity[1])<$date |
65 | !increase cpta |
65 | !increase cpta |
66 | activity=!record $cpta of wimshome/sessions/$wims_session/$user.st |
66 | activity=!record $cpta of wimshome/sessions/$wims_session/$user.st |
67 | !endwhile |
67 | !endwhile |
68 | !else |
68 | !else |
69 | error=noactivity |
- | |
70 | notallowed=1 |
- | |
71 | !exit |
69 | !exit |
72 | !endif |
70 | !endif |
73 | !! ----- first item is color for 0 activity (maybe zone number and color can be paramétrizable ?) |
71 | !! ----- first item is color for 0 activity (maybe zone number and color can be paramétrizable ?) |
74 | ltcolor=white,red,yellow,orange,green |
72 | ltcolor=white,red,yellow,orange,green |
75 | !! ------ time for each zone |
73 | !! ------ time for each zone |
Line 123... | Line 121... | ||
123 | !endif |
121 | !endif |
124 | !next k |
122 | !next k |
125 | data=!append line $ligne to $data |
123 | data=!append line $ligne to $data |
126 | !endwhile |
124 | !endwhile |
127 | nb_dtl=!linecnt $data |
125 | nb_dtl=!linecnt $data |
128 | - |