Rev 14043 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 14043 | Rev 14300 | ||
---|---|---|---|
Line 13... | Line 13... | ||
13 | !bound nbredevoir between integer 0 and $max_todo default 1 |
13 | !bound nbredevoir between integer 0 and $max_todo default 1 |
14 | !if $s_nbdevoir!=$nbredevoir |
14 | !if $s_nbdevoir!=$nbredevoir |
15 | !reset job2 |
15 | !reset job2 |
16 | !endif |
16 | !endif |
17 | s_nbdevoir=$nbredevoir |
17 | s_nbdevoir=$nbredevoir |
- | 18 | ||
- | 19 | !if $jquery_defined!=yes |
|
- | 20 | jmonth=!char 2,3 of $[abs(floor($monthjdate))+100] |
|
- | 21 | jday=!char 2,3 of $[abs(floor($dayjdate))+100] |
|
- | 22 | jyear=!char -4 to -1 of $[abs(floor($yearjdate))+100000] |
|
- | 23 | jdate=$(jyear)$(jmonth)$(jday) |
|
- | 24 | !for i=1 to $s_nbdevoir |
|
- | 25 | jmonth=!char 2,3 of $[abs(floor($(monthddate$i)))+100] |
|
- | 26 | jday=!char 2,3 of $[abs(floor($(dayddate$i)))+100] |
|
- | 27 | jyear=!char -4 to -1 of $[abs(floor($(yearddate$i)))+100000] |
|
- | 28 | ddate$i=$(jyear)$(jmonth)$(jday) |
|
- | 29 | !next i |
|
- | 30 | !endif |
|
18 | 31 | ||
19 | !if $job2!=save |
32 | !if $job2!=save |
20 | !if $filename!=$empty and $old_date=$empty |
33 | !if $filename!=$empty and $old_date=$empty |
21 | !read wimshome/log/classes/$wims_class/cdt/def/$filename |
34 | !read wimshome/log/classes/$wims_class/cdt/def/$filename |
22 | !if yes isin $date_exist |
35 | !if yes isin $date_exist |
23 | jdesc=!record 0 of wimshome/log/classes/$wims_class/cdt/src/$filename.work |
36 | jdesc=!record 0 of wimshome/log/classes/$wims_class/cdt/src/$filename.work |
24 | jday=!char 7 to 8 of $filename |
- | |
25 | jmonth=!char 5 to 6 of $filename |
- | |
26 | jyear=!char 1 to 4 of $filename |
- | |
27 | jdate=!char 1 to 8 of $filename |
37 | jdate=!char 1 to 8 of $filename |
28 | nbredevoir=!itemcnt $date_todo |
38 | nbredevoir=!itemcnt $date_todo |
29 | !if $nbredevoir>0 |
39 | !if $nbredevoir>0 |
30 | !for i=1 to $nbredevoir |
40 | !for i=1 to $nbredevoir |
31 | ddesc$i=!record 0 of wimshome/log/classes/$wims_class/cdt/src/$filename.todo$i |
41 | ddesc$i=!record 0 of wimshome/log/classes/$wims_class/cdt/src/$filename.todo$i |
32 | tmp=!item $i of $date_todo |
42 | tmp=!item $i of $date_todo |
33 | dday$i=!char 7 to 8 of $tmp |
- | |
34 | dmonth$i=!char 5 to 6 of $tmp |
- | |
35 | dyear$i=!char 1 to 4 of $tmp |
- | |
36 | ddate$i=!char 1 to 8 of $tmp |
43 | ddate$i=!char 1 to 8 of $tmp |
37 | !next i |
44 | !next i |
38 | !endif |
45 | !endif |
39 | s_nbdevoir=$nbredevoir |
46 | s_nbdevoir=$nbredevoir |
40 | old_date=$filename |
47 | old_date=$filename |
41 | !endif |
48 | !endif |
42 | !reset filename |
49 | !reset filename |
43 | !endif |
50 | !endif |
44 | !exit |
51 | !exit |
45 | !endif |
52 | !endif |
46 | - | ||
47 | !if $jquery_defined=yes |
- | |
48 |
|
53 | jyear=!char 1 to 4 of $jdate |
49 |
|
54 | jmonth=!char 5 to 6 of $jdate |
50 |
|
55 | jday=!char 7 to 8 of $jdate |
51 | !endif |
- | |
52 | jmonth=!char 2,3 of $[abs(floor($jmonth))+100] |
- | |
53 | jday=!char 2,3 of $[abs(floor($jday))+100] |
- | |
54 | jyear=!char -4 to -1 of $[abs(floor($jyear))+100000] |
- | |
55 | !if $jday>=1 and $jday<=31 and $jmonth>=1 and $jmonth<=12 \ |
56 | !if $jday>=1 and $jday<=31 and $jmonth>=1 and $jmonth<=12 \ |
56 | and N notin $jmonth$jday$jyear |
57 | and N notin $jmonth$jday$jyear |
57 | !! and $jyear$jmonth$jday<=$class_expiration |
58 | !! and $jyear$jmonth$jday<=$class_expiration |
58 | !! and $jyear$jmonth$jday>=$class_creation |
59 | !! and $jyear$jmonth$jday>=$class_creation |
59 | 60 | ||
60 | jour=$jyear$jmonth$jday |
61 | jour=$jyear$jmonth$jday |
61 | !else |
62 | !else |
62 | error=bad_day |
63 | error=bad_day |
63 | !exit |
64 | !exit |
64 | !endif |
65 | !endif |
- | 66 | ||
65 | !reset date_exist |
67 | !reset date_exist |
66 | !read wimshome/log/classes/$wims_class/cdt/def/$jour |
68 | !read wimshome/log/classes/$wims_class/cdt/def/$jour |
67 | !if yes isin $date_exist and $jour!=$old_date |
69 | !if yes isin $date_exist and $jour!=$old_date |
68 | error=day_exists |
70 | error=day_exists |
69 | !exit |
71 | !exit |
70 | !endif |
72 | !endif |
71 | 73 | ||
72 | ltjdevoir=$empty |
74 | ltjdevoir=$empty |
73 | !if $s_nbdevoir>0 |
75 | !if $s_nbdevoir>0 |
74 | !for i=1 to $s_nbdevoir |
76 | !for i=1 to $s_nbdevoir |
75 | !if $jquery_defined=yes |
- | |
76 |
|
77 | dyear=!char 1 to 4 of $(ddate$i) |
77 |
|
78 | dmonth=!char 5 to 6 of $(ddate$i) |
78 |
|
79 | dday=!char 7 to 8 of $(ddate$i) |
79 | !endif |
- | |
80 | dmonth=!char 2,3 of $[abs(floor($(dmonth$i)))+100] |
- | |
81 | dday=!char 2,3 of $[abs(floor($(dday$i)))+100] |
- | |
82 | dyear=!char -4 to -1 of $[abs(floor($(dyear$i)))+100000] |
- | |
83 | !if $dday>=1 and $dday<=31 and $dmonth>=1 and $dmonth<=12 \ |
80 | !if $dday>=1 and $dday<=31 and $dmonth>=1 and $dmonth<=12 \ |
84 | and $dyear$dmonth$dday>$jour \ |
81 | and $dyear$dmonth$dday>$jour \ |
85 | and N notin $dmonth$dday$dyear |
82 | and N notin $dmonth$dday$dyear |
86 | !! and $dyear$dmonth$dday<=$class_expiration |
83 | !! and $dyear$dmonth$dday<=$class_expiration |
87 | !! and $dyear$dmonth$dday>=$class_creation |
84 | !! and $dyear$dmonth$dday>=$class_creation |