Details | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
23 | reyssat | 1 | !!! fichier de récupération de code source !!! |
2 | |||
3 | !mexec catsrc.sh |
||
4 | |||
5 | !defread wimshome/sessions/$wims_session/tempsrc |
||
6 | |||
7 | !if $toef_var4!=1 |
||
8 | exalert=$(alerts[6;]) |
||
9 | !exit |
||
10 | !endif |
||
11 | |||
12 | !for i=1 to $toef_varcnt |
||
13 | toef_var$(i)=!translate ¶ to $\ |
||
14 | $ in $(toef_var$(i)) |
||
15 | toef_var$(i)=!replace internal ? by ? in $(toef_var$(i)) |
||
16 | !next i |
||
17 | |||
18 | ### type1 |
||
19 | !if $toef_var4=1 |
||
20 | titre=$toef_var1 |
||
21 | auteur=$toef_var2 |
||
22 | imel=$toef_var3 |
||
23 | exo=$toef_var4 |
||
24 | obsrecord=$toef_var5 |
||
25 | propsrecord=$toef_var6 |
||
26 | propsrepList=$toef_var7 |
||
27 | ckchnb=$toef_var8 |
||
28 | fixchnb=$toef_var9 |
||
29 | borng=$toef_var10 |
||
30 | bornd=$toef_var11 |
||
31 | chnb=$toef_var12 |
||
32 | enonceR=$toef_var13 |
||
33 | chbox_u_radio=$toef_var14 |
||
34 | indicList=$toef_var15 |
||
35 | !endif |
||
36 | |||
37 | ### reinitialisation |
||
38 | chexo=1 |
||
39 | prefixdir=Dirqcm |
||
40 | !read $prefixdir/init |
||
41 | !exit |