Rev 4783 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 4783 | Rev 14218 | ||
---|---|---|---|
Line 12... | Line 12... | ||
12 | #on stock le parametre rclass demand |
12 | #on stock le parametre rclass demand |
13 | r_class=$rclass |
13 | r_class=$rclass |
14 | 14 | ||
15 | !for cl =1 to $listclasses_cnt |
15 | !for cl =1 to $listclasses_cnt |
16 | 16 | ||
17 | qclass=!item $cl of $listclasses |
17 | qclass=!item $cl of $listclasses |
18 | rclass=!item $cl of $list_rclasses |
18 | rclass=!item $cl of $list_rclasses |
19 | 19 | ||
20 | !read scripts/check.user |
20 | !read scripts/check.user |
21 | 21 | ||
22 | !if $error!=$empty |
22 | !if $error!=$empty |
23 | user_error=!append item $error to $user_error |
23 | user_error=!append item $error to $user_error |
24 | error=$empty |
24 | error=$empty |
25 | !else |
25 | !else |
26 |
|
26 | listclassesuser=!append item $qclass to $listclassesuser |
27 |
|
27 | list_rclassesuser=!append item $rclass to $list_rclassesuser |
28 | !endif |
28 | !endif |
29 | 29 | ||
30 | !next |
30 | !next |
31 | 31 | ||
32 | #puis on reinitialise rclass (il pourra ainsi |
32 | #puis on reinitialise rclass (il pourra ainsi etre retourne au demandeur) |
33 | rclass=$r_class |
33 | rclass=$r_class |
34 | 34 | ||
35 | nb_user_error=!itemcnt $user_error |
35 | nb_user_error=!itemcnt $user_error |
36 | 36 | ||
37 | !if $listclassesuser=$empty |
37 | !if $listclassesuser=$empty |
38 | #debug_msg n'est |
38 | #debug_msg n'est utilise que pour le developpement, et sera a retirer en production |
39 | !if $nb_user_error > 0 |
39 | !if $nb_user_error > 0 |
40 | debug_msg |
40 | debug_msg = This job also generated $nb_user_error errors ($user_error) |
41 | !endif |
41 | !endif |
42 | error=user $quser didn't participate in $listclasses_cnt listed classes ($listclasses). $debug_msg |
42 | error=user $quser didn't participate in $listclasses_cnt listed classes ($listclasses). $debug_msg |
43 | !exit |
43 | !exit |
44 | !endif |
44 | !endif |