Rev 11134 | Rev 17871 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 11134 | Rev 12701 | ||
---|---|---|---|
Line 2... | Line 2... | ||
2 | 2 | ||
3 | !if $scnt>=$max_sheets |
3 | !if $scnt>=$max_sheets |
4 |
|
4 | error=bad_maxsheets |
5 |
|
5 | !reset job wims_ariane |
6 |
|
6 | !changeto var.proc |
7 | !endif |
7 | !endif |
8 | !bound sheet between 1 and $scnt default $empty |
8 | !bound sheet between 1 and $scnt default $empty |
9 | 9 | ||
10 | !if $sheet=$empty |
10 | !if $sheet=$empty |
11 |
|
11 | error=bad_sheet |
12 |
|
12 | !reset job wims_ariane |
13 |
|
13 | !changeto var.proc |
14 | !endif |
14 | !endif |
15 | 15 | ||
16 | exocnt=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheet$sheet |
16 | exocnt=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheet$sheet |
17 | !if $exocnt=0 |
17 | !if $exocnt=0 |
18 | !reset job wims_ariane |
18 | !reset job wims_ariane |
19 | !changeto var.proc |
19 | !changeto var.proc |
20 | !endif |
20 | !endif |
21 | 21 | ||
22 | !sh cd $wims_home/log/classes/$wims_class/sheets/\ |
22 | !sh cd $wims_home/log/classes/$wims_class/sheets/\ |
23 | cp .sheet$sheet .sheet$[$scnt+1] |
23 | cp .sheet$sheet .sheet$[$scnt+1] |
24 | 24 | ||
Line 29... | Line 29... | ||
29 | 29 | ||
30 | !! --- copy severity of the sheet: |
30 | !! --- copy severity of the sheet: |
31 | fsev=!record 0 of wimshome/log/classes/$wims_class/sheets/.severity |
31 | fsev=!record 0 of wimshome/log/classes/$wims_class/sheets/.severity |
32 | sev=!line $[$sheet+1] of $fsev |
32 | sev=!line $[$sheet+1] of $fsev |
33 | !if $sev!=$empty |
33 | !if $sev!=$empty |
34 | n=!linecnt $fsev |
34 | n=!linecnt $fsev |
35 | !while $n<$scnt+1 |
35 | !while $n<$scnt+1 |
36 | fsev=$fsev\ |
36 | fsev=$fsev\ |
37 | 37 | ||
38 | !increase n |
38 | !increase n |
39 | !endwhile |
39 | !endwhile |
40 | fsev=!append line $sev to $fsev |
40 | fsev=!append line $sev to $fsev |
41 | !writefile wimshome/log/classes/$wims_class/sheets/.severity $fsev |
41 | !writefile wimshome/log/classes/$wims_class/sheets/.severity $fsev |
42 | !endif |
42 | !endif |
43 | !! --- |
43 | !! --- |
44 | 44 | ||
45 | scnt=$[$scnt+1] |
45 | scnt=$[$scnt+1] |
46 | sheet=$scnt |
46 | sheet=$scnt |