Rev 7290 | Rev 12555 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 7290 | Rev 12316 | ||
|---|---|---|---|
| Line 4... | Line 4... | ||
| 4 | !! needed information : |
4 | !! needed information : |
| 5 | !! sheet : num of modify sheet |
5 | !! sheet : num of modify sheet |
| 6 | !! exo : num of exo modifiy in the sheet |
6 | !! exo : num of exo modifiy in the sheet |
| 7 | !! update_field : is the number of the field to be modified. |
7 | !! update_field : is the number of the field to be modified. |
| 8 | !! update_content : new content of the line |
8 | !! update_content : new content of the line |
| 9 |
|
9 | number_field=10 |
| 10 | ecnt=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheet$sheet |
10 | ecnt=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheet$sheet |
| 11 | !for e=1 to $ecnt |
11 | !for e=1 to $ecnt |
| 12 | exo_$e=!record $e of wimshome/log/classes/$wims_class/sheets/.sheet$sheet |
12 | exo_$e=!record $e of wimshome/log/classes/$wims_class/sheets/.sheet$sheet |
| 13 | exo_$e=!line 1 to $number_field of $(exo_$e)\ |
13 | exo_$e=!line 1 to $number_field of $(exo_$e)\ |
| - | 14 | \ |
|
| 14 | \ |
15 | \ |
| 15 | \ |
16 | \ |
| 16 | \ |
17 | \ |
| 17 | \ |
18 | \ |
| 18 | \ |
19 | \ |
| Line 40... | Line 41... | ||
| 40 | !if $e!=$exo or $update_field>=0 |
41 | !if $e!=$exo or $update_field>=0 |
| 41 | ef=!line 1 to $number_field of $(exo_$e) |
42 | ef=!line 1 to $number_field of $(exo_$e) |
| 42 | !appendfile wimshome/log/classes/$wims_class/sheets/.sheet$sheet :$ef |
43 | !appendfile wimshome/log/classes/$wims_class/sheets/.sheet$sheet :$ef |
| 43 | !endif |
44 | !endif |
| 44 | !next e |
45 | !next e |
| 45 | - | ||